Autor Beitrag
Marco D.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 2750

Windows Vista
Delphi 7, Delphi 2005 PE, PHP 4 + 5 (Notepad++), Java (Eclipse), XML, XML Schema, ABAP, ABAP OO
BeitragVerfasst: Mi 02.08.06 19:37 
Ich habe eine Procedure mit folgendem Parameter: var Target: TPicture
Dann zeichne ich auf Target:
ausblenden 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:
ausblenden Delphi-Quelltext
1:
2:
3:
FEndPic := TPicture.Create;
MergePics(FEndPic);
image6.Picture.Assign(FEndPic);

Aber ich sehe nichts.

_________________
Pascal keeps your hand tied. C gives you enough rope to hang yourself. C++ gives you enough rope to shoot yourself in the foot
Keldorn
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 2266
Erhaltene Danke: 4

Vista
D6 Prof, D 2005 Pro, D2007 Pro, DelphiXE2 Pro
BeitragVerfasst: 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

_________________
Lükes Grundlage der Programmierung: Es wird nicht funktionieren.
(Murphy)
Marco D. Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 2750

Windows Vista
Delphi 7, Delphi 2005 PE, PHP 4 + 5 (Notepad++), Java (Eclipse), XML, XML Schema, ABAP, ABAP OO
BeitragVerfasst: Mi 02.08.06 20:12 
Habe jetzt:
ausblenden 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.

_________________
Pascal keeps your hand tied. C gives you enough rope to hang yourself. C++ gives you enough rope to shoot yourself in the foot