Uses ShellApi;
procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(0,'OPEN','C:\MonFichier.txt',Nil,Nil,SW_SHOW); end;