您的位置：程序门 -> delphi ->

help

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

help[已结贴,结贴人:tsyat]

发表于：2007-10-19 11:52:40 楼主

with（adoquery1) do
begin
close;
sql.clear;
sql.add（'select distinct top ' + numberedit.text + ' * from 检索信息' + searcher);
open;
end;

这里的代码具体作用是什么? with do 是不是有着跟while 差不多的作用 ??

发表于：2007-10-19 12:10:371楼得分:5

with do 与 while 是两回事.
with 只是一种代码的优化写法而已,while 是判断关键字,与if 类似.

发表于：2007-10-19 12:16:432楼得分:5

1. with（adoquery1) do
begin
close;
sql.clear;
sql.add（ 'select distinct top ' + numberedit.text + ' * from 检索信息 ' + searcher);
open;
end;
相当于:

adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add（ 'select distinct top ' + numberedit.text + ' * from 检索信息 ' + searcher);
adoquery1.open;

2. while 是循环结构
i := 0;
while i > 10 do
begin
i := i + 1;
end;

发表于：2007-10-19 12:19:473楼得分:5

3. while 是循环结构
i := 0;
while i < 10 do
begin
i := i + 1;
end;
i 值有 1,2,3,4,5,6,7,8,9,10

发表于：2007-10-19 12:30:404楼得分:0

连最基础的概念都没闹清
建议看看基础的书

发表于：2007-10-19 12:31:095楼得分:5

楼主的代码跟下面的代码意思一样的

delphi（pascal) code


     adoquery1.close; 
     adoquery1.sql.clear; 
     adoquery1.sql.add（ 'select distinct top  ' + numberedit.text +  ' * from 检索信息 ' + searcher); 
     adoquery1.open;

使用with do 对某一对象的一组属性进行操作，可以减少系统寻址时间，优化代码，提高程序效率。

while 是循环语句的关键字，使用方法看下基本的介绍或者帮助。

发表于：2007-10-19 12:47:296楼得分:0

把更多的精力放在看书学习上，要比你在论坛上呆上好几天问一个问题，效率要高的多，还是要看书多多
建议楼主：
good good study,day day up

下一篇：出售电子白板控件
上一篇：有没用过dsoframer.ocx的大侠，偶怎么一用就报错，说什么变量类型错误！！！！！

其他资讯