Цитата:
Сообщение от Alegun
Код:
...
title[i].OnClick:= MyClick;
...
Procedure TForm1.MyClick(Sender:TObject);
begin
ShellExecute (Handle, 'open', 'C:\file.doc', nil, nil, SW_SHOWNORMAL);
end;
|
Большое СПАСИБО!
Я, просто, думал код загнать в одну строку, а получается, что для реализации этого вопроса нужно сделать свою процедуру для клика