Fehler in 2. Linie
Delphi-Quellcode:
Data^.URL := 'www.google.de';
ListBox1.AddItem (Data^.Name, Integer (Data)); // incompatible Types : Object and Integer !
Aber bis jetzt ist dieser Vorschlag diese Lösung :
Delphi-Quellcode:
procedure TForm1.ListBox1DblClick(Sender: TObject);
var
I:Integer;
begin
i := ListBox1.ItemIndex;
Webbrowser1.Navigate(ListBox2.Items.Strings[i]);
end;
Wie kann ich diesen Trik in TTreeview machen ?
In TTreeview gibt es leider
Parent und
Child.
Wie soll der Code oben sein, wenn ich statt ListBox, einen TTreeview nehme
Was mir bei TTreeview gefäht, man kann Icons dazu verwenden
http://users.iafrica.com/d/da/dart/D...ics/Levels.gif
Oder kann man auch bei ListBox genauso Icons hinzufügen ?