TImage-Instanz wieder freigeben

[ThorZten]

Hallo, ich möchte folgendes realisieren:

Ich erzeuge ein Image und möchte dieses entweder durch darauf klicken oder durch Fokuswechsel wieder freigeben.

Mein bisheriger Quellcode:

Delphi-Quellcode:

var  myimage:TImage;
...

procedure TForm1.myclick(Sender: TObject);
begin
  myimage.Free;
  myimage.Destroy;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  myimage:=Timage.create(nil); 
  With myimage Do
  Begin
    parent := Form1;
    autosize:=true;
    OnClick:=myclick;
    myimage.Picture.LoadFromFile('C:\bild.jpg');
  End;
end;

Sobald ich nun aber auf das erzeugte Bild klicke und meine Procedure "myclick" aufgerufen wird, erhalte ich den Fehler "Abstract Error". Was mache ich falsch? Wenn ich nämlich einen zweiten Button einfüge, der das gleiche tut funktioniert dies ohne Probleme. So möchte ich es aber eben nicht haben:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  myimage.Free;
  myimage.Destroy;
end;

Und zur anderen Sache: Gibt es dann noch eine Möglichkeit, wenn ich den Focus von meinem Bild entferne, dieses dann ebenfalls freizugeben? Ein "OnFocusChange" o.ä. finde ich nicht...

Vielen Dank schon einmal,
Thorsten