[Delphi] Logowanie do programu

Mam kilka pytań:
1)Jak można zrobić,a by po otworzeniu programu pokazywało się okienko z prośbą o podanie loginu i hasła.
2)Jak podczas działania programu dodawać nowych użytkowników tak aby po jego zamknięciu można się było na nich zalogować
3)Jak można nałożyć restrykcję na użytkownika (np. nie dać mu dostępu do paska narzędzi)
Bardzo proszę o pomoc za ktorą z góry dziękuję. Pozdrawiam

Ad1.

procedure TForm1.FormCreate(Sender: TObject);
var
Haslo:String;
begin
Haslo:=InputBox('Logowanie','Podaj Hasło:','');
If Haslo='12345' then
begin
ShowMessage('Danke!');
Form1.Show;
end
else
begin
ShowMessage('BŁĄD!');
Form1.Hide;
end;
end;

To bedzie stałe jeśli chcesz mieś zmiene to wczytuj z pliku. ;-)

Ale to będzie tylko hasło jeśli chcesz i login to zrób osobmną formę.

Właśnie też chciałem tak zrobić,To co teraz pokazałeś to to ja sam zrobiłem.Ale jak zrobić żeby hasła i loginy byłe przehowywane w pliku.I można było z poziomu delphi dopisać do tego plik uzytkownika

To użyj rekordów: :-P
np.
type
TBazaUsr = record
Nick:string[255];
Haslo:integer;
end;
itd...

Możesz napisać dokładniej bo nie rozumiem ???