Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[4798] [답변] LKWANGH/ 메모 컴퍼넌트을 배열로 사용.....
incnen [ ] 1223 읽음    1998-10-07 14:40
구체적으로 무슨 작업을 하시려는 건지는 몰라도

일반적으로 컴포넌트를 배열처럼 사용하는 방법은 여러가지가 있을 수 있습니다.
(물론 컴포넌트를 배열로 정의한다는 의미는 아닙니다)

콤포넌트를 원하는 배열의 수만큼 생성하고 Name Property를 1번부터 주면서

FindComponent 함수를 이용하여 배열처럼 쓰는 방법이 있을 수 있고,

콤포넌트르ㅣ Tag Property를 1번부터 주면서 배열처럼 이용하는 방법이 있습니다.

후자의 예만 간단히 보여드리면,,,

예) 
procedure TForm1.SomeEvent(Sender: TObject);
var
  ComIndex : Integer;
begin
  for ComIndex := 0 to ComponentCount - 1 do
  begin
    if Components[ComIndex] is TMemo then
    begin
      Case TMemo(Components[ComIndex]).Tag of
        1 : Panel1.Caption := '1번 메모 처리...';
        2 : Panel2.Caption := '2번 메모 처리...';
        3 : (FindComponent('Panel' + IntToStr(TMemo(Components[ComIndex]).Tag)) as TPanel).Caption := '3번 메모 처리...';
// FindComponent를 이용한 경우
      end;
    end;
  end;
end;


+ -

관련 글 리스트
4798 [답변] LKWANGH/ 메모 컴퍼넌트을 배열로 사용..... incnen 1223 1998/10/07
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.