Wie kann ein Button sich selbst freigeben?

[Neutral General]

Ja, aber du musst einen Pointer auf einen String bzw halt einen PChar übergeben:

Delphi-Quellcode:

Procedure TMyForm.ButtonClick (Sender : TObject); 
var
  S: String;
Begin 
  S := 'hallo';
  PostMessage(Handle,WM_DESTROYPANEL, Integer(@S[1]), 0); 
End;

Procedure TMyForm.CMDestroyPanel(Var Msg : TMessage);
Begin
  FreeAndNil (ThePanel);
  ShowMessage(PChar(Msg.WParam));
End;

Wobei ich nicht weiß, ob es funktioniert wenn die Stringvariable lokal ist. Aber probiers einfach mal aus.