Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Warum zeichnet er nicht?


Marco D. - Mi 02.08.06 19:37
Titel: Warum zeichnet er nicht?
Ich habe eine Procedure mit folgendem Parameter: var Target: TPicture
Dann zeichne ich auf Target:

Delphi-Quelltext
1:
2:
Target.Bitmap.canvas.Font.Color := clRed;
Target.Bitmap.canvas.TextOut(0,0,'uschi');

Nun will ich es anzeigen lassen auf image6:

Delphi-Quelltext
1:
2:
3:
FEndPic := TPicture.Create;
MergePics(FEndPic);
image6.Picture.Assign(FEndPic);

Aber ich sehe nichts.


Keldorn - Mi 02.08.06 19:57

Hallo

wie groß ist dein Bild? du änderst nirgends die größe Auf einem Blatt von 0x0cm kannst du zeichnen was du willst, du wirst nix sehen.

Mfg frank


Marco D. - Mi 02.08.06 20:12

Habe jetzt:

Delphi-Quelltext
1:
2:
3:
4:
Target.Bitmap.canvas.Font.Color := clRed;
Target.Bitmap.Width := 50;
Target.Bitmap.Height := 50;
Target.Bitmap.canvas.TextOut(0,0,'uschi');

Und es geht.