Don't forget 2... - Notizblock

[PierreB]

Zitat von Beckman:

Delphi-Quellcode:

case screen.Width of
  800: showmessage('800x' + inttostr(screen.Height));
  1024: showmessage('1024x' + inttostr(screen.Height));
  1280: showmessage('1280x' + inttostr(screen.Height));
  end;

geht sowas net?

Delphi-Quellcode:

case screen.Width of
  800: memo1.font.size:=8;
  1024: memo1.font.size:=10;
  1280: memo1.font.size:=12;
  end;

So dann doch eher.


Hab 19" dran. Fands trotzdem zu klein. Aber jetzt geht es ja