Hallo "alte Männer",
das Thema ist zwar schon etwas älter, aber ich bin über das gleiche Problem gestolpert.
Auch ich bin für KISS zu haben, und bin auf eine sehr einfache (und hoffentlich richtige) Lösung gestoßen.
Wobei ich dazu sagen muß, ich komme von 120 DPI und hatte die von Hannes Kuhn beschriebenen Probleme.
Meine Abhilfe:
Beim Entwurf
Form.Scaled:=false
und dann im Programm:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
const
ppi_c=120; {PixelsperInch at creation}
begin
scaleby(PixelsPerInch,ppi_c);
end;
Ich weiß, sieht ziemlich widersinnig aus, aber mit
Form.Scaled:=true
werden alle Controls wild angepaßt und nichts paßt mehr zum anderen, insbesonders Tmemo scheint ein echtes Eigenleben zu entwickeln (trotz align und anchor)
Gruß K-H