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

C++빌더 Q&A
C++Builder Programming Q&A
[21724] Re:Re:Re:Re:[질문] 많은 그룹박스에 체크박스가 두개씩 들어있습니다. 그런데, 여기서 체크한 값들
김종화 [heaven75] 661 읽음    2002-09-27 13:02
초짜 님이 쓰신 글 :
: : 아래는 델파이코드다. 알아서 씨빌더로 바꿔써라..ㅋㅋㅋ
: : 빌더 안한지 거의 2년 되가기땜에 다 까묵었다.ㅠㅠ
: :
: : procedure TForm1.Button1Click(Sender: TObject);
: : var  i   : integer;
: : begin
: :      listbox1.Clear;
: :      for i:=0 to ComponentCount - 1 do
: :           if Components[i] is TCheckBox then
: :                if TCheckBox(Components[i]).checked then
: :                     listbox1.Items.Add(TCheckBox(Components[i]).caption);
: : end;
:
: 우선 헝아 이름은 글에서 빼고..
:
: 그리고 체크박스가 그것만 있는게 아니거든..
:
: 사방에 깔려 있고..
:
: 내가 알고자 하는 것은 어떤 특정 패널위 그룹박스 위에 있는 체크박스의 값이란다.
:
: ^^a 하여튼 니까짓꺼의 답변도 받아보고 내가 공부를 안하기는 징하게 안했나보구나. ㅎㅎ


procedure TForm1.Button1Click(Sender: TObject);
var  i   : integer;
begin
     listbox1.Clear;
     for i:=0 to ComponentCount - 1 do  begin
          if Components[i].GetParentComponent.Name <> name then
               if (Components[i].GetParentComponent.GetParentComponent.Name = panel1.Name)
                   and (Components[i] is TCheckBox) then
                    if TCheckBox(Components[i]).checked then
                         listbox1.Items.Add(TCheckBox(Components[i]).caption);
     end;
end;

그럼 이렇게 하면되지...ㅋㅋㅋ

+ -

관련 글 리스트
30791                     Re:Re:Re:Re:Re:[질문] 많은 그룹박스에 체크박스가 두개씩 들어있습니다. 그런데, 여기서 체크한 값들 Emmortal.초짜 678 2002/09/27
21724                 Re:Re:Re:Re:[질문] 많은 그룹박스에 체크박스가 두개씩 들어있습니다. 그런데, 여기서 체크한 값들 김종화 661 2002/09/27
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.