如何打开Windows已经注册的文件如:README.TXT

Question

shellexecute(handle,'open',pchar('c:\readme.txt'),nil,nil,sw_normal)

Answer 1

还是错:
[Error] Unit2.pas(29): Undeclared identifier: 'shellexecute'
[Fatal Error] Project3.dpr(5): Could not compile used unit 'Unit2.pas'
原文如下:
-------------------------
unit Unit2;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
begin
shellexecute(handle,'open',pchar('c:\sender.ini'),nil,nil,sw_normal);
end;end.

Answer 2

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls,shellapi;
要加个shellapi，shellexecute的定义在那里面