Помогите с TreeView и PuupMenu слить код!

[KWN, lnc]

как сделать следующее...
у меня Treeview. в нем список, скажем...

Программы
Игры
Прочее

и к нему прикреплен PoupMenu1

и в PoupMenu1 список

GTA
Counter Strike
Need For Speed

в этих списках GTA, Counter Strike и Need For Speed

код"ы"... скажем

GTA - FileOpen('C:\Game\GTA.txt', SW_SHOWNORMAL);
Counter Strike - FileOpen('C:\Game\Counter_Strike.tx t', SW_SHOWNORMAL);
Need For Speed - FileOpen('C:\Game\Need_For_Speed.tx t', SW_SHOWNORMAL);

ВОПРОС!!!

в treeview я выбераю скажем...

Игры, шелкаю правой кнопкой мыши и в PoupMenu1 я выбераю Counter Strike
и в списке TreeView у меня создается под раздел Counter Strike С его кодом!!!
и получается примерно так...

Программы
Игры
- Counter Strike
Прочее

и + сам код т.е. FileOpen('C:\Game\Counter_Strike.tx t', SW_SHOWNORMAL);

[KORN]

обрабатывай следующим образом:

procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
  if (TreeView1.Selected<>nil) and (fileexists('C:\Game\'+TreeView1.Selected.Text)) then
  FileOpen('C:\Game\'+TreeView1.Selected.Text, SW_SHOWNORMAL);
end;

вот и будет тебе проверка на твои файлы

[KWN, lnc]

глубоко извиняюсь что ненаписал сразу...
прикол в том что...

в PoupMenu1 в списке

GTA
Counter strike
Need for Speed

не обязательно коды

FileOpen ('C:\Game.txt', SW_SHOWNORMAL);

там может быть код и такой

ShellExecute(Application.Handle, Pchar('Open'),
Pchar('C:\lasGO.exe'), Pchar('KNW, lnc'),
'',SW_SHOWNORMAL);

как мне дублировать так сказать код???

[KORN]

тогда содай ini файл в котором в зависимости от выбранного пункта меню, смотри ini файл, так же можешь из него и загружать все меню...

структура ini файла:
Name_1=GTA
Path_1=C:\Game.txt
Name_2=Counter strike
Path_2=C:\lasGO.exe

[KWN, lnc]

ПОЖАЛЙСТА ДАЙТЕ ИСХОДНИК!!! КОДИНГ!!!