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

Вниз

TFrame.Onshow   Найти похожие ветки 

 
XPOID   (2005-07-20 14:19) [0]

добрый день, как всегда срочный вопрос)))
Воопщем мне нужно перегнать до завтра все формы во фреймы, чтобы затем вставить в уже написанную оболочку. Все шло как по маслу, пока я не столкнулся с забавной проблемой...У фреймов нету события OnShow...Что делать?
В создании компонентов я пока профан, разбираться начал тока недавно и поэтому добавить все ручками не получилось...Помогите,плз


 
xmed ©   (2005-07-25 14:48) [1]

Если не ошибаюсь OnResize срабатывает как только он (TFrame) сотворяется и далее в любых случаях при Resiz"e фрейма.
Тоесть сделать переменную типа CreatedF: boolean и как только сработал первый раз OnResize делать нужное действие и изменять CreatedF на фальш дабы в последствии он наше действие не производилось

procedure TFrame2.FrameResize(Sender: TObject);
begin
   if CreatedF then
         do_your_actions;
end;


 
xmed ©   (2005-07-25 14:50) [2]

Пардон, трохи недописал

procedure TFrame2.FrameResize(Sender: TObject);
begin
  if CreatedF then begin
        do_your_actions; // Ваше действие
        CreatedF := False;  
  end;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.027 c
2-1135845650
azl
2005-12-29 11:40
2006.01.22
Корректное завершение работы программы при выключении ПК


14-1134829873
Piter
2005-12-17 17:31
2006.01.22
Чистосердечное признание


14-1133813568
Rouse_
2005-12-05 23:12
2006.01.22
Новогодний MMP (Совместный)


4-1131538341
Spose
2005-11-09 15:12
2006.01.22
Скрыть окно чужого приложения


1-1135074624
KvORubin
2005-12-20 13:30
2006.01.22
Мастера!!! подскажите болбесу!!!