login i delphi

Hej eksperter...

Jeg er i gang med at lave et login i delphi. jeg har så et lille problem. jeg kan ikke få den til at køre som jeg gerne vil. men håber meget på at i vil hjælpe mig.

her et mit login kode...

procedure TForm4.Button1Click(Sender: TObject);
begin
if ADOTable1.Locate('user',edit1.Text,[])=true then
  begin
    if adotable1.Locate('pass',edit2.Text,[])=true then
      begin
        Form6.caption:=('Velkommen til Administrator - ',adotable1.FieldByName('navn').AsString);
        form6.show;
        form2.WindowState:=wsminimized;
        close;
      end
      else
      showmessage('Dit Kodeord er forker');
  end
  else
  showmessage('Dit Bruger ID er forkert');
end;

problemet ligger i denne linie....

Form6.caption:=('Velkommen til Administrator - ',adotable1.FieldByName('navn').AsString);

vil gerne have den til at skrive det sådan her...

Velkommen til Administrator - også dit fulde navn her