Also den Fehler hat jetzt sogar mein Cousin gefunden und der hat noch nie Programmiert.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
test := TTest.create;
test.free;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
test.ShowString;
end;
Das kann so nicht funktionieren. In Button1Click erzeugst Du die Variable Test, gibst sie aber auch gleich wieder frei.
Das heißt, wenn Du Button2 anklickst ist Test schon längst wieder freigegeben.