变量赋值问题(50分)

  • 主题发起人 主题发起人 wglifs
  • 开始时间 开始时间
W

wglifs

Unregistered / Unconfirmed
GUEST, unregistred user!
数据结构如下:<br>Item &nbsp; &nbsp;DateCode &nbsp; &nbsp;Remark<br>1 &nbsp; &nbsp; &nbsp; 0801001 &nbsp; &nbsp; Abc<br>2 &nbsp; &nbsp; &nbsp; 0801002 &nbsp; &nbsp; Def<br>3 &nbsp; &nbsp; &nbsp; 0801003 &nbsp; &nbsp; Ghi<br>&nbsp; &nbsp; &nbsp; .......<br>数据的行数不能确定,但不会超过10行.<br>请问怎样才能把这些数据赋值给变量Item01,Item02.....DateCode01,DateCode02....
 
什么意思
 
不晓得是啥意思?<br>数据结构如下:<br>Item &nbsp; &nbsp;DateCode &nbsp; &nbsp;Remark<br>1 &nbsp; &nbsp; &nbsp; 0801001 &nbsp; &nbsp; Abc<br>2 &nbsp; &nbsp; &nbsp; 0801002 &nbsp; &nbsp; Def<br>3 &nbsp; &nbsp; &nbsp; 0801003 &nbsp; &nbsp; Ghi<br>&nbsp; &nbsp; &nbsp; .......<br>是不是文件里的数据结构?<br>是不是在程序中读出来,结果是:<br>item01=1<br>datecode01=0801001<br>remark01=abc<br>//----------------------------<br>如果是文件里的数据,你可以先读出来,然后做个判断就可以了;根据空格判断,或者根据字符数判断,我看你行数不超过十行,应该很容易
 
不知所云...<br>中国人的文言文水平越来越高了...
 
if ADataset1.recordcount &gt; 0 then<br>item01 := adataset1.fieldbyname('item01').asstring;<br><br>adataset1.next; //下一行<br>if ADataset1.recordcount &gt; 1 then //或者 if not adataset1.eof then<br>item02 := adataset1.fieldbyname('item02').asstring;<br>....<br>没有什么简便的方法<br>我想你就是想要简便的方法吧<br>多个字段的话,begin &nbsp;.. end 中写取值语句<br><br>另外一种方法 可以用链表/多个tstringlist (基本可以保存所有数据类型)
 
不知其意,樓主哪去了。怎麽不出來講解一下呢。難道說是自己解決了?
 
是不是行转列问题
 
就是bsense讲的那个意思,我以为大家有什么好的方法呢?只好用这个笨方法了。大家接分了。
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
915
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
754
SUNSTONE的Delphi笔记
S
后退
顶部