unit TestDLL;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, RzButton;type
  TForm1 = class(TForm)
    RzBitBtn1: TRzBitBtn;
    RzBitBtn2: TRzBitBtn;
    procedure RzBitBtn1Click(Sender: TObject);
    procedure RzBitBtn2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;procedure ShowDLLModalForm(aHandle:Thandle);
  stdcall external 'ShowForm.Dll';
procedure ShowDLLForm(aHandle:Thandle);
  stdcall external 'ShowForm.Dll';var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
  ShowDLLModalForm(Applicaton.Handle);
end;procedure TForm1.RzBitBtn2Click(Sender: TObject);
begin
  ShowDLLForm(Applicaton.Handle);
end;end.
[Error] TestDLL.pas(35): Undeclared identifier: 'Applicaton'
[Error] TestDLL.pas(35): ')' expected but identifier 'Handle' found
[Error] TestDLL.pas(40): Undeclared identifier: 'Applicaton'
[Error] TestDLL.pas(40): ')' expected but identifier 'Handle' found
[Fatal Error] UseDLL.dpr(5): Could not compile used unit 'TestDLL.pas'
我怎么样也不知道为什么出错,ShowDLLForm(Applicaton.Handle);?