Registriert seit: 4. Nov 2003
Ort: Happurg (Nürnberg)
331 Beiträge
Delphi 2006 Professional
|
Re: Probleme mit untersch. Auflösung
14. Nov 2003, 10:39
Probiers mal mit TWinControl.ScaleBy(X,X);
Funktioniert so:
Größe - 10%:
ScaleBy(90, 100);
Größe + 10%:
ScaleBy(110, 100);
- 50%
ScaleBy(50, 100);
also eben 50 von Hundert. Die muss natürlich nicht sein. Kannst auch sagen
Formular ist 800 breit und soll 640 breit werden:
ScaleBy(640, 800);
Alle Controls auf dem Form werden mit angepasst.
Wegen rundungsfehlern oder so is die Methode leider etwas ungenau, wenn man erst + dann wieder - macht.
Einfach mal ausprobieren
Christian Schubert Ich fange gerade erst an, den Umfang meiner Ahnungslosigkeit zu begreifen...
|