例如： for i:=1 to k do begin …… edit(2i-1).Text:=adoquery1.FieldValues['**']; edit(2i).Text:=adoquery1.FieldValues['**']; ……

您好﹗    請問下標是什么意思﹖    ================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

呵呵，不曉得怎么錶達叻。自己給他定義為下標的，< >< > 我定義的下標就是例子中的edit（2×i-1）的（2×i-1），不知道專業術語該怎么稱呼，還望指教！！

Hi, 你要的應該是動態名稱找元件吧, 可以利用 FindComponent 即可, 如    

for i:=1  to k do
   begin
    ……
    TEdit(FindComponent('edit' IntToStr(2*i-1))).Text:=adoquery1.FieldValues['**'];
    TEdit(FindComponent('edit' IntToStr(2*i))).Text:=adoquery1.FieldValues['**'];
    ……

比較要注意的地方就是 FindComponent 傳入的 component name 若在該 form 上找不到時, 會傳回 nil, 若要寫的嚴謹一點, 必須加入這樣的檢查! 發表人 - timhuang 於 2005/03/14 11:39:18

如果是memo動態找元件也可以使用相同的方法嗎？我試暸好像不行耶。請問該怎么辦？

當然可以啊, 例子如下,    

  TMemo(FindComponent('Memo1')).Text := '123';

還問一個傻問題：怎么把type（NULL）轉換為type（string）？