相同的表结构,共用同一窗体,通过一listview来选择表,代码如下,但因某一同名字段宽度不同导致无法输入和显示较宽的字段内容(100分)

  • 主题发起人 主题发起人 chenz
  • 开始时间 开始时间
C

chenz

Unregistered / Unconfirmed
GUEST, unregistred user!
相同的表结构,共用同一窗体,通过一listview来选择表,代码如下,但因某一同名字段
宽度不同导致无法输入和显示较宽的字段内容。

List_Item := ListView1.Selected.caption ;
Qry.SQL.CLEAR;
Qry.SQL.ADD('SELECT * FROM '+List_Item+' ');
Qry.SQL.ADD('ORDER BY id ');

UpDSql.InsertSQL.CLEAR;
UpDSql.InsertSQL.Add('INSERT INTO '+List_Item+' ');
UpDSql.InsertSQL.Add(' (id, Name ) ');
UpDSql.InsertSQL.Add(' VALUES ');
UpDSql.InsertSQL.Add(' (:id,:Name ) ');

UpDSql.ModifySQL.CLEAR;
UpDSql.ModifySQL.Add('UPDATE '+List_Item+' ');
UpDSql.ModifySQL.Add('SET ');
UpDSql.ModifySQL.Add('id = :id ,');
UpDSql.ModifySQL.Add('Name = :Name ');
UpDSql.ModifySQL.Add('WHERE id=:id ');

UpDSql.DeleteSQL.CLEAR;
UpDSql.DeleteSQL.Add('DELETE FROM '+List_Item+' ');
UpDSql.DeleteSQL.Add('WHERE id=:id ');

Qry.CLOSE;
Qry.Active :=True;
Qry.OPEN;
 
你可以在dataset的before post事件中检测啊
 
如何检测,如何用代码设置?
可变宽字段为QryName,具体为窗体上一dbeidit,和一DbGrid,
 
后退
顶部