S
seiko0001
Unregistered / Unconfirmed
GUEST, unregistred user!
我的FormCreate()如下
procedure TForm1.FormCreate(Sender: TObject);
begin
edit1.Color:=cl3DLight;
edit1.Enabled:=false;
Next.enabled:=False;
Back.enabled:=False;
Ok.enabled:=False;
mark:=1;
with DM.Query1 do begin
Close;
SQL.Clear;
SQL.Add('select YQGS_MC');
SQL.Add('from YQGS_CODE');
Open;
end;
end;
但将上面一段有关Query的程序放在在一个按钮的过程下，就可以执行！
请指教！
procedure TForm1.FormCreate(Sender: TObject);
begin
edit1.Color:=cl3DLight;
edit1.Enabled:=false;
Next.enabled:=False;
Back.enabled:=False;
Ok.enabled:=False;
mark:=1;
with DM.Query1 do begin
Close;
SQL.Clear;
SQL.Add('select YQGS_MC');
SQL.Add('from YQGS_CODE');
Open;
end;
end;
但将上面一段有关Query的程序放在在一个按钮的过程下，就可以执行！
请指教！