안녕하세요 델전문가님...^^
오늘 아침 천둥 번개도 치고 장난이 아니엇는데... 12월의 겨울비라^^
넘 좋군...
질문이 있어요...
If FindFirst(lblDirPath.caption+'*.*', faAnyFile, FileSearch)=0 then begin
repeat
// to check the result
sName := FileSearch.Name;
sSize := IntToStr(FileSearch.size);
// to count the number.
lCnt := lCnt - 1;
If lCnt < 0 then begin
break;
end
else
begin
// to print the null character after checking all-file.
sName := '';
sSize := '';
end;
until (FindNext(FileSearch)<>0) ;
FindClose(FileSearch);
Showmessage('File Name : ' + sName + ', File Size :'+ sSize);
end;
이런식으로.. 파일을 가져오는 이렇게 가져 오면... file이름 순서대로 가져오더라구요..
PaintBox에 Windows API를 이용하여 컨테이너 박스의 내용를 그렸습니다.
TextOut를 가지고...
file Name과 file Size정도...
그런데...
sTmpName := FileSearch.Name;
sTmpSize := IntToStr(FileSearch.size);
이렇게 했더니...
file 이름 순서대로 가져 오더라구
폴더와 파일 로 구별해서 가져오는 방법이 있나요?
아니면 굳이 Size가 0인가 아닌가를 구별해서 가져와야 하나요?
마지막....
폴더와 파일 구별 ...
읽어주셔서 감사합니다.^^
- 델초보 RyanYun -
> 안녕하세요 델전문가님...^^
>
> 오늘 아침 천둥 번개도 치고 장난이 아니엇는데... 12월의 겨울비라^^
> 넘 좋군...
>
> 질문이 있어요...
> If FindFirst(lblDirPath.caption+'*.*', faAnyFile, FileSearch)=0 then begin
> repeat
> // to check the result
> sName := FileSearch.Name;
> sSize := IntToStr(FileSearch.size);
>
> // to count the number.
> lCnt := lCnt - 1;
> If lCnt < 0 then begin
> break;
> end
> else
> begin
> // to print the null character after checking all-file.
> sName := '';
> sSize := '';
> end;
>
> until (FindNext(FileSearch)<>0) ;
>
> FindClose(FileSearch);
> Showmessage('File Name : ' + sName + ', File Size :'+ sSize);
> end;
>
> 이런식으로.. 파일을 가져오는 이렇게 가져 오면... file이름 순서대로 가져오더라구요..
>
> PaintBox에 Windows API를 이용하여 컨테이너 박스의 내용를 그렸습니다.
> TextOut를 가지고...
> file Name과 file Size정도...
> 그런데...
> sTmpName := FileSearch.Name;
> sTmpSize := IntToStr(FileSearch.size);
> 이렇게 했더니...
> file 이름 순서대로 가져 오더라구
> 폴더와 파일 로 구별해서 가져오는 방법이 있나요?
> 아니면 굳이 Size가 0인가 아닌가를 구별해서 가져와야 하나요?
>
>
> 마지막....
> 폴더와 파일 구별 ...
>
> 읽어주셔서 감사합니다.^^
> - 델초보 RyanYun -
>
>
우선 하시려는 일이 읽을때 구별을 하는 것이냐
아님 읽은 것이 화일이냐 디렉토리냐 구별하느냐에따라 구별됩니다.
1, 읽을때 구별해서 읽기
FindFirst함수의 파라미터중 2번째(Attr)을 구별해서 읽으시면 됩니다.
자세한건 F1 Help참조 ^^
2, 읽은 화일이 디렉토리인지 화일인지 구분...
TSearchRec 데이타 타입을 찾보세요...
자세한건 F1 Help참조..^^
그럼 즐거운 시간되세요...