Q&A
- filelistbox에대하여.
//아래의 소스에서
FilelistBox2.Directory := '.\OP\';
for i := 0 to FileListBox2.Items.Count - 1 do
begin
PathName := ExtractFileName(FileListBox2.Items.strings[i]);
FName := FileListBox2.Items.strings[i];
CopyFile(Pchar(Pathname)
,Pchar('c:\MyPg\Allcomp\OP\'+Fname)
,False);
end;
FilelistBox2.Directory := '.\OP\5.0\REALGRID\';
for i := 0 to FileListBox2.Items.Count - 1 do <<<-------①
begin
PathName := ExtractFileName(FileListBox2.Items.strings[i]);
FName := FileListBox2.Items.strings[i];
CopyFile(Pchar(Pathname)
,Pchar('c:\MyPg\Allcomp\OP\5.0\REALGRID\'+Fname)
,False);
end;
위와같이 하나의 filelistbox2 를 이용하여 directory Path를 변경해서 사용할수없는지요..자꾸 Error만 나옵니다..
-----① 부분에서 다음과 같은 Error가 납니다.
"""Project Pall_comp_install.exe raised excepton class ElnOutError with Message
'Invalid filname'.Process stopped.Use Step or Run to continue. """
라고 나옵니다.
FilelistBox2.Directory := '.\OP\';
for i := 0 to FileListBox2.Items.Count - 1 do
begin
PathName := ExtractFileName(FileListBox2.Items.strings[i]);
FName := FileListBox2.Items.strings[i];
CopyFile(Pchar(Pathname)
,Pchar('c:\MyPg\Allcomp\OP\'+Fname)
,False);
end;
FilelistBox2.Directory := '.\OP\5.0\REALGRID\';
for i := 0 to FileListBox2.Items.Count - 1 do <<<-------①
begin
PathName := ExtractFileName(FileListBox2.Items.strings[i]);
FName := FileListBox2.Items.strings[i];
CopyFile(Pchar(Pathname)
,Pchar('c:\MyPg\Allcomp\OP\5.0\REALGRID\'+Fname)
,False);
end;
위와같이 하나의 filelistbox2 를 이용하여 directory Path를 변경해서 사용할수없는지요..자꾸 Error만 나옵니다..
-----① 부분에서 다음과 같은 Error가 납니다.
"""Project Pall_comp_install.exe raised excepton class ElnOutError with Message
'Invalid filname'.Process stopped.Use Step or Run to continue. """
라고 나옵니다.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 좋은세상
- 2004.02.25 19:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 김종섭
- 2004.02.25 03:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 3번째 감자
- 2004.02.25 02:34
- 0 COMMENTS
- /
- 0 LIKES
-
- 레이디메이앙
- •
- 2004.02.25 02:28
- 4 COMMENTS
- /
- 0 LIKES
-
연기훈•2004.02.25 18:27DBGrid에서 값을 비교하여 뿌려질려면... DB내용을 비교해야 합니다. 전에 제가 했던 프로젝트에서 ...
-
레이디메이앙•2004.02.25 20:31저도 님처럼 한 레코드 선택시 색깔 설정은 했는데요... 아래글에도 썼는데여 code = 2인 레코드를 선택하...
-
연기훈•2004.02.25 23:27제가 테스트로 짜본건데.. 도움이 될런지.. 그럼 즐프하세요 var Form1: TForm1; &nbs...
-
연기훈•2004.02.25 23:30option 에서 dgediting은 false로 dgrowselet 는 true로 하고 했습니다.
-
- 맑은물
- •
- 2004.02.25 02:24
- 1 COMMENTS
- /
- 0 LIKES
-
정경철•2004.02.26 20:51Frame 에 보시면 width 가 있습니다. 디폴트로 1인데 보통 2정도 하면 굵게 됩니다. 크기는 알아서 지정 ...
-
- 공왕주
- 2004.02.25 02:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 스머프
- •
- 2004.02.25 01:14
- 2 COMMENTS
- /
- 0 LIKES
-
이중철•2004.02.25 01:30대충 이런식 아닐까요 unit AAA; ... TBBB = class(TObject) private FReadOnly : Boo...
-
스머프•2004.02.25 04:03TEdit를 상속해서 기존에 ReadOnly, Enabled가 있는데 다시 프로퍼티를 선언해서 사용 가능한가요?
-
-
이중철•2004.02.25 03:10unit MainUnit; ... TMainclass = Class Private Procedure Sub1_P1; Pro...
-
-
- 김원석
- •
- 2004.02.24 23:43
- 1 COMMENTS
- /
- 0 LIKES
-
손상엽•2004.02.25 00:32FloatToStr(aa.text) 안되던가요..?? ㅡㅡ;; 아님.. FormatFloat('##,###', double값).... 될것 같은데....
-
- 이창남
- 2004.02.24 23:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 김원석
- •
- 2004.02.24 22:50
- 2 COMMENTS
- /
- 0 LIKES
-
김용회•2004.05.04 20:28미디어 플레이어 쓰신다면... FormatDateTime('nn:ss', MediaPlayer1.Position*0.001/3600.0/24.0);
-
하나로•2004.03.09 18:23TMediaPlayer 컴포넌트에서는 Position 라고 있습니다. 시간 타임이 초 * 1000으로 표시되네용..
-
- 손상엽
- •
- 2004.02.24 22:45
- 1 COMMENTS
- /
- 0 LIKES
-
손상엽•2004.02.24 23:08팁란에 보니까 파일에 관련된 많은 함수가 정리되어 있군요... 정말 감솨합니당...
-
- 박희경
- 2004.02.24 21:56
- 0 COMMENTS
- /
- 0 LIKES
-
- hiya
- 2004.02.24 21:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 제타
- 2004.02.24 20:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 아싸
- •
- 2004.02.24 19:46
- 3 COMMENTS
- /
- 0 LIKES
-
연기훈•2004.02.24 21:37별도 프로그램 할꺼 없습니다. 동영상 제상 창이랑 버튼 창을 따로 두고 버튼창에서 다른 창 제어만 ...
-
아싸•2004.02.24 22:02답변 감사드립니다. 실은 저두 그렇게 코딩했다가 델파이안의 media컴포넌트는 제약이 좀 있는듯 해서요 ...
-
연기훈•2004.02.25 05:38델파이 기본 media컴포가 맘에 안드시면.. jedi 컴포를 추천해요... multi-media 용 sdl이 있습니다. ...
-
- 3번째 감자
- 2004.02.24 19:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 김정식
- 2004.02.24 19:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 권규용
- •
- •
- 2004.02.24 18:37
- 1 COMMENTS
- /
- 4 LIKES
//아래의 소스에서 FilelistBox2.Directory := '.\OP\'; for i := 0 to FileListBox2.Items.Count - 1 do begin PathName := ExtractFileName(FileListBox2.Items.strings[i]); FName := FileListBox2.Items.strings[i]; CopyFile(Pchar(P...-
어이구•2004.02.24 19:51음... Directory 는 변경해도 잘 되는거 같은데염? FilelistBox1....
-
- 김민호
- 2004.02.24 06:16
- 0 COMMENTS
- /
- 0 LIKES
FilelistBox1.Directory := 'D:\임시문서\프로그램사양서\';
for i := 0 to FileListBox1.Items.Count - 1 do
begin
PathName := ExtractFileName(FileListBox1.Items.strings[i]);
FName := FileListBox1.Items.strings[i];
showmessage(FName);
end;
FilelistBox1.Directory := 'D:\임시문서\화면레이아웃\';
for i := 0 to FileListBox1.Items.Count - 1 do
begin
PathName := ExtractFileName(FileListBox1.Items.strings[i]);
FName := FileListBox1.Items.strings[i];
showmessage(FName);
end;