Einzelnen Beitrag anzeigen

cltom

Registriert seit: 22. Sep 2005
221 Beiträge
 
Delphi 12 Athens
 
#5

Re: TImage Paint To mehrmals aufrufen

  Alt 17. Okt 2007, 18:04
*aufwärm* das Problem ist noch ungelöst und ich täte Euch um Hilfe bitten:

Hier ein kleines Testprojekt, dass das Problem zeigt:

Delphi-Quellcode:
  panel1.Width := 200 + random(100);
  panel1.height := 200 + random(100);
  image1.Width := panel1.Width;
  image1.Height := panel1.Height;
  image1.Invalidate;
  panel1.PaintTo(image1.Canvas,0,0);
Falls bequemer habe ich das Projekt angehängt.

Was nun passiert:
Beim ersten mal Aufrufen wird das Panel korrekt kopiert, bei den Folgenden Versuchen stimmt width und height nicht mehr, im image wird das Panel abgeschnitten ungeachtet der Übergabe von Height und Width.

Was muss man ändern, damit das Panel immer in der richtigen Größe rüberkopiert wird?

Danke!
Angehängte Dateien
Dateityp: rar painttotest_190.rar (4,8 KB, 4x aufgerufen)
  Mit Zitat antworten Zitat