Thema: Delphi Form.Repaint

Einzelnen Beitrag anzeigen

Benutzerbild von devnull
devnull

Registriert seit: 5. Okt 2003
362 Beiträge
 
Delphi 7 Personal
 
#1

Form.Repaint

  Alt 19. Mär 2004, 15:43
Hallo, wiedereinmal eine Frage:
Ich öffne während der Laufzeit meines Programms Bilder auf dem Formular (unten stehende Proze).
Wenn jetzt der Benutzer das Formular in den Hintergrund zieht oder ausserhalb des Bildschirm-Bereichs,
dann verschwinden diese "auf die Form" gezeichneten Bilder (selbiges bei Form.Refresh.
Wie kann ich jetzt in Form.Repaint; machen, dass die ganzen (das sind über 15 Bilder) wieder angezeigt
werden ????

Delphi-Quellcode:
procedure bmp_zeichnen (x,y : integer; name : string);
var NButton : TBitmap;
begin
    NButton := TBitmap.Create;
    try
      NButton.LoadFromFile (name);
      FAnwendung.Canvas.Brush.Bitmap := NButton;
      FAnwendung.Canvas.Draw(x,y,NButton);
    finally
      FAnwendung.Canvas.Brush.Bitmap := nil;
      NButton.Free;
    end;
end;
Bitte helft mir.
MFG
devnull
-- Never change a running system --
  Mit Zitat antworten Zitat