Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: Verständnisfrage zu ScaleBy

  Alt 11. Jun 2012, 22:59
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
Clientwidth := 400;
Clientheight := 300;
Memo1.Lines.Add(Format('CW: %d, CH: %d, W: %d, H: %d',[Clientwidth,Clientheight,Width,Height]));
Scaleby(2,1);
Memo1.Lines.Add(Format('CW: %d, CH: %d, W: %d, H: %d',[Clientwidth,Clientheight,Width,Height]));
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat