Uses ShellApi;

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