Einfach nur die Projektdatei bearbeiten:
(die mit "{}" markierten Zeilen sind neu)
Delphi-Quellcode:
Program Project1;
Uses Forms,
Unit1 in 'Unit1.pas' {Form1},
{} Dialogs;
Begin
{} If InputBox('Überschrift', 'Text', '') = 'Passwort' Then Begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
{} End Else MessageDlg('Falsches Passwort', mtError, [mbOK], 0);
End.
In die Projektdatei gelangst du über Menü / Projekt / Quelltext anzeigen.