adminpsq请进。(200分)

  • 主题发起人 主题发起人 takashiki
  • 开始时间 开始时间
T

takashiki

Unregistered / Unconfirmed
GUEST, unregistred user!
请在此提出你要问的问题。顺便散200分,嘿嘿。
 
想多请教,加我QQ好吗,330930343
 
for i:=0 to adotable1.RecordCount do
begin
If a >= 5 Then
begin
i := i + 1 ;//[Error] Unitjudge.pas(124): Assignment to FOR-Loop variable 'i'
......//以下略
 
我想在窗体上放置5个标签控件,然后放一个查询按钮、一个下一页的按钮,按查询按钮可以把1-5条查到的记录放到5个标签里,按下一页按钮,可以把6-10对应的记录放到5个控件里怎么实现。要一个字段的记录就行。谢谢大侠
 
adminpsql 是那位老大啊?
 
to igghdee:
这是Delphi的语法所禁止的:禁止在循环体中改变循环变量。如果你真的要改变,那么只能另外取一个变量。
 
非常感谢!
 
to cdj000:
这家伙想要问我问题,我就开了个帖,哈哈。
 
To: takashiki
是这样啊,老大辛苦
呵呵
 
再请教一下大侠:
VB中
For i = 0 To countDS
If a(i) >= 5 Then
i = i + 1
AdoPic.CommandType = adCmdText
AdoPic.RecordSource = "select * from 女士服装款式库 where type1= " & i & " "
AdoPic.Refresh
i = i - 1
.......
是想干什么,要换成delphi要怎么做,谢了!
 
for I:=0 to CountDS do begin
if a>=5 then begin
AdoPic.CommandType:=adCmdText;
AdoPic.RecordSource:='Select * from [女士服装款式库] where type1=' + IntToStr(I+1) +' ';
AdoPic.Refresh;//而且这句需要放到for循环的循环体外,才不至于浪费资源。
......
 
ok,thanks a lot!
 
把adopic改成adotable4又不行了,晕!
 
To:takashiki
我感觉老大你还是告诉 igghdee 看看书么书
呵呵
 
呵呵,新手拉,你也指点我下呀
 
真羡慕takashiki,VB,delphi都厉害,恩,侠之大者,莫过如此!
 
to igghdee:
不要往我脸上贴金了。
我的言论可能有些过激,说实在的,我一向鄙视VB,但不鄙视VB程序员。就个人认为,Delphi也快没落了,真是我们这帮学Delphi者的悲哀。Delphi 10出来了那么久了,市场反响怎么样我也不知道,但是,好像对于Delphi10的书籍我是没有见到过,连D9的都没有!
连Inprise引以为傲的Kylix终于在D9中死去,不再升级了。
D8以来的.NET我认为就已经是惨不忍睹了,比C#差远了。

我个人其实比较偏好C/C++,哈哈!
====================================
就这样结帖吧,每人分点分数完事。
 
后退
顶部