Delphi/꿀팁
[E-Mail] 메일 및 첨부파일 내용 가져오기 - 4
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; //lstMailList의 OnSelectItem 이벤트를 추가합니다. proc..