Код:
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_ динамически так же создаються мемо,едит,кнопка...
Я думаю что это немного геморный способ все это сделать ..как еще можно реализовать пм?