procedure TForm1.DBGrid1TitleClick(Column: TColumn); begin showmessage('您点的标题栏值为:'+column.FieldName) end;
为什么query1.sql.add('select * from student order by '+column.FieldName)没有把column.fieldname的值取出来,而附一个变量就可以? var str str:=column.fieldname; query1.sql.add('select * from student order by '+str);还有个问题:程序运行一次两次以后就出现错误: Exception EDBEngineError in module Project1.exe at 00083612 Insufficient memory for this opration Alias:DBDEMOS 我用的是盗版Delphi 5.0 bulid 5.62+win2000,
有时还出现错误: Project Project1.exe raised exception Class EDBEngineError with message 'Insufficient memory for this operation. Alias:DBDEMOS'.Process stopped.Use step or Run to continue. 请问如何解决?
begin
showmessage('您点的标题栏值为:'+column.FieldName)
end;
var str
str:=column.fieldname;
query1.sql.add('select * from student order by '+str);还有个问题:程序运行一次两次以后就出现错误:
Exception EDBEngineError in module Project1.exe at 00083612
Insufficient memory for this opration
Alias:DBDEMOS
我用的是盗版Delphi 5.0 bulid 5.62+win2000,
Project Project1.exe raised exception Class EDBEngineError with message 'Insufficient memory for this operation. Alias:DBDEMOS'.Process stopped.Use step or Run to continue.
请问如何解决?
Delphi有内存泄漏的问题,真头疼!