Problem bei einer Verzweigung mit Boolean

[Lenwe]

Hallo ihr lieben Delphi-User :)

Ich bin ziemlich neu in der Materie und schon tritt ein Problem auf, welches mich zum verzweifeln bringt.
In meinem Programm besteht die Möglichkeit einen Text in ein Memofeld einzugeben. Dieser Text soll in einer Variablen zwischengespeichert werden und anschließen - bei Bedarf - wieder hervorgerufen werden.
Der Code lautet wie folgt:

Delphi-Quellcode:

procedure TForm1.ZwischenspeichernExecute(Sender: TObject);
begin
if Zwischenspeichern.Caption := 'Eingabe zwischenspeichern'
   then begin
         MeEingabe.Text:= Zwischen ;
         Zwischenspeichern.Caption:= 'Text wiederherstellen';
        end
   else begin
         Zwischen:= MeEingabe.Text ;
         Zwischenspeichern.Caption:= 'Eingabe zwischenspeichern' ;
        end;
end;

Zwischen ist meine Variable des Typs String.
Delphi beklagt sich beim if ( if Zwischenspeichern.Caption := 'Eingabe zwischenspeichern' ), dass der Ausdruck Boolean sein muss.
Habs über eine Variable versucht, doch das half leider auch nicht.

Ich bedanke mich jetzt schon für eure Hilfe

[inherited]

Statt ':=' ein '=' nehmen. := benutzt man bei Zuweisungen, das einfache = bei Abfragen ;)

[marabu]

Herzlich willkommen in der Delphi-PRAXiS, Lenwe.

Abgesehen von der Verwechslung der Operatoren für Zuweisung und Gleichheit scheint deine Logik auch noch nicht ganz zu stimmen.

Delphi-Quellcode:

procedure TForm1.ZwischenspeichernExecute(Sender: TObject);
begin
  if Zwischenspeichern.Caption = 'Eingabe zwischenspeichern' then 
  begin
    Zwischen:= MeEingabe.Text ;
    Zwischenspeichern.Caption:= 'Text wiederherstellen';
  end else 
  begin
    MeEingabe.Text:= Zwischen ;
    Zwischenspeichern.Caption:= 'Eingabe zwischenspeichern' ;
  end;
end;

Freundliche Grüße vom marabu

[Lenwe]

Ihr seid wirklich spitze! Schon was neues dazu gelernt :wink:
Ich bedanke mich sehr für eure sehr schnelle Hilfe. Jetzt nur noch den Memotext in eine Textdatei exportieren und mein Programm ist fertig. Danke euch :-D