Registriert seit: 2. Mai 2005
Ort: Marl
63 Beiträge
Delphi 2005 Professional
|
Re: Mehrere Kontextmenüs ein einem TreeView
20. Jun 2005, 20:08
Versuche es mal so:
Delphi-Quellcode:
if Node.Level=0 then
begin
TreeView1.PopupMenu:=PopupMenu1;
end
else
begin
if Node.Level=1 then
begin
TreeView1.PopupMenu:=PopupMenu2;
end
else
begin
TreeView1.PopupMenu:=PopupMenu3;
end;
end;
Diesen Code gibst Du in eine Routine für das Ereignis "OnGetSelectedIndex" des Treeview ein.
Lars Tiefland Live Long And Prosper,
Lars Tiefland
admin at GBS, a Mod for STEF2, New mod versions and support!
Download Opera 8
|