Moin Zero,
ich hatte mir einen TreeView (TTreeView) und ein Memo (TMemo) auf's Formular gelegt.
Dann dem Treeview zwei Einträge verpasst, eben Info und Proxy, und dann im OnChange diesen Code eingetragen:
Delphi-Quellcode:
begin
// _rsText1 := 'test';
// _rsText2 := 'teeeest';
If Node<>Nil then
begin
if Node.Text = 'Info' then
Memo1.Text := 'teeeeeeeeeeeest';
begin // ***
if Node.Text = 'Proxy' then
Memo1.text := '2ter TEEEEEEST';
end; // ***
end;
end;
Keine Probleme.
Vielleicht kann's nochmal jemand mit D6 probieren.
BTW: Lass' mal die mit // *** markierten Zeilen weg. Ein begin/end an der Stelle stört zwar nicht, aber hat irgendwie auch keinen Nutzen.