PW-abfrage mit Schleife und ohne Button

[Spike2k3]

Zitat von Christian Seehase:

PruefeDieEingabe(Edit1.Text)

Genau das hier bereitet mir noch schwierigkeiten, der Rest ist klar...
Ich hab mal if bla=bla probiert, aber dann klappts nich ;'(

Delphi-Quellcode:

procedure Edit1Change(Sender: TObject); 
begin 
  if Edit1.text = 'LOL' then
  begin 
    Image1.Picture.LoadFromFile ('C:\Programme\BitTorrent\green.ico');
  end; 
end;

So sieht das grad beim mir aus...