![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Разбивка стоки [D6]
dp200 © (2005-06-10 09:06:00)В 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-23 14:53:00) [1]Это тоже может быть. Только это не явно
КиТаЯц (2005-06-23 14:50:00) [2]Anatoly Podgoretsky © (23.06.05 13:56) [15]
:)))
Бывает же... А я на русскую "С" грешил...
Anatoly Podgoretsky (2005-06-23 13:56:00) [3]О не 0
КиТаЯц (2005-06-23 13:40:00) [4]>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>
Если в поле "адрес" первая буква заглавная (первым идет код заглавной буквы), то Оутлук это НЕ понимает. Остальные поля - нормально.
Че такое? Почему так? Глюк оутлука?
Alexander Panov (2005-06-22 14:00:00) [5]КиТаЯц © (22.06.05 12:39) [12]
Перекодируй все символы, отличные от английских в шестнадцатеричный вид, добавь слева '%'. Вот и все.
КиТаЯц (2005-06-22 12:39:00) [6]Вопрос в догонку... Может знает кто...
pCh :=Pchar('mailto:zzz@zzz.com?subject=Типа заголовок&body="Типа тело письма"');
ShellExecute(0, 'open', pCh, nil, nil, SW_SHOWNORMAL);
В Outlook передается нормально. А вот если браузером по умолчанию назначить Mozilla Thunderbird, то в заголовке и теле - кракозябры. Можно как-нибудь текст закодировать? Ну, типа "пробел" - это "%20", кирилическая "А" - это...
зы. Mozilla Thunderbird рекомендовали, только что установил глянуть и вот такая байда... :-(
dmitry501 (2005-06-10 11:18:00) [7]Anatoly Podgoretsky © (10.06.05 10:35) [10]
/ Выбран потому, что этот символ не встречается в имени файла.
Anatoly Podgoretsky (2005-06-10 10:35:00) [8]dmitry501 © (10.06.05 10:22) [6]
Гы, и где туть /
sofs (2005-06-10 10:29:00) [9]text+#13#10
dmitry501 (2005-06-10 10:27:00) [10]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".
Digitman (2005-06-10 10:23:00) [11]http://www.ianr.unl.edu/internet/mailto.html
MailTo with multiline message in Body
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:22:00) [12]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;
-=XP=- (2005-06-10 10:19:00) [13]Т-с-с-с... ;)
Anatoly Podgoretsky (2005-06-10 09:58:00) [14]Оригинальнейший формат.
-=XP=- (2005-06-10 09:55:00) [15]'C:11.txt'#13'C:24е34е6.txt'
dp200 (2005-06-10 09:41:00) [16]В письме не одной строкой, (Название файлов)
"C:11.txtC:24е34е6.txt" а чтобы отдельно на разных строках
вот так:
C:11.txt
C:24е34е6.txt
Anatoly Podgoretsky (2005-06-10 09:32:00) [17]Чего, чего сделать?