|
|
|
| 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.
|