Thema: Delphi TImage.Canvas Resize

Einzelnen Beitrag anzeigen

Benutzerbild von sniper_w
sniper_w

Registriert seit: 11. Dez 2004
Ort: Wien, Österriech
893 Beiträge
 
Delphi 6 Enterprise
 
#2

Re: TImage.Canvas Resize

  Alt 2. Mär 2005, 14:16
Die Frage ist nicht korrekt gestellt. Was willst du eigentlich erreichen ?
Canvas "Grösse" kann man nicht ändern. Grösse = Grösse des sichtbares Feldes vom Objekt deren Canvas Property ist zu benutzen, wenn du es so willst.
Und nochmals, was willst du eigentlich erreichen ?

[EDIT]

Delphi-Quellcode:
procedure TForm1.FormResize(Sender: TObject);
begin
Image1.Picture.Bitmap.Width := Width;
Image1.Picture.Bitmap.Height := Height;
Image1.Canvas.MoveTo(0,0);
Image1.Canvas.LineTo(Width,Height);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.Canvas.Pen.Color := clBlue;
end;
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
  Mit Zitat antworten Zitat