给高分

Question

直接呼叫 form2.edit1.text := '...';

Answer 1

FOR I:=0 TO FORM2.ComponentCount-1 DO
BEGIN
/////////////////
END;

Answer 2

不是这样子的 我想找出50个edit有没有简单的方法 几个语句搞定

Answer 3

使用遍历算法遍历所有的控件吧。
用用 ... AS TEDIT

Answer 4

for i:=0 to form1.componentcount-1 do 
(form1.components[i] as tedit).text:='ok';

Answer 5

for i:=0 to form1.componentcount-1 do 
 if (form1.components[i] is tedit) then
  (form1.components[i] as tedit).text:='ok';
或
for i:=0 to form1.componentcount-1 do 
 if (form1.components[i] is tedit) then
  Tedit(form1.components[i]).text:='ok';

Answer 6

对象问题，你在Form1窗口中运行FindComponent函数它所操作的对象是Form1,若你要查找FORM2的控件可以这样调用
Form2.FindComponent('控件名') ;