Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.21;
Скачать: CL | DM;

Вниз

Помогите пожалуйста.   Найти похожие ветки 

 
HDD ©   (2002-02-05 16:23) [0]

var
i: integer;
s : string;
begin
for i:=0 to RichEdit1.Lines.Count - 1 do
ShellExecute(handle,"open",PChar("mailto:ctapik-net@inbox.ru?subject=Report a bug&body="+ RichEdit1.Lines.Strings[i]), NIL, NIL, SW_SHOWNORMAL);
Хочу чтобы текст с моего редактора попадал в почтовую программу.
Но получается что каждая строка открывается в новом письме?
И ещё вопросик:
if RichEdit1.SelLength >0 then
RichEdit1.Lines.Text:= AnsiUpperCase(PChar(RichEdit1.SelText));
Чё-то не догоню как сделать чтобы в Большие буквы переходил только выделенный текст
Заранее благодарен Кирилл


 
Basilio ©   (2002-02-05 16:34) [1]

1) ShellExecute(handle,"open",PChar("mailto:ctapik-net@inbox.ru?subject=Report a bug&body="
+ RichEdit1.Text), NIL, NIL,SW_SHOWNORMAL);
2) RichEdit1.SelText:=AnsiUpperCase(RichEdit1.SelText);


 
MBo ©   (2002-02-05 16:34) [2]

1)
a bug&body="+ RichEdit1.Lines.Text),
и без цикла
2)
RichEdit1.SelText:= AnsiUpperCase(RichEdit1.SelText);


 
HDD ©   (2002-02-05 16:40) [3]

Благодарю вас


 
HDD ©   (2002-02-05 16:44) [4]

А с почтой получается такая беда. У меня в редакторе 3 строчки а в почтовом клиенте всё в одну


 
HDD ©   (2002-02-06 00:41) [5]

Помогите плиз


 
Donal_Graeme   (2002-02-06 03:00) [6]

хм...возможно, надо символы переноса строки заменить на тэги BR



Страницы: 1 вся ветка

Текущий архив: 2002.02.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
3-66494
DeNNiss
2002-01-29 15:52
2002.02.21
уважаемые программисты!


4-66702
iyalosovetsky
2001-12-20 21:28
2002.02.21
Проверка пра пользователя


1-66604
Tadeush
2002-02-06 13:04
2002.02.21
Как развернуть строку.


14-66665
ghg
2002-01-02 14:13
2002.02.21
оптическая мышка


1-66522
DenMat
2002-02-07 09:53
2002.02.21
Поинтер