Warum eigentlich try...except hier?
Delphi-Quellcode:
if Form1.Label1.Caption <> 'Administrator' then
begin
try
// Code ausführen, der try...except braucht.
except
// Mach hier auch irgendwas
end;
end
else
ShowMessage('Fehler!');
Fände ich sinnvoller.