Q&A
- [질문] 컨트롤의 ID 에 동적 접근이 가능한가요?
화면에 약 100개의 버튼 컨트롤이 있습니다.
근데 이 버튼컨트롤의 아이디가
btn1 , btn2, btn3 ...., btn100
요렇게 되어 있거든요.
이중에서 특정 버튼의 텍스트를 검색하고 싶은데
저걸 반복문으로 돌리면서 검색할 수 있는 방법이 있나요?
어차피 id 구조가 비슷하기에 뒤쪽 번호만 바꿔주면서 하면 될꺼 같거든요.
델파이에서는 이걸 어떻게 해야 하는지 잘 모르겠네요.
도움을 주시면 감사하겠습니다~~
원하는 예제
<!--CodeS-->
for I := 100 downto 1 do begin
if [btn+번호].caption = '32' then begin
//특정 로직 수행
end;
end;
<!--CodeE-->
근데 이 버튼컨트롤의 아이디가
btn1 , btn2, btn3 ...., btn100
요렇게 되어 있거든요.
이중에서 특정 버튼의 텍스트를 검색하고 싶은데
저걸 반복문으로 돌리면서 검색할 수 있는 방법이 있나요?
어차피 id 구조가 비슷하기에 뒤쪽 번호만 바꿔주면서 하면 될꺼 같거든요.
델파이에서는 이걸 어떻게 해야 하는지 잘 모르겠네요.
도움을 주시면 감사하겠습니다~~
원하는 예제
<!--CodeS-->
for I := 100 downto 1 do begin
if [btn+번호].caption = '32' then begin
//특정 로직 수행
end;
end;
<!--CodeE-->
5
COMMENTS
-
-
아하 저런 함수가 있었군요.
감사합니다. 이제 할수 있을듯...^^ -
한가지 더 팁을 알려드리면, FindComponent 를 사용하셔도 무방합니다.
하지만 성능상의 잇점을 조금이라도 더 보시길 원하신다면, 배열을 하나 선언하고 처음 한번만 배열과 연결 한 후 그 배열을 사용하시면 편합니다.
즉..
전역 변수로
btns : array[1..100] of TButton;
을 선언하시고
폼 OnCreate 시에
var
i : integer;
begin
for i := 1 to 100 do begin
btns[i]:= TButton(FrmMain.FindComponent('btn' + intToStr(i)));
end;
으로 연결 하신 후 다음부터는 btns[1]~btns[100] 까지 사용하시면 매번 검색을 하지 않으니 성능상의 잇점이 있습니다. ^^ -
아하..
밑쪽의 방법도 괜찮은데요?^^;
근데 이미 다 해놨는데... 바꿔야 하나...(이놈의 게으름..--)
일단 참고해서 사용하도록 하겠습니다~~ -
아래쪽의 방법이 더 나은거 같네요.
코드 컴프리트 같은 책이나 아니면 보통 프로그래밍 관련 책들을 보면 참조 형식의 변수를 선언해서
작업을 간단히 하거나 코드를 효율및 분석이나 유지 보수를 편하게 하는게 나중에 훨씬 도움이 되니
레퍼런스 형태의 변수는 아끼지 말고 사용하라고 하는 말들이 나오죠.
예전 부터 아래 방법이 효율이 좋다고 알려진 방법이니 아래 방법을 사용하시는 게 나으리라 봅니다.
(NOTICE) You must be logged in to comment on this post.
-
- 정병선
- 2008.06.23 08:18
- 0 COMMENTS
- /
- 0 LIKES
-
- steps
- •
- 2008.06.14 02:55
- 1 COMMENTS
- /
- 0 LIKES
-
steps•2008.06.15 02:26자답입니다. 코드에서 이미지처리에 리용된 GDI PLUS가 문제였습니다. GDI Plus를 쓴 경우 우의 증상...
-
- 화이팅
- •
- 2008.06.14 00:54
- 3 COMMENTS
- /
- 0 LIKES
-
깔쌈보이•2008.06.14 02:51with mainf do begin 문장에 보면 name := 어쩌구 구문 있죠? 이 구문에 한글이 들어가서 발생한 오류입...
-
화이팅•2008.06.14 03:44이름을 바꾸니 위와같은 에러는 발생하지 않네요.. 깔삼보이님 감사합니다^^ 근데 실행을 시키면 아무런...
-
석주현•2008.06.19 02:44Form2.QuickRep1.Prepare; 를 해주시고 Preview 를 하셔야 합니다.
-
- 김길남
- 2008.06.14 00:08
- 0 COMMENTS
- /
- 0 LIKES
-
- 강태원
- •
- 2008.06.13 20:04
- 5 COMMENTS
- /
- 0 LIKES
화면에 약 100개의 버튼 컨트롤이 있습니다. 근데 이 버튼컨트롤의 아이디가 btn1 , btn2, btn3 ...., btn100 요렇게 되어 있거든요. 이중에서 특정 버튼의 텍스트를 검색하고 싶은데 저걸 반복문으로 돌리면서 검색할 수 있는 방법이 있...-
홍성락•2008.06.13 20:21이름으로 찾는 FindComponent를 사용해 보세요. 그리고 FrmMain는 그촘의 이름입니다. <!--CodeS--&...
-
강태원•2008.06.13 20:53아하 저런 함수가 있었군요. 감사합니다. 이제 할수 있을듯...^^
-
이정욱•2008.06.13 21:04한가지 더 팁을 알려드리면, FindComponent 를 사용하셔도 무방합니다. 하지만 성능상의 잇점을 조금...
-
강태원•2008.06.14 00:15아하.. 밑쪽의 방법도 괜찮은데요?^^; 근데 이미 다 해놨는데... 바꿔야 하나...(이놈의 게으름..-...
-
석주현•2008.06.14 11:52아래쪽의 방법이 더 나은거 같네요. 코드 컴프리트 같은 책이나 아니면 보통 프로그래밍 관련 책들을 ...
-
- 천천히
- •
- 2008.06.11 23:56
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2008.06.12 02:22for문 다음에 rowcount := rowcount + 1; 이렇게하면 보이겠네요. 전번에 처럼 rowcount로 하시면...
-
- 천천히
- •
- 2008.06.11 23:53
- 6 COMMENTS
- /
- 0 LIKES
-
홍성락•2008.06.12 04:382가지 방법으로 해보겠습니다. 1방법은 그냥 넣을때 곰마를 넣습니다, 그러나 실제 데이타와 다르므로 ...
-
천천히•2008.06.13 00:06님말씀대로 formatfloat 함수
-
홍성락•2008.06.13 03:10FormatFloat인자가 Variant라서 그런가봅니다 Cells[1, i+1] := FormatFloat('#,##0', StrToFloat(VarTo...
-
천천히•2008.06.13 19:09홍성락님..답변 감사합니다.. 그런데 또 에러가... ㅠ..ㅠ Cells[1, i+1] := FormatFloat('#,##0', ...
-
홍성락•2008.06.13 20:15아마 위에서 말한것 처럼 데이타에 숫자가아닌 값이 있나 보네요. try를 사용해 함수내 놓거나 별고 함...
-
천천히•2008.06.14 00:26감사합니다.. 해결했습니다... ^^; 복 받으세요...
-
- 플루토
- •
- 2008.06.11 01:16
- 2 COMMENTS
- /
- 0 LIKES
-
steps•2008.06.11 05:23파일을 다운로드하든 메모리에 스트림으로 써넣든 클라이언트에 이미지자료가 오기전에는 불가능합니다.
-
이정욱•2008.06.11 06:26만약 이미지가 커서 그런다면, 이미지 썸네일을 생성 후 받아서 보여주시면 됩니다.
-
- 강태원
- •
- 2008.06.10 02:46
- 2 COMMENTS
- /
- 0 LIKES
-
장성호•2008.06.10 03:14<!--CodeS--> procedure TForm1.Button2Click(Sender: TObject); var idx: Integer; begin ...
-
강태원•2008.06.10 18:05아 C++ 처럼 형변환이 가능하군요. 감사합니다.
-
- 선종욱
- •
- 2008.06.10 02:26
- 3 COMMENTS
- /
- 0 LIKES
-
석주현•2008.06.10 03:06DateTimeToFileTime(EncodeDateTime(2008,6,9, 17,25,00,00)); EncodeDateTime 으로 한번 해보세요. ...
-
이정욱•2008.06.11 00:29FileTimeToLocalFileTime 를 참고해보세요 ^^ 우리나라의 GMT 타임 존이 다르기 때문입니다. 위의 ...
-
석주현•2008.06.11 09:41역씨 정욱님 대단하시네요. ^^ 저도 좋은거 배웠네요.
-
- 신철우
- •
- 2008.06.10 02:21
- 1 COMMENTS
- /
- 0 LIKES
-
장성호•2008.06.10 03:54OpenDialog에서 파일명이 들어가는 부분은 ComboBox 입니다. vcl에서도 마찬가지 그렇지만 ComboB...
-
- 바다소리
- •
- 2008.06.09 23:42
- 2 COMMENTS
- /
- 0 LIKES
-
백록화•2008.06.10 00:49edit 의 imemode 가 imDontCare 이라면...다른 콤포넌트의 영향을 받을수 있습니다. edit1 에 들어오기전...
-
바다소리•2008.06.10 01:16감사 합니다 검색을위해 호출되는 하위 폼의 edit box에 imemode를 한글로 했었는데 거기서 영향을 ...
-
- 김대환
- 2008.06.09 19:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 임정미
- •
- 2008.06.07 20:52
- •
- 3 COMMENTS
- /
- 0 LIKES
-
임정미•2008.06.09 09:31해결했습니다. 배열크기는 SetLength(value , s_count); 로 정해놓고 for 문은 scount+1 만큼 ...
-
이정욱•2008.06.09 20:10윽.. 도와드리려고 했는데... 챙피해 하지 마세요 ^^; 전 더 한 실수도 많이 한답니다.ㅜㅜ 꽤 긴...
-
석주현•2008.06.09 22:26ㅎㅎ 저도 캡춰해서 분석하다가 말았습니다. 제가 보긴 코드를 좀 나누고 좀 리펙토링 하셔야 할 것 ...
-
- 플루토
- •
- 2008.06.06 13:07
- 2 COMMENTS
- /
- 0 LIKES
-
이정욱•2008.06.06 13:13test (a,b) 로 그냥 호출 하시면 됩니다. 그리고 그냥 ShowMessage(b); 하시면 제데로 출력될 것입니...
-
플루토•2008.06.06 20:24네 감사합니다. 수정했어요^ ^
-
- 허리케인
- •
- 2008.06.06 00:14
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2008.06.06 03:02이정욱님 편역한...델파이7 Check 또는 아래 델마당에 어떤분이 추천하셨던 책이네요.. 류종택님 저서....
-
- 김광식
- •
- 2008.06.05 20:13
- 2 COMMENTS
- /
- 0 LIKES
-
홍성락•2008.06.05 23:29자료실에 [문자를 좌로 스크롤 하는 소스-이미지 사용]으로 올렸습니다. 수정하시면서 사용해 보세요
-
김광식•2008.06.11 00:54감사합니다...
-
- 화이팅
- •
- 2008.06.05 10:18
- 2 COMMENTS
- /
- 0 LIKES
-
김병윤•2008.06.05 12:37기본적으로 DATA는 Query한값을 --> DataSource를 통해 --> DBGrid에 보여줍니다. 결과적으로 Query의 ...
-
화이팅•2008.06.07 05:33고맙습니다..^^ 덕분에 잘 해결되었습니다~
-
- 왕초보
- •
- 2008.06.05 02:34
- 2 COMMENTS
- /
- 0 LIKES
-
석주현•2008.06.05 03:00포트 번호는 보통 Ip를 통해서 호스트를 찾고 포트번호를 통해서 호스트 내의 통신 접속점을 구분하기 위...
-
장성호•2008.06.05 06:22TServerSocket의 Port를 100000으로 하고 Active=true해 놓은후에 netstat -a 해보세요 TCP 에...
-
- 바다소리
- •
- 2008.06.04 22:25
- 3 COMMENTS
- /
- 0 LIKES
-
석주현•2008.06.04 22:54디버깅 하시면서 쿼리의 결과가 제대로 나오는지 확인 부터 해보세요. 디비 구성이 어떤지 모르지만 ...
-
이정욱•2008.06.04 22:57저도 가끔 이런경우를 보는데, 아마도 for 문의 최적화 때문일 수도 있습니다. 디버깅을 해보시면, co...
-
석주현•2008.06.04 23:20아 그러고 보니 정욱님 말씀 처럼 최적화에 따라 달라지는 경우가 있습니다. 음 저 같으면요. v...
그리고 FrmMain는 그촘의 이름입니다.
<!--CodeS-->
var
i : integer;
Btn : TButton;
begin
for I := 100 downto 1 do begin
Btn := TButton(FrmMain.FindComponent('btn' + intToStr(i)));
if Btn <> nil then
if Btn.caption = '32' then begin
//특정 로직 수행
end;
end;
end;
<!--CodeE-->