Danke, Leute!!!!!
Mit dem Source von Helmi hat es jetzt funktioniert.
Zu haentschman: Ich habe doch eben schon gesagt, woran das Problem liegt, oder??!
Wenn XYZ eingegeben wurde, dann wird doch bei der Stelle
Delphi-Quellcode:
begin
if TextInput.text <> 'XYZ' then
begin
schon abgebrochen, weil die Serial ja nicht ungleich XYZ ist und somit wird die Stelle
Delphi-Quellcode:
if TextInput.text = 'XYZ' then
begin
ShowMessage ('True serial entered!!! You are very good!!!');
end;
niemals aufgerufen.
Und zu blawen: Auch wenn ich mir Delphi selbst beigringe und keine Ausbildung mache, werde ich in
Zukunft mehr auf sowas achten.
Viele Grüße
programmer021