請問各位大大，如果小弟想在已產生的動態Form中存取Form中的各元件上的值，要該如何做呢？ 例如： 已產生5個動態form，每個form上都有6個edit元件，假設點選第三個form時，要對此form做存檔的動作時，該如何抓到此form上的6個edit上的值呢？ 請各位大大，幫幫小弟吧！多謝！ 發表人 - bnlonq1022 於 2005/06/06 10:56:50

var
  aForm:TForm;
  aControl:TControl;
  i:integer;
  Value:String;
  
  //在Form取得焦點時要確定是不是你要的FORM
  aFrom := Screen.ActiveFrom;
  if aForm.Name = '你的Form' then
  begin
   for i := 0 to aForm.ControlCount - 1 do
   begin
    if ( aForm.Controls[i] is TEdit ) then
         Value := (  aForm.Controls[i] as TEdit ).Text;
         ......
   end;
 end;

----------------------------------------------- Creation is the fundation of promotion. 發表人 - stallion 於 2005/06/06 19:35:44

不好意思大大 您這一行有錯 aFrom := TScreen.ActiveFrom; 除aFrom應該為aForm外的小錯外，有另一個比較嚴重的錯誤，就是編譯時會停在這一行，似乎是少了什麼步驟似的，請大大重新確認看看，謝謝！

不好意思，打錯了！已經修正。 aFrom := Screen.ActiveFrom; ----------------------------------------------- Creation is the fundation of promotion. 發表人 - stallion 於 2005/06/06 19:36:16

謝Stallion大大的幫忙，問題已解決了，感謝！