Registriert seit: 12. Dez 2004
Ort: Wien, Österriech
893 Beiträge
Delphi 6 Enterprise
|
Re: Bildschirmauflösung stört
8. Apr 2005, 13:08
Aber natürlich...
Delphi-Quellcode:
// on create event
var scalex, scaley : integer;
begin
scalex := 80; // 80% von Screen.Width
scaley := 80; // 80% von Screen.height
width := screen.width * ( scaleX ) div 100;
height := screen.height * (scaleY ) div 100;
end;
Katura Haris Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
|