Как сделать калькулятор в Delphi?

Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.

Как Delphi реализует многоплатформенную разработку?

Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...

При чтении почты POP3 отделять Attachment и сохранять в файл

Советы » E-mail » При чтении почты POP3 отделять Attachment и сохранять в файл

Почту читаю, используя компонент TNMPOP3 (стандартный в поставке D5), еще пробовал использовать библитеку Indy, но не помогло. А проблема заключается в том, что после прочтения письма, невозможно отделить аттачмент от тела. Но это происходит не со всеми письмами. Если я отправлю письмо с аттачем, то я могу его нормально читать и разбирать, а если отправляет Заказчик, то получается то, что я описал. Причем, Outlook и theBat, эти письма нормально читают и аттач МОЖНО сохранить.

for

intIndex := 0 to

Pred(Msg.MessageParts.Count) do

begin

if

(Msg.MessageParts.Items[intIndex] is

TIdAttachment) then

begin

//general attachment TIdAttachment(Msg.MessageParts.Items[intIndex]).SaveToFile( TIdAttachment(Msg.MessageParts.Items[intIndex]).Filename); TIdAttachment.Create(Msg1.MessageParts, TIdAttachment(Msg.MessageParts.Items[intIndex]).Filename); end

else

begin

//body text if

Msg.MessageParts.Items[intIndex] is

TIdText then

begin

Memo1.Lines.Clear; Memo1.Lines.AddStrings(TIdText(Msg.MessageParts.Items[intIndex]).Body); end

end

; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2024 - All Rights Reserved - www.delphirus.com