Hi @ all,
erst mal vorweg ich war schon lange hier, aber irgendwie bekomm ich mein altes pass net zugeschickt aber egal, zum problem:
Ich erstelle ein Bitmap über das ganze Formular, und male ein Strich auf das Canvas, male dann wieder ein rechteck ganz drüber, und nun würde ich gerne einen anderen Strich zeichen. Dieser wird aber nicht dargestellt, hab zwar seit nem monat net mehr programiert, aber ich glaube ich bin echt total eingerostet....
hier mal die "relevanten" Stellen
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
bm.Canvas.LineTo(100,100);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
With bm do
begin
Canvas.Brush.Color := Form1.Color;
Canvas.Rectangle(0,0,ClientWidth, ClientHeight);
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
BM := TBitmap.Create;
bm.Width := ClientWidth;
bm.Height := ClientHeight;
end;
bm ist ein BitMap welches im Private bereich des Forms steht
Hoffe mir kann jemand helfen