안녕하세요.  질문에 답변을 하면,

우선 form에다가 EDIT BOX 를  여러개 올려놓구요.
버튼을 올려놓고, 버튼의 CLICK EVENT 에다가
VAR
  I : INTEGER
BEGIN
    FOR I := 0 TO COMPONENTCOUNT -1 DO
    BEGIN
      IF (COMPONENTS[I] IS TEDIT) THEND
      BEGIN
      (COMPONENTS[I] AS TEDIT).TEXT := '아무거나 문자열';
      END;
    END;
END;

자세한것은 TComponent 를 찾아보시고요. componentcount는   form 위에있는
모든 component 의 갯수에요. is 와 as 는 help 를 감조하시면됨니다.