1:
2:
3:
4:
5:

Passwort:='Wurde abgebrochen!';
Passwort := InputBox('Passwort erwartet!', 'Bitte hier das Passwort eingeben!'+#13#10+
                                          'Sonst gehts hier nicht weiter!:', Passwort);
if Passwort='Wurde abgebrochen!' then
   Application.Terminate;                    

1:

If MyInteger = 0 then ......                    

1:
2:
3:
4:
5:
6:

Form
...
var
  erfolgreichEingeloggt:boolean;
begin
//hier folgen dann Deine Prozeduren                    

1:
2:
3:
4:
5:
6:
7:
8:
9:

if erfolgreichEingeloggt then
           begin
           //und hier macht er dann was Du im Fall des erfolgreichen Einloggens direkt machen (lassen) möchtest
           end
{und evtl. noch:}
        else
           begin
           //und hier dann eben noch evtl. die neue Passwort-Eingabe-Aufforderung
           end;