小博士张,给各大富恩(ong)出个难题! .Fieldbyname('aa').asString!(100)

  • 主题发起人 主题发起人 www.ynxbs.com
  • 开始时间 开始时间
W

www.ynxbs.com

Unregistered / Unconfirmed
GUEST, unregistred user!
Q.FieldBYName('aa').asString如何进行改造Delphi,我写成 :Q.FF('aa').asString ,Delphi 也兼容!
 
重写TDataSet
 
不知所云..改造delphi???哎..
 
你改写下啊,我做了,不成功
 
只是把方法名变过,怎么不可能.
 
简单的,继承个新类。自己写个方法就OK了。
 
有几种方法1. 还是用FieldByName2. 改写VCL的TDataSet类,增加新方法FF,FF里再调用FieldByName3. 写继承的新类,再替换你用类建议你用第1种方法安装一个Delphi专家,将"FF("都找出来,再全部替换当然喽,先备份哦
 
2. 改写VCL的TDataSet类,增加新方法FF,FF里再调用FieldByName 改写DB.PAS 文件,添加该方法,没有反映哦!
 
在工程文件里面添加DB in 'D:/..../DB.pas''D:/..../DB.pas'为修改过的的单元文件路径
 
真是闲的无聊啊!
 
Q.FieldBYName('aa').asString如何进行改造Delphi,我写成 :Q.FF('aa').asString ,Delphi 也兼容! varFF:FieldByName类型函数; begin @FF:=@@FieldByName; showmessage(Q.FF('aa').asString); end;
 
多人接受答案了。
 
后退
顶部