폼에 30개의 EDIT가 있습니다.

근데 지금 상태에서 처음 실행했을때는 Edit.Enabled := False;

상태로 만들거 싶거든여! 선택할수 없는 상태...

물론 하나하나 전부 코딩을 한다면 할수야 이겠지만 이런 조잡한 코딩하지않고

간편하게 30개의 EDIT를 비활성화시키는 방법이 없을까여?
----------------------------------------------------------
  AEdit : TEdit;
  AName : TComponent;
  Status : String;                    //전역변수처리했구여...
-------------------------------
function TForm1.BTN_ENABLED(ENABLED: String): Boolean;
begin
    if ENABLED = 'Search' then begin
       AEdit := Self.FindComponent(AName.name) as TEdit;
       while AEdit <> nil do
        begin
              AEdit.Enabled := False;
              AEdit := Self.FindComponent(AName.Name) as TEdit;
        end;
         Result := False;
    end
    else if ENABLED = 'Edit' then begin
              Result := True;
           end;
end;

procedure TForm1.BitBtn12Click(Sender: TObject);
begin
    if BTN_ENABLED('Search') then
    begin
        Showmessage('현재 탐색 모드입니다. 현재 EDIT는 ENABLED
                                는  FALSE상태입니다.');
    end;
end;
--------------------------------------------