Thema: Delphi Anfängerhilfe Labyrinth

Einzelnen Beitrag anzeigen

skaot

Registriert seit: 18. Nov 2008
8 Beiträge
 
#10

Re: Anfängerhilfe Labyrinth

  Alt 19. Nov 2008, 18:56
Zitat von Corpsman:


Delphi-Quellcode:
var b:Tbitmap;

Procedure Tform1.OnKeyIrgendwas(..);
begin
b.canvas.rectangle(-1,-1,clientwidth+1,clientheight+1);
with b.canvas do begin

(*
Der Ganze Alte Code
*)



// Am Schluss
form1.canvas.draw(0,0,b);
end;
Dann flackert nichts mehr.
Mhh das sagt der mir was vonwegen Zugriffsverletzung.
  Mit Zitat antworten Zitat