안녕하세요 하얀까마귀 입니다.

Components 와 ComponentCount 를 이용하시면 될것 같네요..

자세한 사항은 도움말을 참고하세요..

여기에서도 보시면 FindComponent 같은걸로 검색하시면 무척 많은자료를

찾으실수 있을껍니다.

그리고 Form 에 보시면 FindGlobalComponent라는 함수가 있거든요.
이것도 한번 보세요.. 잘 모르시는 함수인데... 유용하게 쓸수 있는 함수입니다.

그럼.. 즐거운시간 되세요.

for i := 0 to ComponentCount do
begin
  if Components[i] is TEdit then
  begin
    TEdit(Components[i]).Text := '';
     //Do Somting...
  end;

현아 불멸의 화상 엉아다 ㅋㅋ

대충 위처럼 하면 될거다..

막친거라 오타가 있을수도..

즐거운 프로그래밍 해라~~

for i := 0 to ComponentCount do

여기에서요 리스트 인덱스 바운드 에러가 나드라구요
그래서 for i := 0 to ComponentCount -1 do
요러케 바꾸리깐 대기는 하는데 왜 그러는거죠? '';;;
먼가 하나 엉뚱한게 끼는건가;;

그리고 판낼 위에 있는 에디트 박스만 골라서도 가능 한가요?;;

ㅋㅋ 막썼더니 그렇게 되는군..

ComponentCount - 1 하는게 맞다

왜냐면 시작이 0 부터니까 갯수는 하나가 작은게 맞거든..^_^

Panel 위의 TEdit 형만 찾으려면 이렇게 하면 되겠지..

for i := 0 to Panel.ComponentCount - 1 do
begin
  //Do Someting..

즐건 프로그래밍 해라~

쓰고보니 판넬의 자식들을 찾으려면 그렇게 하면 안된다.

아래처럼

for i := 0 to Pane1.ControlCount do ... 이렇게 해야한다.

ComponentCount 로 하면 하나도 찾지 못할거 같다.

The ComponentCount of a component contains the same number of items as in the Components list for that component, and is always 1 more than the highest Components index, because the first Components index is always 0

이라고 한다. ㅋㅋㅋㅋ

그리고, 자식들의 갯수는 자신을 포함한 개수이니 - 1을 하면안된다.

즉,

for i := 0 to Pane1.ControlCount do
begin
  if Components[i] is TEdit then
    TEdit(Components[i]).Text := '';
  //Do SomeThing..
end;

머 이런형태로 해야된다.

개떡 처럼 이야기하면 찰떡 처럼 알아듣길 바라며~ ㅋㅋ

즐건 프로그래밍 해라~~