Разбивка стоки

← →
dp200 © (2005-06-10 09:06) [0]

В Memo1 отображаются имена и пути открываемых файлов, после чего я их передаю в почтовую программку, в тело нового письма.Но в тело письма они передаются одной строкой, как их упорядочить чтобы получился список(каждый файл на отдельной строке)?

Memo1.Lines.Assign(OpenDialog1.Files);
pCh :=Pchar("mailto:zzz@zzz.com?subject=Report&body=""+Memo1.Text+ """);
ShellExecute(0, "open", pCh, nil, nil, SW_SHOWNORMAL);

← →
Anatoly Podgoretsky © (2005-06-10 09:32) [1]

Чего, чего сделать?

← →
dp200 © (2005-06-10 09:41) [2]

В письме не одной строкой, (Название файлов)
"C:11.txtC:24е34е6.txt" а чтобы отдельно на разных строках
вот так:
C:11.txt
C:24е34е6.txt

← →
-=XP=- © (2005-06-10 09:55) [3]

"C:11.txt"#13"C:24е34е6.txt"

← →
Anatoly Podgoretsky © (2005-06-10 09:58) [4]

Оригинальнейший формат.

← →
-=XP=- © (2005-06-10 10:19) [5]

Т-с-с-с... ;)

← →
dmitry501 © (2005-06-10 10:22) [6]

dp200 © (10.06.05 9:41) [2]
Вот примерно так:
var pCh : PChar; Files : String; begin if OpenDialog1.Execute then begin Memo1.Lines.Assign(OpenDialog1.Files); memo1.Lines.Delimiter := "/"; Files := memo1.Lines.DelimitedText; Files := AnsiReplaceStr(Files,"/","%0D%0A"); pCh :=Pchar("mailto:zzz@zzz.com?subject=Report&body="" + Files + """); ShellExecute(0, "open", pCh, nil, nil, SW_SHOWNORMAL); end; end;

← →
Digitman © (2005-06-10 10:23) [7]

http://www.ianr.unl.edu/internet/mailto.html

MailTo with multiline message in Body

<a href="mailto:astark1@unl.edu?&body=The message"s first line. &body=Second line. &body=Third Line. ">
IMPORTANT NOTE: This feature will NOT work with all e-mail programs, in which case the body information appears as a single line.

← →
dmitry501 © (2005-06-10 10:27) [8]

Digitman © (10.06.05 10:23) [7]

RFC 1738 requires that many characters in URLs be encoded. This
affects the mailto scheme for some common characters that might
appear in addresses, headers or message contents. One such character
is space (" ", ASCII hex 20). Note the examples above that use "%20"
for space in the message body. Also note that line breaks in the
body of a message MUST be encoded with "%0D%0A".

← →
sofs © (2005-06-10 10:29) [9]

text+#13#10

← →
Anatoly Podgoretsky © (2005-06-10 10:35) [10]

dmitry501 © (10.06.05 10:22) [6]
Гы, и где туть /

← →
dmitry501 © (2005-06-10 11:18) [11]

Anatoly Podgoretsky © (10.06.05 10:35) [10]
/ Выбран потому, что этот символ не встречается в имени файла.

← →
КиТаЯц © (2005-06-22 12:39) [12]

Вопрос в догонку... Может знает кто...
pCh :=Pchar("mailto:zzz@zzz.com?subject=Типа заголовок&body="Типа тело письма""); ShellExecute(0, "open", pCh, nil, nil, SW_SHOWNORMAL);

В Outlook передается нормально. А вот если браузером по умолчанию назначить Mozilla Thunderbird, то в заголовке и теле - кракозябры. Можно как-нибудь текст закодировать? Ну, типа "пробел" - это "%20", кирилическая "А" - это...

зы. Mozilla Thunderbird рекомендовали, только что установил глянуть и вот такая байда... :-(

КиТаЯц © (22.06.05 12:39) [12]

Перекодируй все символы, отличные от английских в шестнадцатеричный вид, добавь слева "%". Вот и все.

>Alexander Panov © (22.06.05 14:00) [13]

Спасибо.
Для Thunderbird все равно не помогло. Думаю проблема в самом Thunderbird...

Теперь другая беда. Причем для меня давольно неожиданная. :-/

Если передать так:
mailto:%E0%E2%F2%EE%F0%F3%20%EF%F0%EE%E3%F0%E0%EC%EC%FB<mail@mail.mail>
(mailto:автору программы<mail@mail.mail>)
то все нормально,

а если так
mailto:%CO%E2%F2%EE%F0%F3%20%EF%F0%EE%E3%F0%E0%EC%EC%FB<mail@mail.mail>
(mailto:Автору программы<mail@mail.mail>)

то в Outlooke получается
%COвтору программы <mail@mail.mail>

Если в поле "адрес" первая буква заглавная (первым идет код заглавной буквы), то Оутлук это НЕ понимает. Остальные поля - нормально.
Че такое? Почему так? Глюк оутлука?

О не 0

Это тоже может быть. Только это не явно

Разбивка стоки Найти похожие ветки