Benutzerdaten im Memo

[Störtebeker]

Hallo,

zum meinem Vorhaben: ich würde gerne für mein Programm noch so eine Art Konsole basteln, mit der man halt bestimmte Funktionen im Programm ausführen kann. Nun soll aber beim Aufruf der Konsole (wahrscheinlich ein Memo) zu allererst die Benutzerdaten (Name, Passwort) abgefragt werden. Für die Programmanmeldung verwende ich Editfelder, wie im folgenden Quelltext ersichtlich:

Delphi-Quellcode:

procedure Tlogin.Button1Click(Sender: TObject);
  var Ini: TIniFile;
begin
  Ini:=TIniFile.Create(ExtractFilePath(ParamStr(0))+'us44.tyif');
  try
  if
  (LabeledEdit1.Text=Ini.ReadString('User','Name','')) AND
  (LabeledEdit2.Text=Ini.ReadString('Password','Password',''))
  then begin
  Form1.show;
  login.hide;
  Form18.showmodal;
  end
  else begin
  Form10.showmodal;
  LabeledEdit1.Text:='';
  LabeledEdit2.Text:='';
  end
  finally
  FreeAndNil(Ini);
  end;
end;

Wie schaffe ich das jetzt aber beim Memo ohne Editfelder? Wie zum Beispiel im folgenden Bild:
Bild

[himitsu]

ReadOnly auf True
und dann über OnKeyPress oder OnKeyDown Tasteneingaben anfangen ... eingegebenen Tasten werden dann, wenn im sich deine "Konsole" im "EingabeModus" befindet, hinten drangehängt.