ADO 与 findcomponent 的问题-CSDN论坛

⋅求一SQL语句 ⋅cxSpreadSheetBook的问题：自作聪明 ⋅ADO 与 findcomponent 的问题 更多帖子 关注私信空间博客 darkliu 本版专家分：8634 结帖率 100%: FieldByName('informationtype').AsString :=TEdit(findcomponent('Edit' + IntToStr(i))).Text;
数据总是添加不进去，是空值；

而采用
s[i]:=TEdit(findcomponent('Edit' + IntToStr(i))).Text; //s[i]为一字符串数组
FieldByName('informationtype').AsString :=s[i];

却可以。
why？

0 2007-08-06 11:49:11

回复数 2 只看楼主引用举报楼主

⋅散分喽~~~ ⋅升级当爸爸了，散分 ⋅要过年了，给D版忙了一年的兄弟们发点响 :) 更多帖子 关注私信空间博客 hongqi162 本版专家分：83323 进士 2007年总版技术专家分年内排行榜第九 铜牌 2007年7月总版技术专家分月排行榜第三 红花 2007年9月 Oracle大版内专家分月排行榜第一 2007年7月 Oracle大版内专家分月排行榜第一 2007年6月 Oracle大版内专家分月排行榜第一 2008年7月 Delphi大版内专家分月排行榜第一 2008年3月 Delphi大版内专家分月排行榜第一 2008年2月 Delphi大版内专家分月排行榜第一 2007年12月 Delphi大版内专家分月排行榜第一 2007年11月 Delphi大版内专家分月排行榜第一 2007年10月 Delphi大版内专家分月排行榜第一 2007年9月 Delphi大版内专家分月排行榜第一 2007年7月 Delphi大版内专家分月排行榜第一 2007年6月 Delphi大版内专家分月排行榜第一 2007年4月 Delphi大版内专家分月排行榜第一 2007年1月 Delphi大版内专家分月排行榜第一 黄花 2009年5月 Delphi大版内专家分月排行榜第二 2007年8月 Oracle大版内专家分月排行榜第二 2007年4月 Oracle大版内专家分月排行榜第二 2008年1月 Delphi大版内专家分月排行榜第二 2007年8月 Delphi大版内专家分月排行榜第二 2007年5月 Delphi大版内专家分月排行榜第二 2007年3月 Delphi大版内专家分月排行榜第二 2007年2月 Delphi大版内专家分月排行榜第二: --
create table table1( cname varchar2(100));
--
self.ADODataSet1.Close;
self.ADODataSet1.CommandText:='select * from table1';
self.ADODataSet1.Open;
self.ADODataSet1.Append;
self.ADODataSet1.FieldByName( 'cname' ).AsString:=TEdit( findComponent( 'edit1' ) ).Text;
self.ADODataSet1.Post;

--执行查询
select * from table1
--
Edit1

0 2007-08-06 11:58:57

只看TA 引用举报 #1 得分 0

⋅求一SQL语句 ⋅cxSpreadSheetBook的问题：自作聪明 ⋅ADO 与 findcomponent 的问题 更多帖子 关注私信空间博客 darkliu 本版专家分：8634: 若只执行
FieldByName( "informationtype ").AsString :=edit1.Text;
也没问题

0 2007-08-06 15:37:14

只看TA 引用举报 #2 得分 0

ADO 与 findcomponent 的问题 [问题点数：0分，结帖人darkliu]