안녕하세요. 천리안 프로그래머포럼 C++Builder 담당자 임펠리테리입니다.

다음 소스를 참고하시기 바랍니다. 제가 어시스트 프로그램을 작성할때 써먹은

코드입니다. C++ 코드이긴 하지만 델파이유저에게도 그리 어렵지 않을겁니다.

void __fastcall TAboutForm::EmailLabelClick(TObject *Sender)
{
    // 내컴퓨터HKEY_CLASSES_ROOT\mailto\shell\open\command
    TRegistry *Reg = new TRegistry;
    Reg->RootKey = HKEY_CLASSES_ROOT;
    if (Reg->OpenKey("\mailto", false))
        if (Reg->OpenKey("\shell", false))
            if (Reg->OpenKey("\open", false))
                if (Reg->OpenKey("\command", false))
                {
                    AnsiString MailProg = Reg->ReadString("");
                    MailProg.SetLength(MailProg.Length()-2);
                    MailProg = MailProg+ "mailto:" + EmailLabel->Caption;
                    WinExec(MailProg.c_str(), SW_SHOWNORMAL);
                }
    delete Reg;
}

그럼 참고하시길...



독립문에서 임펠리테리였습니다.

(cbuilder, cbuilder@thrunet.com)