多表共用同一窗体是的问题，因某一同名字段宽度不同导致无法输入和显示较宽的字段内容(100分)

相同的表结构，共用同一窗体，通过一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;

高手快来呀，sos

根据选中的表动态设置每个列的宽度

-----
http://www.8421.org

此问题我已解决，用到sqlcoulmn

sqlcoulmn??????不明白。

打错了， sorry,应为：
Sqlcolumns