unit UnitLX;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;type
TForm1 = class(TForm)
cbb1: TComboBoxEx;
lst1: TListBox;
btn1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}
uses Unit1;procedure TForm1.FormCreate(Sender: TObject);
begin
with dtmdl1 do
begin
qry1.Close;
qry1.SQL.Clear ;
qry1.SQL.Add('select * from RIS_SRUDIES');
qry1.Open ;
end;
end;end.
运行后报错 图空间
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;type
TForm1 = class(TForm)
cbb1: TComboBoxEx;
lst1: TListBox;
btn1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}
uses Unit1;procedure TForm1.FormCreate(Sender: TObject);
begin
with dtmdl1 do
begin
qry1.Close;
qry1.SQL.Clear ;
qry1.SQL.Add('select * from RIS_SRUDIES');
qry1.Open ;
end;
end;end.
运行后报错 图空间
解决方案 »
- 统计算法,求解?
- 在xp sp2 下隐藏进程,那位大侠会呀?
- WIN ME下改怎样设置固定IP上网?
- 大家都来讨论一下吧!!!好奇怪的问题呀!!!!
- 请问几个东东是什么意思 我现在正在用
- 大家说说东软NEUSoft怎样?今天复试结束了,工作地点应该是大连,月工资可能是2200,不知道是不是应该签约。。。
- DELPHI的动态数组怎么这样的不好用?!!!
- 要开发一个项目,各位高手指点指点吧!
- WORD型整形怎么以2个字节放入内存流中?
- 关于独占与上锁的问题?????
- delphi Chart
- Delphi 7中Dll工程调用 Filestream.create(filename,fmcreate) 报错
把dtmdl1调在Form1的前面
我的描述可能让你产生了误解,我本意是dtmd1建立比form1晚所以资源不存在使用失败,又或者dtmd1确实比form1建立早,但有bug.