if OpenDialog1.Execute then
begin
Assignfile(f, opendialog1.filename); //opendialog.fileName 대신 파일 이 름으로 바꿔도 됨
Reset(f); //화일을 처음으로 돌림
while not Eof(f) do
begin
Readln(f,s); //첫줄을 읽음
i:= pos(' ', s); //space 한칸 빈곳의 자리수를 알아냄
listbox1.Items.add(copy(s,1,i-1)); //첫문자 부터 빈칸 앞자리까지
listbox2.Items.add(copy(s,i+1,30)); //빈칸 뒤부터 ~
end;
Closefile(f);
end;
이렇게했는데요..
listbox2에만 결과값이 모두 다 찍히는데..모가 잘못된거져??
형식은
22 55
22 44
이런식으루 되어있는데..왼쪽은 리스트박스1에 오른쪽은 리스트박스2에 쓸려고합니다..
어떻게하면좋을까요?
> if OpenDialog1.Execute then
> begin
> Assignfile(f, opendialog1.filename); //opendialog.fileName 대신 파일 이 름으로 바꿔도 됨
> Reset(f); //화일을 처음으로 돌림
> while not Eof(f) do
> begin
> Readln(f,s); //첫줄을 읽음
> i:= pos(' ', s); //space 한칸 빈곳의 자리수를 알아냄
> listbox1.Items.add(copy(s,1,i-1)); //첫문자 부터 빈칸 앞자리까지
> listbox2.Items.add(copy(s,i+1,30)); //빈칸 뒤부터 ~
> end;
> Closefile(f);
> end;
>
> 이렇게했는데요..
> listbox2에만 결과값이 모두 다 찍히는데..모가 잘못된거져??
>
> 형식은
> 22 55 //여기 처음에 빈칸이 있는 모양이네요 처음 빈칸을 없애고 사이도 빈칸
> 22 44 하나로 만드세요...
>
> 이런식으루 되어있는데..왼쪽은 리스트박스1에 오른쪽은 리스트박스2에 쓸려고합니다..
> 어떻게하면좋을까요?