1:以下qy_tmp1 的型態可以是任何型態嗎? with qy_tmp1 do begin First; 2:若qy_tmp1是TBDEClientDataSet以下 with qy_tmp1 do begin是什麼意思? 是開要開始用qy_tmp1的物件? 3: with qy_tmp1 do begin First; ----------->一定指第一筆嗎? 一定要搭配嗎? while not eof do begin xxxx xxxxx end;

引言: 1:以下qy_tmp1 的型態可以是任何型態嗎? with qy_tmp1 do begin First; 2:若qy_tmp1是TBDEClientDataSet以下 with qy_tmp1 do begin是什麼意思? 是開要開始用qy_tmp1的物件? 3: with qy_tmp1 do begin First; ----------->一定指第一筆嗎? 一定要搭配嗎? while not eof do begin xxxx xxxxx end;

with do是Delphi提供的一個特殊語法，目的只是將相同的東西提出來，可以少打相同的東西，以您的列子作解釋：

with qry_tmp1 do 
begin
  First;
  while not Eof do
  begin
    ......
  end;
end;  

這一段就是等於

qry_tmp1.First;
while not qry_tmp1.Eof do
begin
  ......
end;

就好像a*b a*c-a*d是不是可以寫成a(b c-d) wiht do就是讓程式看起來比較簡潔，不要想太多了! ~小弟淺見，參考看看~

1,不可以是任何形態。 必須是類或者記錄類型：‘Record,Object or Class type Required’。 2, with qy_tmp1 do begin First; while not eof do… end; 和下面的語句是一樣的qy_tmp1.First; while not qy_tmp1.eof do… end; 只是效率可能會比較高一些，不用再次進行定址，當然也比較方便可少寫一些代碼。 3, 在with qy_tmp1 do begin裏邊就是第一筆(如果象這樣的情況: with qy_tmp1 do begin with qy_tmp2 do begin First; end; end; 則是相當於qy_tmp2.First,看靠近哪一個)，至於搭配就不一定需要了。