🚀 go-pugleaf

Hi,

think that this code should work

BCB = version 4
Indy = 9.0.4



private: // User declarations
    String maillist;

void __fastcall TF_Deelnemers::Email1Click(TObject *Sender)
{
    String temp,tornooi,tornooinaam,mailsettings;
    maillist="";

    tornooinaam="tornooi";
    maillist="test@test";
    TIdEMailAddressItem *MAILLIST = IdMessage1->Sender;
    TIdEMailAddressList *TOLIST = new  TIdEMailAddressList(this);
    TIdEMailAddressList *BCCLIST = new  TIdEMailAddressList(this);
    mailsettings="email from";
    MAILLIST->Name=mailsettings;
    mailsettings="test@test";
    MAILLIST->Address=mailsettings;
    TOLIST->EMailAddresses=maillist;
    IdMessage1->Recipients=TOLIST;
    IdMessage1->From=MAILLIST;
    IdMessage1->Sender=MAILLIST;
    maillist="francois.van.wouwe@skynet.be";
    BCCLIST->EMailAddresses=maillist;
    IdMessage1->BccList=BCCLIST;
            IdMessage1->Subject="Confirmation of inscription ";
    IdMessage1->ContentType="text/plain";
    IdMessage1->Body->Clear();
            IdMessage1->Body->Add("\nWith sporty greetings\n");
    mailsettings="relay.skynet.be";
    IdSMTP1->Host=mailsettings;
    mailsettings="sky83302";
    IdSMTP1->Username=mailsettings;
    if (!IdSMTP1->Connected())
        {
        IdSMTP1->Connect(-1);
        }
    IdSMTP1->Send(IdMessage1);
    IdSMTP1->Disconnect();
    delete TOLIST;
    delete BCCLIST;
    IdSMTP1->Destroying();
    IdMessage1->Destroying();
    ShowMessage("E-mail is verstuurd");
}

kind regards
Francois Van Wouwe


-- 
met vriendelijke groeten

Francois Van Wouwe
"Hans Galema" <notused@notused.nl> wrote in message 
news:4608f66e@newsgroups.borland.com...
> Van Wouwe Francois wrote:
>
>> When I use the SMTP component for sending email, the mail is send out,
>
> Which Indy version do you use? Version of bcb?
>
>> but when I close the form
>> I get an access violation at a given address, during the read of that 
>> address.
>
> Please post a complete example. As small as possible. Whitout
> the use of the database. So we can compile and link to see what
> happens.
>
> Hans.