小弟想在FORM1的程式碼中，找出dataModule1的元件 試過了FindComponent函數，但是一直有錯誤~~~~ 如; s:=某sql敘述 Tadoquery(FindComponent('query1')).sql.text:=s; 請前輩們幫忙~~~ 發表人 - yabula 於 2002/10/28 16:47:49 發表人 - yabula 於 2002/10/28 16:48:55

您可以用 FORM2.FindComponent 找

------
將問題盡快結案也是一種禮貌!

不好意思前輩: 我把問的方式改過了，您在看看吧

參考這篇 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19496 請多使用本站的寶庫「搜尋文章」功能 噓~~~~~~沉思中…

感謝前輩~~~~可以了~~~~

我想您是要找出某個 Query 將其 SQL 改掉, 試試以下方法(我沒實際測過, 您要自己測看看行不行)

var
 cmQuery: TComponent;
begin
  cmQuery := dataModule1.FindComponent('query1');
  if (cmQuery <> nil) then
    if (cmQuery is Tadoquery) then
      Tadoquery(cmQuery).sql.text := s;
end;

記得 dataModule1 必需已經 Create

------
將問題盡快結案也是一種禮貌!

感謝版主，ddy兄給我的指點已有了， 語法如下 Tadoquery(DataModule1.FindComponent('query1')).sql.text:=s;    這樣就可以了``` 非常感謝版主那ㄇ熱心````