본문 바로가기

2017/11

[튜토리얼] 메일 전송(IdSMTP 이용) IdSMTP, IdMessage를 이용 메일 전송 예제 참고코드procedure TForm2.Button1Click(Sender: TObject); begin SMTP.Host := ''; // host address SMTP.Port := 25; MailMessage.From.Address := ''; // From email address MailMessage.Recipients.EMailAddresses := Edit2.Text;//'hskim@embarcadero.kr'; MailMessage.Subject := Edit1.Text; MailMessage.Body.Text := Memo1.Lines.Text; MailMessage.CharSet := 'UTF-8'; SMTP.Connect; SMT.. 더보기
[튜토리얼] FTP 업로드(TIdFTP 이용) IdFTP를 이용 로컬 파일을 서버로 업로드하는 예제로컬파일 선택업로드 시 프로그레스바로 진행률 표시참고 코드procedure TForm2.Button1Click(Sender: TObject); begin if OpenDialog1.Execute then Edit1.Text := OpenDialog1.FileName; end; procedure TForm2.Button2Click(Sender: TObject); var LocalPath, RemotePath: string; begin LocalPath := Edit1.Text; RemotePath := 'test/' + ExtractFileName(LocalPath); IdFTP1.Host := 'hjf.pe.kr'; IdFTP1.Port := 21; I.. 더보기
델파이/C++빌더에 TTcpClient, TTcpServer, TUdpSocket 등록하기 TTcpClient, TTcpServer, TUdpSocket 컴포넌트 들이 어느 버전에서 부터인지 모르지만, 기본 컴포넌트에서 빠져있습니다. 위 3개 소켓 컴포넌트를 등록하는 방법을 안내합니다.(이 글은 RAD Studio 10.2 도쿄 버전을 기준으로 안내합니다.) 1, 윈도우 탐색기로 열고 다음 경로(기본 샘플 경로)로 이동합니다.C:\Users\Public\Documents\Embarcadero\Studio\19.0\Samples\Object Pascal\VCL\InetWinSockets 2, RAD Studio에서 "inetwinsockets.dpk" 프로젝트를 엽니다. 3, 프로젝트 매니저의 팝업 메뉴에서 Install 메뉴를 선택 해 설치합니다. 4, 델파이 라이브러리 패스에 위 경로를 추가.. 더보기