FileListBox와 ListBox가 있는데 이와 관련해서 몇 가지 질문을 드리겠습니다.



1. FileListBox에서 여러 개의 파일을 선택하고 버튼을 클릭하면

ListBox에 나타나도록 하고 싶습니다. (경로를 포함한 전체 파일명 그대로...)



2. FileListBox에 나타난 파일들을 선택하지 않은 상태에서 버튼을 누르면

그대로 모든 파일들이 ListBox에 나타나도록 하고 싶은데 이것도 쉽지가 않네요...

(역시 경로를 포함한 파일명이...)

컴포넌트 중에 Packet에 관한 컴포넌트가 있습니다.

그것을 사용해 보세요.



이태호 wrote:

> 또 질문 드립니다.

>

> WinsockPort에서 AddDataTrigger를 사용해서 포트로 들어오는

> 문자를 체크하려고 하는데 최대 몇자까지 가능한가요...

>

> 저는 한 80자 정도까지 체크하고 싶은데 한 30~40자만 입력해도

> 에러가 나는 군요...

>

> 더 많은 문자를 체크하는 방법이 없나요?

아래의 코딩을 참고하세요...



procedure TForm1.Button1Click(Sender: TObject);

var

i : integer;

begin

if FileListBox1.SelCount > 0 then // 선택된 것이 있는지 체크 한다

for i := 0 to FileListBox1.Items.Count - 1 do

begin

if FileLIstBox1.Selected[i] then

ListBox1.Items.Add(DirectoryListBox1.Directory + '' +

FileListBox1.Items[i]);

end

else

for i := 0 to FileListBox1.Items.Count - 1 do

begin

ListBox1.Items.Add(DirectoryListBox1.Directory + '' +

FileListBox1.Items[i]);

end;

end;



조갑손 께서 말씀하시기를...

> FileListBox와 ListBox가 있는데 이와 관련해서 몇 가지 질문을 드리겠습니다.

>

> 1. FileListBox에서 여러 개의 파일을 선택하고 버튼을 클릭하면

> ListBox에 나타나도록 하고 싶습니다. (경로를 포함한 전체 파일명 그대로...)

>

> 2. FileListBox에 나타난 파일들을 선택하지 않은 상태에서 버튼을 누르면

> 그대로 모든 파일들이 ListBox에 나타나도록 하고 싶은데 이것도 쉽지가 않네요...

> (역시 경로를 포함한 파일명이...)

>

이정욱 wrote:

> 컴포넌트 중에 Packet에 관한 컴포넌트가 있습니다.

> 그것을 사용해 보세요.

>

> 이태호 wrote:

> > 또 질문 드립니다.

> >

> > WinsockPort에서 AddDataTrigger를 사용해서 포트로 들어오는

> > 문자를 체크하려고 하는데 최대 몇자까지 가능한가요...

> >

> > 저는 한 80자 정도까지 체크하고 싶은데 한 30~40자만 입력해도

> > 에러가 나는 군요...

> >

> > 더 많은 문자를 체크하는 방법이 없나요?

> ==================================================================

제가 답변을 하게 되는군요!!!

소스를 뒤져보니까 21자가 넘으면 예외를 발생하게 해 두었더군요!

지금은 그 부분이 정확하게 생각이 나지 않는데

디버깅하는 방식(F7)으로 프로그램을 실행하면 그 부분을 찾을 수

있습니다.

그리고 자기가 원하는 길이의 값으로 변경하면 됩니다.



지금 생각나는 것은 if문으로 길이를 체크해서 21이 넘으면 프로그램에서

예외를 발생하게 해 두었습니다.



참고 되시길 바랍니다.

>