[Booo]

Есть чат :с общим чатом и с приватным чатом .Но приватный чат реализован так ,что он в одном фрейме с общим чатом ,просто там добавляется фраза приват и показывается только тому кому адресована.
Хочу сделать приват в отдельное окно с вкадками пользователей где происходит общение(типа как в аське).использую pagecontrol&tabsheet.
Когда приходит сообщение приватное идет проверка есть ли вкладка с именем пользователся от которого пришло приватное сообщение (если есть то на ней и все пишеться) инач если нет то динамически создаю вкладку с именем от кого приват там создаю мемо ,кнопки и т.п.
Работает это очень плохо и иногда ваще ни че не происходит..думаю ошибка в условии else...
Подскажите как можно проще такое реализовать?

[Страдалецъ]

Без исходного кода предположить почему плохо работает я лично не берусь. Маловато информации.

[Booo]

Код:

if Copy(s,1,2) = '#P' then begin
   Delete(s,1,2);

   to_ := Copy(s,1,Pos(';',s)-1);{присваеваем кому}
   Delete(s,1,Pos(';',s));{присваеваем от кого}

   from_ := Copy(s,1,Pos(';',s)-1);

   if (to_ = nickname)or(from_ = nickname) then
for I := 0 to form3.PageControl.PageCount - 1 do
 if form3.PageControl.Pages [i].Caption =from_  then 
form3.button2.click {Сообщение заноситься в уже существующюю вкладку т.е. пм происходит с челом с которым уже оно было..}
else 
form3.button3.click;{здесь будет динамиячески создаваться вкладка ,с мемо для отображения,кдитом для ввода текста и с кнопкой посылания сообщения}
{ТЕПЕРЬ ФОРМА 3}
button2.click;
buitton3.click;

помогите реализовать обработчик на кнопку 2 и кнопку 3 на третьей форме...на нажатии второй кнопки должна делаться активная вкладка у которой caption равно значению переменной from_..
на кнопку 3 должен создаваться табшит с caption = from_ динамически так же создаються мемо,едит,кнопка...

Я думаю что это немного геморный способ все это сделать ..как еще можно реализовать пм?

[Страдалецъ]

Лучше всего это все сделать создав собственный класс на основе TPageControl.

[Booo]

а поподробнее :-)

[r1x]

Вот вообщем этот компонент с клона Агента какраз выполняет то что ты хочешь...правдо тебе для этого потрудитсо надо чтоб она работал на тебя )))