uses ShellApi

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute( 0, Nil, PChar('c:\MonFichier.txt'),Nil, Nil, SW_NORMAL );
end;