unit Unit6;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids;type
  TForm6 = class(TForm)
    Query1: TQuery;
    DataSource1: TDataSource;
    GroupBox1: TGroupBox;
    DBGrid1: TDBGrid;
    Label1: TLabel;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Button4: TButton;
    Button5: TButton;
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button5Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form6: TForm6;implementation{$R *.dfm}
uses
unit9,Unit10;                     //update是在unit10;procedure TForm6.Button2Click(Sender: TObject);
begin
   new1.show;
end;procedure TForm6.Button1Click(Sender: TObject);
var
  sqlstr:string;
begin
  sqlstr:='select * from umessage';
   Query1.SQL.Clear;
  Query1.SQL.Add(Sqlstr);
  Query1.ExecSQL;
  Query1.open;
end;procedure TForm6.Button3Click(Sender: TObject);
begin
   update.show;      //这里出错了,update这个窗口打不开!!怎么回事呢?大家帮我看下呀!!
//   close;
end;procedure TForm6.Button5Click(Sender: TObject);
begin
  close;  
end;procedure TForm6.Button4Click(Sender: TObject);
begin
  close;
end;end.他的提示是:
[错误] Unit6.pas(59): Record, object or class type required
[致命错误] Project1.dpr(14): Could not compile used unit 'Unit6.pas'
怎么突然这个update.show就不能用了呢?谁知道呀,快帮我看看呢~~谢谢阿

解决方案 »

  1.   

    update.show;===>Unit10.update.show;//加上单元调用试试
      

  2.   

    你的Update是Unit10单元窗体的名字吧!不可以这样的,因为Update默认是Controls单元中TWinControl类的一个方法;改法一:
    Unit10.update.show;改法2:
    重新命名Update,改成其它名字
      

  3.   

    update 是另一个窗体吧? 问题是它有没有被创建?
      

  4.   

    是不是没有创建?比如update是窗体的名可以这样写
    Tupdate.create(nil).show;
      

  5.   

    谢谢大家,问题解决了!!哈~
    update应该是不应该这样命名的~