Delphi/꿀팁
[E-Mail] 첨부파일 다운로드 하기 - 5
TEmailInfo = record Index: Integer; UID: string; PartNumber: string; TransferEncoding: string; FileName: string; end; PEmailInfo = ^TEmailInfo; TAttachInfo = record Index: Integer; end; PAttachInfo = ^TAttachInfo; TForm1 = Class(TForm) .. lstMailBox: TListBox; lstMailList: TListView; lstAttachList: TListView; private public SelectMsg: TIdMessage; end; //lstAttachList의 OnDblClick 이벤트를 추가합니다. proc..