Announcement

Collapse
No announcement yet.

TTreeView als Auswahlmenü zum Öffnen weiterer Forms

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • TTreeView als Auswahlmenü zum Öffnen weiterer Forms

    Hallo zusammen,

    bin eine Delphi-Neuling. Brauche dringend Hilfe bei der TTreeView Komponente. Möchte die Komponente zum Öffnen von Formularen nutzen.
    Ich stelle mir folgende Benutzung vor: Es gibt mehrere Einträge, unter anderem z.B. Kunden Stammdaten. Wenn der Benutzer nun auf diesen Eintrag klickt, soll das Formular Kundenstammdaten öffnen. Wie stelle ich so etwas an. Über Hilfe oder sogar Sourcecode wäre ich riesig erfreut.

    Vielen Dank im voraus

  • #2
    Erst mal kein Multiposting. Damit gehst du den Leuten auf den Sack

    Comment


    • #3
      Hallo,

      hier mal ein Möglichkeit, wie man einfach und polnisch auch zum Ziel kommen kann.

      procedure TForm1.Machwas;
      var
      myNr : integer;
      myValue : string;
      begin myNr:=Treeview1.Items.Owner.Selected.Index;
      myValue:=Treeview1.Items.Item[nr].Text;
      if myValue = 'Kontakt' then Kontakt.ShowModal;
      if myValue = 'Kunde' then Kunde.ShowModal;
      end;

      Du liest also einfach nur den Namen aus und weist ihm, wenn er das ist, was er sein soll, eine Anweisung zu. In diesem Fall würde das Formular Kontakt geöffnet werden, wenn denn das angeklickte Node die Beschriftung 'Kontakt' hätte.

      Es gibt sicher wesentlich elegantere Methoden, aber so ist´s vielleicht für den Anfang verständlicher. Du könntest es auch mit FindComponent machen, um Dir den ganzen if-Kram zu ersparen.

      Versuchs mal damit
      To

      Comment

      Working...
      X