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
    Hallo,

    über <b>Selected.Text</b> kann man im eigenen Programm die Beschriftung des TreeView-Eintrages ermitteln, auf den der Benutzer geklickt hat. Der folgende Auszug aus einem Beispielprojekt aus meinem Buch <i>InterBase Datenbankentwicklung mit Delphi</i> demonstriert dies:

    <pre>

    { Ein Projekt wird aus dem TreeView über einen Mausklick
    ausgewählt. Der angezeigte TreeView-Text wird ausgelesen.
    Immer dann, wenn nicht der Name "Projekte" vorgefunden wird,
    muß der Anwender ein archiviertes Projekt ausgewählt haben.
    In diesem Fall wird die Dateiendung ".DPR" angehängt und
    dieser Eintrag in der Datenbank gesucht. }

    procedure TFormMain.TreeViewProjectClick(Sender: TObject);
    var
    sProName : String;
    begin
    if (Sender is TTreeView) then
    begin
    with Sender as TTreeView do
    begin
    if Selected = nil then
    Exit;
    sProName := Selected.Text;
    if not (sProName = 'Projekte') then
    DM.FindProject(sProName + '.DPR');
    end;
    end;
    end;

    </pre>

    P.S: Ich habe die Frage auch noch in zwei weiteren Ordnern gefunden. Es ist besser, eine Frage nur einmal zu stellen und erst dann auf andere Ordner auszuweichen, wenn die Frage innerhalb von Tagen nicht beantwortet wird

    Comment

    Working...
    X