[Alegun]

Код:

...
title[i].OnClick:= MyClick;
...
Procedure TForm1.MyClick(Sender:TObject);
begin
ShellExecute (Handle, 'open', 'C:\file.doc', nil, nil, SW_SHOWNORMAL);
end;