Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 04.01.2011, 14:12
Аватар для ALexandr555
ALexandr555 ALexandr555 вне форума
Специалист
 
Регистрация: 09.10.2010
Адрес: Тольятти
Сообщения: 803
Версия Delphi: Delphi 7
Репутация: 2064
По умолчанию StringReplace

Код:
BMP := TBitmap.Create;
BMP.LoadFromFile('crest.bmp');
SS := TStringStream.Create(BitmapToRTF(BMP));
StringReplace(Msg,'=)',SS,[rfReplaceAll]);
[Error] Unit1.pas(453): Incompatible types: 'String' and 'TStringStream'

пытаюсь сделать смайлики таким вот способом не выходит, можно ли аналогично сделать
тоесть хочу заменить нужный текст на картинку
Ответить с цитированием
  #2  
Старый 04.01.2011, 14:53
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

Цитата:
BMP.LoadFromFile('crest.bmp');
Картинка точно грузится без указания каталога к файлу?
И потом, так нельзя работать с типом TStringStream, вам-же компилятор об этом и кричит. Насколько я помню надо примерно так:
Код:
StringReplace(Msg,'=)',SS.DataString,[rfReplaceAll]);
Только, даже в таком виде результат StringReplace будет в пустоту записан. Видимо так предполагалось:
Код:
Msg := StringReplace(Msg,'=)',SS.DataString,[rfReplaceAll]);
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.

Последний раз редактировалось Страдалецъ, 04.01.2011 в 15:03.
Ответить с цитированием
  #3  
Старый 04.01.2011, 16:18
Аватар для ALexandr555
ALexandr555 ALexandr555 вне форума
Специалист
 
Регистрация: 09.10.2010
Адрес: Тольятти
Сообщения: 803
Версия Delphi: Delphi 7
Репутация: 2064
По умолчанию

Цитата:
{\rtf1 {\pict\dibitmap 28000000100000001100000001000800000000001001000000 00000000000000000000000000000000000000000080000080 000000808000800000008000800080800000C0C0C000C0DCC0 00F0CAA6000020400000206000002080000020A0000020C000 0020E000004000000040200000404000004060000040800000 40A0000040C0000040E0000060000000602000006040000060 6000006080000060A0000060C0000060E00000800000008020 000080400000806000008080000080A0000080C0000080E000 00A0000000A0200000A0400000A0600000A0800000A0A00000 A0C00000A0E00000C0000000C0200000C0400000C0600000C0 800000C0A00000C0C00000C0E00000E0000000E0200000E040 0000E0600000E0800000E0A00000E0C00000E0E00040000000 400020004000400040006000400080004000A0004000C00040 00E00040200000402020004020400040206000402080004020 A0004020C0004020E000404000004040200040404000404060 00404080004040A0004040C0004040E0004060000040602000 4060400040606000406080004060A0004060C0004060E00040 800000408020004080400040806000408080004080A0004080 C0004080E00040A0000040A0200040A0400040A0600040A080 0040A0A00040A0C00040A0E00040C0000040C0200040C04000 40C0600040C0800040C0A00040C0C00040C0E00040E0000040 E0200040E0400040E0600040E0800040E0A00040E0C00040E0 E00080000000800020008000400080006000800080008000A0 008000C0008000E00080200000802020008020400080206000 802080008020A0008020C0008020E000804000008040200080 40400080406000804080008040A0008040C0008040E0008060 0000806020008060400080606000806080008060A0008060C0 008060E0008080000080802000808040008080600080808000 8080A0008080C0008080E00080A0000080A0200080A0400080 A0600080A0800080A0A00080A0C00080A0E00080C0000080C0 200080C0400080C0600080C0800080C0A00080C0C00080C0E0 0080E0000080E0200080E0400080E0600080E0800080E0A000 80E0C00080E0E000C0000000C0002000C0004000C0006000C0 008000C000A000C000C000C000E000C0200000C0202000C020 4000C0206000C0208000C020A000C020C000C020E000C04000 00C0402000C0404000C0406000C0408000C040A000C040C000 C040E000C0600000C0602000C0604000C0606000C0608000C0 60A000C060C000C060E000C0800000C0802000C0804000C080 6000C0808000C080A000C080C000C080E000C0A00000C0A020 00C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000 C0C00000C0C02000C0C04000C0C06000C0C08000C0C0A000F0 FBFF00A4A0A000808080000000FF0000FF000000FFFF00FF00 0000FF00FF00FFFF0000FFFFFF00EFEFEFEFEFEFEFEFEFEFEF EFEFEFEFEFA6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A65E5E5E5E 5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E 5E5E5E5656565C9B9B9B5C565C9B9B9B5C56565656569B0808 089B549B0808089B5656565656549B0808089B0808089B5456 5656565656549BF6F6F6F6F69B545656565656565656549BF6 F6F69B5456565656A6A7A7A7A79C9BF6F6F69B9CA7A7A7A6A7 A7A7A79C9BFFFFFFFFFF9B9CA7A7A7A7A7A79C9BFFFFFF9BFF FFFF9B9CA7A7A7A7A79BFFFFFF9B9C9BFFFFFF9BA7A7AFAFAF A49B9B9BA4AFA49B9B9BA4AFAFAFAFAFAFAFAFAFAFAFAFAFAF AFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFEFEFEFEFEF EFEFEFEFEFEFEFEFEFEFEF }}
вот так он заменяет
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:05.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025