Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[1707] >질문< [델파이] 아이콘 관련 질문!(초보)
shaver [ ] 1569 읽음    1998-03-03 14:04
안녕하십니까. 델초보 입니다.

처음으로 글을 올리는군요.

간단한 아이콘 뷰어를 만들려고 합니다.

일단 소스를 보시지요.

procedure TForm1.Button1Click(Sender: TObject);
Var
        Files   :TStrings;
        Icon    :TIcon;
        Index   :Integer;
        listItem        :TListItem;
begin
        Icon := TIcon.Create;

        if OpenDialog1.Execute then
        begin
                ImageList1.Clear;
                ListView1.Items.Clear;
                Files := OpenDialog1.Files;
                For Index := 0 to Files.Count - 1 do
                begin
                        Icon.LoadFromFile(Files.Strings[Index]);
                        ImageList1.AddIcon(Icon);
                end;

                For Index := 0 to ImageList1.Count - 1 do
                begin
                        ListItem := ListView1.Items.Add;
                        ListItem.Caption := Files.Strings[Index];
                        ListItem.ImageIndex := Index;
                end;
        end;
        Icon.Free;
end;

[질문 1]
위처럼 하면 선택된 파일의 이름이 경로까지 같이 기억됩니다.
리스트 뷰에 표시할때 경로는 빼고 파일 이름만 표시하고자합니다.
어떻게 해야하죠?

[질문 2]
위에서는 대화상자에서 선택된 파일만 불러오게 되어있습니다.
지정한 폴더에 있는 아이콘 파일을 자동으로 싸그리 읽으려면 어떻게
해야하죠?

[질문 3]
ICL 파일을 읽으려고 합니다.
전혀 방법을 모르겠습니다.(아직 델초보)

고수님들의 답변을 부탁드립니다.


+ -

관련 글 리스트
1707 >질문< [델파이] 아이콘 관련 질문!(초보) shaver 1569 1998/03/03
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.