编译出错，能知道的么

Question

procedure TFormMain.NwxpxsClick(Sender: TObject);
begin
  try
    wxpxsform := Twxpxsform.Create(self);
    Wxpxsform.showmodal;
  finally
    Wxpxsform.free;
  end;
end;[Error] ZSmain.pas(396): '.' expected but ':=' found
[Error] ZSmain.pas(397): Undeclared identifier: 'showmodal'
[Error] ZSmain.pas(399): Undeclared identifier: 'free'有人知道怎么回事么？

Answer 1

变量wxpxsform是申明成什么类型的?

Answer 2

uses wxpxsform, tdhbtd,md5, usersz, modipass, ExportXssj, ExportTjjg；procedure TFormMain.NwxpxsClick(Sender: TObject);
begin
  try
    wxpxsform := Twxpxsform.Create(self);
    Wxpxsform.showmodal;
  finally
    Wxpxsform.free;
  end;
end;[Error] ZSmain.pas(396): '.' expected but ':=' found
[Error] ZSmain.pas(397): Undeclared identifier: 'showmodal'
[Error] ZSmain.pas(399): Undeclared identifier: 'free'上边的程序是在主菜单里，包含的一个窗口：wxpxsform，点击菜单的程序里，启动wxpxsform窗口下边是wxpxsform窗口开始的一段代码:
unit wxpxsform;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, StdCtrls, ExtCtrls, Grids, DBGrids, ADODB, DBCtrls;type
  Twxpxsform = class(TForm)
    GroupBox1: TGroupBox;
...........

Answer 3

uses wxpxsform, 老大wxpxsform 是一个.pas文件.不是class

Answer 4

不过还是没看到你wxpxsform 这个变量的声明
procedure TFormMain.NwxpxsClick(Sender: TObject);
var 
  wxpxsform:Twxpxsform;
begin
  wxpxsform := Twxpxsform.Create(self);
  try
    Wxpxsform.showmodal;
  finally
    Wxpxsform.free;
  end;
end;

Answer 5

wxpxsform 是一个.pas文件,但是在主菜单程序里边是用uses 引用进来萨，不过确实我没有在主菜单程序里边定义 var wxpxsform:Twxpxsform;一定要定义吗？我看见主菜单里其他打开窗口程序里边也没有定也相应的变量，那些程序也没出错，怎么回事呢?
加了var wxpxsform:Twxpxsform;编译通过了,但是有警告：
[Warning] ZSmain.pas(192): Variable 'wxpxsform' might not have been initialized

Answer 6

我试了一下 也不需要var wxpxsform：Twxpxsform;
会不会试你uses 书写错了？
你的FormMain内uses wxpxsform       //这个wxpxsform.pas的名称