Envio de Email via MAPI
Pessoal,
Estou tentando usar o código do nosso amigo Daniel Freitas, mas algo está ocorrendo e não tenho idéia do que seja:
procedure TDMMAPIMail.AddToAddressList(AnAddressList: TIDEMailAddressList; AStringList: TStringList);
var
tempStr: String;
addressItem: TIdEMailAddressItem;
begin
for tempStr in AStringList do
begin
if(Trim(tempStr) <> ´´) then
begin
addressItem := AnAddressList.Add;
addressItem.Address := tempStr;
addressItem.Name := tempStr;
end;
end;
end;
Erro ao compilar: Operator not applicable to this operand type
Estou tentando usar o código do nosso amigo Daniel Freitas, mas algo está ocorrendo e não tenho idéia do que seja:
procedure TDMMAPIMail.AddToAddressList(AnAddressList: TIDEMailAddressList; AStringList: TStringList);
var
tempStr: String;
addressItem: TIdEMailAddressItem;
begin
for tempStr in AStringList do
begin
if(Trim(tempStr) <> ´´) then
begin
addressItem := AnAddressList.Add;
addressItem.Address := tempStr;
addressItem.Name := tempStr;
end;
end;
end;
Erro ao compilar: Operator not applicable to this operand type
Paulocesar1301
Curtidas 0
Respostas
Massuda
06/03/2006
O código que você postou é para Delphi 8 ou mais novo... qual a versão do seu Delphi? Em que linha dá o problema?
GOSTEI 0
Paulocesar1301
06/03/2006
Bom então o erro sou eu mesmo... estou usando D6...
só estou procurando um modo rápido, leve, com anexos e útil de mandar e-mails
só estou procurando um modo rápido, leve, com anexos e útil de mandar e-mails
GOSTEI 0