Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Добавление текста в динамически созданый TRichEdit

Автор: GORA 27.9.2007, 21:34

Возникла следующая проблема. Пишу ICQ клиент, делаю окно сообщений с отдельными вкладками, т.е. как в квипе, отправку сообщений с конкретной вкладки уже сделал. Теперь проблема, как мне добавлять текст на RichEdit на определенной вкладке при получении сообщения от конкретного контакта?
p.s. При создании отдельных вкладок на PageControl, каждой TabSheet в свойстве Tag присваивается UIN контакта, т.е. можно найти нужную вкладку по номеру UIN

Автор: Sanchezzz 27.9.2007, 21:58

это то вопрос я отвечал. много раз. поиск по форуму.. обратись контролам какой первый создаешь на в кладке и присваивай парент тот по номеру будет 0 и тд.
---
если брать компонет TICQClient

поиск по табом и проверка юзверя из списка
v

Код


ar
StUIN,i:integer
Sl:Tmemo;
begin
if pagecontrol1.PageCount > 0 then
for i := 0 to PageControl1.PageCount - 1 do begin
if pagecontrol1.Pages[i].tag=StUIN then begin
with PageControl1 do
//if Pages[i].ControlCount > 0 then
if Pages[IDDD].Controls[0] is TMemo then  begin //проверяем мемо ли это
Sl:=Tmemo(Pages[IDDD].Controls[0);
sl.Lines.Add(э)
...