Hi,
Trying to get the contents of a DBMemo into the IdMsg.Body
Any help appreciated.
I can get it into the DBMemo:
if (MyMsg.MessageParts.Items[MsgPart] is TidText) then
begin
MyTable.FieldByName('BodyText').AsString :=
TidText(MyMsg.MessageParts.Items[MsgPart]).Body.Text;
end;
But using the same logic(??) I can't get it back:
MyMsg.Body.AddStrings(MyTable.FieldByName('BodyText').AsString));
Also, will this work to add a file attachment:
MyMsg.MessageParts.Add.StoredPathName :=
MyTable.FieldByName('AttachmentName').AsString;
Thanks,
Lance
_________________
Using:
Delphi 7
Paradox 7
Windows XP Pro
