Und du bist dir auch sicher, dass du dir die Form anschaust, die durch die in der Variablen
Form1
hinterlegten Referenz gemeint ist?
Könnte man z.B. so prüfen:
Delphi-Quellcode:
procedure TForm1.Button1_Click(Sender:TObject);
begin
if Form1 <> Self then
ShowMessage( 'Ey, ich bin gar nicht mit Form1 gemeint!' );
end;
Kaum macht man's richtig - schon funktioniert's
![Mr. Green](images/smilies/icon_mrgreen.gif)
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)