![]() |
![]() ![]() ![]() |
acSendMail component.
|
property Attach: TStringList;
|
The Attach property specifies the file names which should be included to the e-mail message on dispatching.
|
|
The Attach property is the list of strings (TStringList), where every line is the file name including full path to the file.
|
|
![]() |
|
![]() |
procedure TForm1.AttachBtnClick(Sender: TObject);
|
var
|
I: Integer;
|
begin
|
with OpenDialog1 do // TOpenDialog on form
|
if Execute and (I <> Files.Count) then
|
for I := 0 to Files.Count - 1 do
|
acSendMail1.Attach.Add(Files[I]);
|
end;
|
AttachType property;
|
OnCantAttach event.
|