[Delphi]Płótno-kontynuacja z 02.11.02

I niestety dalej nic... Ta procedura wywolana z onTimer nie dziala:
procedure TForm1.rysuj;
var bitmap: Tbitmap;
begin
bitmap := Tbitmap.Create;
try
bitmap.LoadFromFile('d:\moje dokumenty\obrazek.bmp');
Form1.canvas.Free;
Form1.canvas.Draw(0,0, bitmap);
finally
bitmap.Free
end;
end;

Po prostu na formie dalej jest obrazek wywolany z onPaint programu... Zastrzegam, ze jesli wywolam te forme z buttona to wtedy dziala...

pozdr.
Y@siu

A dlaczego zwalniasz obiekt Canvas ? Dziwię się, że nie dostałeś Violetty (Acces Violation ;) ) po uruchomieniu czegoś takiego.

za komentuj linijkę Form1.Canvas.free;

pozdro {hello} --Michał
TJS group
delphi 5,6
" Praktyka - to jest wtedy gdy wszystko działa lecz nikt nie wie dlaczego
Teoria - jest wtedy gdy nic nie działa ale wszyscy wiedzą dlaczego,
My łączymy teorię z praktyką
NIC NIE DZIAŁA I NIKT NIE WIE DLACZEGO "