전자 메일 지원에 필수적인 소프트웨어는 Delphi를 사용하여 프로그램 인터페이스의 링크를 클릭 하여이 기능을 구현할 수 있습니다.
먼저,이 장치는 사용하려는 API 기능을 캡슐화하기 때문에 프로그램의 인터페이스 부분에 Shellapi를 사용합니다. 그런 다음 프로그램을 쓸 수 있습니다. 다음은 프로그램 코드입니다.
절차 sendmail
var
s 문자열
시작하다
s = 'mailto[email protected]'
shellexecute0 'Open' pchars nil nil sw_shownormal
끝
이러한 방식 으로이 프로세스를 수행하면 이메일 보내기 프로그램을 자동으로 열고 [email protected]으로 이메일을 보낼 수 있습니다.
실제로 사용하면 때때로 여러 사서함에 이메일을 동시에 보내야하며 S의 값 만 변경해야합니다.
s = 'mailto[email protected]? to = [email protected] & to = [email protected]'
이렇게하면 여러 사서함에 동시에 이메일을 보낼 수 있습니다.
이메일의 제목과 텍스트를 결정하려면 S에 값을 할당 할 수 있습니다.
s = 'mailto[email protected]? 주제 = hello & body = hello'
주의를 기울이십시오 :
1. 제목과 텍스트에 값을 할당 할 때 따옴표를 추가 할 필요가 없습니다.
2. 많은 자료가 말하지만 : 제목과 텍스트에 공간이 포함되어 있으면 %20으로 변환해야합니다. 그러나 디버깅 프로세스 중에 프로그램은 변환되지 않더라도 정상적으로 실행될 수 있습니다.
이 프로그램은 Windows 2000 Professional, Delphi 5 및 MS Outlook Express에서 실행되고 전달됩니다. 자세한 내용은 이메일 보안 이메일 사용 기본 사항 이메일 서버 주제를 참조하십시오.