ButtonClick - 2 Aktionen

[Micha]

Erstmal sorry, für den schwer verständlichen Titel.
Ich habe eine Frage. Wahrscheinlich ganz simple, aber ich komm nicht drauf.

Wenn ich einen Button drücke, soll ein Memo-Feld erscheinen, klick ich nochmal auf den Button, so soll das Memo-Feld wieder verschwinden.

Ich hab echt keine Ahnung.

Dankeschön im Voraus.

[LoL]

machs mit ner boolean variable
oder frag ab das memo existiert

[Micha]

ich würde es gerne über die Variable lösen, hab aber davon leider keine Ahnung.
Kannst du mir helfen?! Bitte.

[neolithos]

noch ne andere möglichkeit

Delphi-Quellcode:

procedure TForm1.ButtonClick1(*bla*)
begin
  Memo1.Visible := not Memo1.Visible;
end;

[Micha]

Klasse. Passt.

Danke dir.

[Deven]

variablen variante wäre gewesen

Button klicken

Delphi-Quellcode:

if x = 0
 then
  begin
   Memo erstellen;
   x := 1;
  end
 else
  begin
   Memo löschen;
   x := 0;
 end;

Gruss Deven

[Die Muhkuh]

Oder hier noch eine ganz blöde methode! geht aber auch!

Delphi-Quellcode:

procedure TForm1.button1click (Sender: TObject);
var
  a: integer;
begin
  inc(a);
    if a = 1 then
      Memo1.visible := true;
    if a = 2 then 
      Memo1.visible := false;
    if a > 1 then
      a := 0
end;

Ist zwar blöde aber auch eine alternative!

[schneegurke]

Das ist aber wirklich sehr unsauber, denn eigentlich wird die Variable a sobald die Prozedur Button1Click durchgelaufen ist aus dem Speicher entfernt. Das heisst beim zweiten Klick auf den Button ist a nicht mehr die gleiche Variable, wie beim ersten Klick. Es wird zwar wahrscheinlich in den meisten Fällen funktionieren, aber sollte mal ein Programm genau den Speicher belegen den die Variable vorher hatte, dann hast du ein Problem. Naja in dem Fall ist es wohl weniger ein Problem, aber das ganze funktioniert dann einfach net mehr.

Achja und ausserdem ist a auch gar nicht initialisiert, sollte man sicherheitshalber immer machen!


Eine Lösung für das ganze wäre a als globale Variable zu deklarieren.

[Pseudemys Nelsoni]

der jenige der das mit dem not visible geschrieben hat, hatte schon das beste.

[Micha]

Ja, neolithos Visible ... ist wirklich am elegantestens.

Hab noch was:
Ich möchte, dass sich der Button auch ändert. D.h., dass es ein anderer Button erscheint, bzw. sich das Glyph des Buttons ändert.

Ist das möglich.