TIP: Click on subject to list as thread! ANSI
echo: delphi
to: CARLOS SANCHEZ GARCIA
from: KARSTEN BENDSEN
date: 1997-07-27 17:32:00
subject: RE:Win Resolution

HEJ Carlos!
ehh why do do I speak danish :)
Hi Carlos!
CSG>     How can I know Windows resolution and number of colors from Delphi?
resolution:
var x, y: Cardinal;
begin
  x := GetSystemMetrics(SM_CXSCREEN);
  y := GetSystemMetrics(SM_CYSCREEN);
  ResolutionLabel.Caption := 'Screenresolution: ' + IntToStr(x) + ' ú ' +     
IntToStr(y);
end;
colors:
??
MVH
| * Origin:  (2:238/64.59)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.