Mein Programm weiß ja gar nichts von dem Passwort ! Das ist in der Datenbank abgespeichert. Ist auch gut so für Disassemblierer oder sonstige dunkle Gestalten.
Ich muß also so oder so eine
Exception abfangen. Habe es jetzt so ähnlich wie Minz gemacht:
Delphi-Quellcode:
with pFIBBackupService1
do begin
try
ServerName := ServerE.Text;
LoginPrompt := False;
Params.Add('
user_name='+UserE.Text);
Params.Add('
password='+PasswordE.Text);
Active := True;
weiter := true
except
raise exception.create('
KEINE ZUGRIFFSRECHTE');
end;
Ja und die Schleife ist auch weg. 8)