Enter drücken soll zwei versch. Sachen machen

[Tobicaster]

Also die Variable wird schon zum richtigen Zeitpunkt auf true gesetzt. Allerdings klappt das beenden mit der Entertaste und das damit verbundene zurücksetzen nicht.

Delphi-Quellcode:

procedure TForm1.EEditKeyPress(Sender: TObject; var Key: Char);
begin
  if not LauftextActive then
    begin
      if key = #13 then
      begin
      key := #0;
      LauftextActive := true;
      BStartClick(Sender);
      end;
    end;
end;

Wie kann nun weiter vorgehen? Mit else scheint es nicht zu klappen