auf Tabsheet Zeichnen ?

[DeddyH]

Dafür ist das OnPaint-Ereignis ja auch da. Beim TImage dürfte das übrigens auch passieren, wenn man keine Grafik lädt, sondern direkt auf den Canvas pinselt (und zwar nicht im OnPaint).

[Fussball-Robby]

Zitat von DeddyH:

Dafür ist das OnPaint-Ereignis ja auch da. Beim TImage dürfte das übrigens auch passieren, wenn man keine Grafik lädt, sondern direkt auf den Canvas pinselt (und zwar nicht im OnPaint).

Nein, da bleibt das gepinselte da. Warum auch immer..

[Tormentor32]

Weil TImage soweit ich weiß noch einen internen Buffer hat welcher im OnPaint kopiert wird

edit: wenn das image an einer Stelle nicht mehr verdeckt ist

[mkinzler]

Trotzdem gehören alle Zeichenoperationen in ooPaint bzw. Paint

[rollstuhlfahrer]

HI,

Zitat von Fussball-Robby:

Zitat von DeddyH:

Dafür ist das OnPaint-Ereignis ja auch da. Beim TImage dürfte das übrigens auch passieren, wenn man keine Grafik lädt, sondern direkt auf den Canvas pinselt (und zwar nicht im OnPaint).

Nein, da bleibt das gepinselte da. Warum auch immer..

Ganz einfach: Wenn du auf ein Image mit Canvas zeichnest, wird, falls noch nicht vorhanden, ein TBitmap angelegt, auf welches jede Canvas-aktion weitergeleitet wird. (Deswegen auch Probleme beim Zeichnen mit Canvas auf JPEG)

Delphi-Quellcode:

function TImage.GetCanvas: TCanvas;
var
  Bitmap: TBitmap;
begin
  if Picture.Graphic = nil then
  begin
   Bitmap := TBitmap.Create;
   try
     Bitmap.Width := Width;
     Bitmap.Height := Height;
     Picture.Graphic := Bitmap;
   finally
     Bitmap.Free;
   end;
  end;
  if Picture.Graphic is TBitmap then
   Result := TBitmap(Picture.Graphic).Canvas
  else
   raise EInvalidOperation.Create(SImageCanvasNeedsBitmap);
end;

Deswegen bleibt der Inhalt erhalten. Bei einer Paintbox gibts keine Graphik. Hier wird alles (wirklich alles) über OnPaint gezeichnet. Deswegen verschwindet der Inhalt auch so schnell.

rollstuhlfahrer

PS: @Delphiturbo: Such dir raus, was du willst/brauchst