为什么刚做的时候可以运行,重新打开后就不行呢?(50分)

  • 主题发起人 主题发起人 无题
  • 开始时间 开始时间

无题

Unregistered / Unconfirmed
GUEST, unregistred user!
我做了一个小程序,主要代码如下:
procedure TForm1.FormCreate(Sender: TObject);
begin
table1.Open;
try
table1.GetFieldNames(combobox1.items);
finally
table1.close;
end;
end;
procedure TForm1.ComboBox1Change(Sender: TObject);
const sqlstring='select * from user order by %s';
begin
with query1 do
begin
close;
sql.Clear ;
sql.add(format(sqlstring,[combobox1.items[combobox1.itemindex]]));
open;
end;
end;
为什么第一次时可以,而关掉后重新打开提示如下错误:
[Error] format.pas(48): '.' expected but '(' found
[Error] format.pas(48): Ordinal type required
请问为什么?

 
先查一下Format.pas在什么地方,D5中不应该有它,可能是什么DPK搞的鬼吧,把它卸掉!
 
我format.pas时放在与delphi不同的盘下,我试着放了几个目录,都不行,另外dpk是怎回事!
 
提示出错时是说哪条语句有问题?
 
可能是FORMAT.Pas中有什么定义与你用的Delphi函数同名了,要消除它的影响,就应该把它
从DELPHI的组件库中卸掉。在这里它是不需要的。是不是你第一次成功编译后,又装了什么
控件库?从Components->instsll Packages中找到它,卸掉后,再重编译试试
 
提示在sql.add(format(sqlstring,[combobox1.items[combobox1.itemindex]]));中的
第二个(.
 
可能是format被重载了?
 
昨天下午,我重新试了一下,可能跟命名有关!本来行的程序我把它的名字改为format后也不行了!
 
后退
顶部