Q&A
- ListBox 의 Selected 프로퍼티 관련
안녕하세요...
제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 땜 입니다.
멀티 선택이 가능할때 전체 선택을 위한 동작을 할때 아래와 같이 처리를 합니다.
for i:=0 to ListBox1.Items.Count-1 do
ListBox1.Selected[i]:= True;
위와 같이 하면 전체 선택엔 별 무리가 없지만 아이템이 백단위가 넘어서 천단위
일 경우 0번부터 끝까지 선택되면서 ListBox 의 내용이 밑으로 스크롤 된답니다.
그래서 그런지 선택 속도도 만만치 안답니다. 다른 방법 없을까요?
그럼 2만.
제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 땜 입니다.
멀티 선택이 가능할때 전체 선택을 위한 동작을 할때 아래와 같이 처리를 합니다.
for i:=0 to ListBox1.Items.Count-1 do
ListBox1.Selected[i]:= True;
위와 같이 하면 전체 선택엔 별 무리가 없지만 아이템이 백단위가 넘어서 천단위
일 경우 0번부터 끝까지 선택되면서 ListBox 의 내용이 밑으로 스크롤 된답니다.
그래서 그런지 선택 속도도 만만치 안답니다. 다른 방법 없을까요?
그럼 2만.
2
COMMENTS
-
-
감사합니다.
정말 멋진 해결책 이었습니다.
그런데 이 방법 말고 보다 정상적이고 일반적인 방법은 없을까요...
구창민 wrote:
> 상현 wrote:
> > 안녕하세요...
> >
> > 제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 땜 입니다.
> > 멀티 선택이 가능할때 전체 선택을 위한 동작을 할때 아래와 같이 처리를 합니다.
> >
> > for i:=0 to ListBox1.Items.Count-1 do
> > ListBox1.Selected[i]:= True;
> >
> > 위와 같이 하면 전체 선택엔 별 무리가 없지만 아이템이 백단위가 넘어서 천단위
> > 일 경우 0번부터 끝까지 선택되면서 ListBox 의 내용이 밑으로 스크롤 된답니다.
> > 그래서 그런지 선택 속도도 만만치 안답니다. 다른 방법 없을까요?
> >
> > 그럼 2만.
>
>
> 안녕하세요? 구창민입니다.
> 방금 제가 만들어 테스트 해봤는데 잘 되는 군요.
> 강제로 Ctrl+Shift+End 키를 누른 것 처럼 만들어 버리는 겁니다.
> 번쩍할새에 전부 선택이 될겁니다. 어쩐지 꽁수같죠? ^^
> 잘 안되시면 다시 질문올려주세요.
>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> ListBox1.SetFocus;
> ListBox1.Selected[0]:= True;
> Keybd_Event( VK_CONTROL, VK_CONTROL, 0, 0 );
> Keybd_Event( VK_SHIFT, VK_SHIFT, 0, 0 );
> Keybd_Event( VK_END, VK_END, 0, 0 );
>
> Keybd_Event( VK_END, VK_END, KEYEVENTF_KEYUP, 0 );
> Keybd_Event( VK_SHIFT, VK_SHIFT, KEYEVENTF_KEYUP, 0 );
> Keybd_Event( VK_CONTROL, VK_CONTROL, KEYEVENTF_KEYUP, 0 );
> end;
>
> 그럼~ 즐거운 프로그래밍 되시길~
(NOTICE) You must be logged in to comment on this post.
-
- 이수정
- •
- 2000.03.21 03:31
- 3 COMMENTS
- /
- 0 LIKES
-
윤진화•2000.03.21 05:18> 셀렉트 되어 있게 표현되게 하려면... 어떻게 해야 하나요??? ==> StringGrid의 "Option"라는 프로퍼티...
-
이수정•2000.03.21 09:00윤진화 wrote: > > 셀렉트 되어 있게 표현되게 하려면... 어떻게 해야 하나요??? > ==> StringGrid의 "O...
-
윤진화•2000.03.22 06:04if (namesearch.Text = '아이디 입력') or (namesearch.Text = '') then Showmessage('찾을 친구 아이...
-
- sun
- 2000.03.21 03:26
- 0 COMMENTS
- /
- 0 LIKES
-
- 혜진이
- 2000.03.21 03:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 이수정
- •
- 2000.03.21 02:56
- 2 COMMENTS
- /
- 0 LIKES
-
문영철•2000.03.21 06:06이거 여기보면 있었던 예제인데 제가 지금 유용하게 잘쓰고 있습니다. 제 프로그램입니다. 참조하세요. ...
-
혜진이•2000.03.21 03:07form2를 모달형으로 생성시켜야 합니다. 어떻게 하나면.. uses절에 unit2(form2의 unit)를 포함시키고 ...
-
- 최희동
- 2000.03.21 02:42
- 0 COMMENTS
- /
- 0 LIKES
-
-
-
- 안 영식
- 2000.03.21 01:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초..
- •
- 2000.03.21 01:56
- 1 COMMENTS
- /
- 0 LIKES
-
강민주•2000.03.21 02:14델초.. wrote: > 안녕하십니까..... > 이곳에서 많은 도움을 받고 있는 신승욱이라고 합니다.. 다른게 아...
-
- 상현
- •
- •
- 2000.03.21 01:38
- 2 COMMENTS
- /
- 1 LIKES
안녕하세요... 제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 땜 입니다. 멀티 선택이 가능할때 전체 선택을 위한 동작을 할때 아래와 같이 처리를 합니다. for i:=0 to ListBox1.Items.Count-1 do ListBox1.Selected[...-
구창민•2000.03.21 02:02상현 wrote: > 안녕하세요... > > 제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 ...
-
상현•2000.03.21 03:33감사합니다. 정말 멋진 해결책 이었습니다. 그런데 이 방법 말고 보다 정상적이고 일반적인 방법은 없을...
-
- blueSky
- •
- 2000.03.21 01:32
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.21 01:46blueSky wrote: > 도움을 구합니다. > > WINEXEC 또는 ShellExecute 를 이용하여 도스명령어나 다른 실...
-
호야•2000.09.30 01:26이함수를 쓰면 도스창이 뜨거든요(제가 만든 프로그램을 실행시키면 자동으로 도스창뜹니다) 도스창을 않...
-
- 김선호
- •
- 2000.03.21 01:06
- 1 COMMENTS
- /
- 0 LIKES
-
유솔로몬•2000.03.28 00:31윈도우 98에 포함되어 있는 [간략히보기]라는 응용프로그램을 통해서 말 그대로 간략히 사용된 함수를 ...
-
-
유도삼•2000.03.21 03:22주석을 붙입니다. 도움이 되었으면 하네요. 진 wrote: > Quick report에 QRimage를 넣는 부분인데요 ...
-
-
- 신현숙
- 2000.03.21 00:49
- 0 COMMENTS
- /
- 0 LIKES
-
- 최석기
- •
- 2000.03.21 00:46
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.21 01:40최석기 wrote: > 안녕하세요.. > > 며칠전에 질문을 드렸더니 이런건 않된다고 하더군요. > > 혹시...
-
최석기•2000.03.21 05:02에궁.. 뭐 창민님께서 어렵다면 정말 어렵겠네요.. 그냥 웹브라우저를 따로 만들던가 해야겠네요.. ...
-
- ghost Lee
- •
- 2000.03.21 00:37
- 1 COMMENTS
- /
- 0 LIKES
-
혜진이•2000.03.21 01:14파일이 여러개로 작성된 프로그램인거 같은데요.. 혹시 uses절에 참고할때 같은 파일을 참고 하고 계신건 ...
-
- 초보자
- •
- 2000.03.21 00:26
- 3 COMMENTS
- /
- 0 LIKES
-
임형호•2000.03.21 02:18초보자 wrote: > 안녕하세요 ? > > a.db 에 필드가 b,c 가 있는데 > b,c (필드 타입은 number) 의 값...
-
최범석•2000.03.21 01:57초보자 wrote: > 안녕하세요 ? > > a.db 에 필드가 b,c 가 있는데 > b,c (필드 타입은 number) 의 값...
-
최범석•2000.03.21 01:54초보자 wrote: > 안녕하세요 ? > > a.db 에 필드가 b,c 가 있는데 > b,c (필드 타입은 number) 의 값...
-
- 최은정
- 2000.03.21 00:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 고진섭
- •
- 2000.03.21 00:15
- 1 COMMENTS
- /
- 0 LIKES
-
유도삼•2000.03.21 03:33고진섭 wrote: > MoneyEdit콤포넌트를 얼마전 다운받아 사용하고 있습니다. > Edit박스에서 어떤 수를 ...
-
- 뒷북
- 2000.03.21 00:09
- 0 COMMENTS
- /
- 0 LIKES
> 안녕하세요...
>
> 제가 지금 고민하고 있는건 ListBox 컴포넌트의 Selected 프로퍼티 땜 입니다.
> 멀티 선택이 가능할때 전체 선택을 위한 동작을 할때 아래와 같이 처리를 합니다.
>
> for i:=0 to ListBox1.Items.Count-1 do
> ListBox1.Selected[i]:= True;
>
> 위와 같이 하면 전체 선택엔 별 무리가 없지만 아이템이 백단위가 넘어서 천단위
> 일 경우 0번부터 끝까지 선택되면서 ListBox 의 내용이 밑으로 스크롤 된답니다.
> 그래서 그런지 선택 속도도 만만치 안답니다. 다른 방법 없을까요?
>
> 그럼 2만.
안녕하세요? 구창민입니다.
방금 제가 만들어 테스트 해봤는데 잘 되는 군요.
강제로 Ctrl+Shift+End 키를 누른 것 처럼 만들어 버리는 겁니다.
번쩍할새에 전부 선택이 될겁니다. 어쩐지 꽁수같죠? ^^
잘 안되시면 다시 질문올려주세요.
procedure TForm1.Button1Click(Sender: TObject);
begin
ListBox1.SetFocus;
ListBox1.Selected[0]:= True;
Keybd_Event( VK_CONTROL, VK_CONTROL, 0, 0 );
Keybd_Event( VK_SHIFT, VK_SHIFT, 0, 0 );
Keybd_Event( VK_END, VK_END, 0, 0 );
Keybd_Event( VK_END, VK_END, KEYEVENTF_KEYUP, 0 );
Keybd_Event( VK_SHIFT, VK_SHIFT, KEYEVENTF_KEYUP, 0 );
Keybd_Event( VK_CONTROL, VK_CONTROL, KEYEVENTF_KEYUP, 0 );
end;
그럼~ 즐거운 프로그래밍 되시길~