Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Вниз

Скрыть форму   Найти похожие ветки 

← →
anod   (2002-03-31 13:01) [17]

Anatoly Podgoretsky
в onCreate, пробовал убирать не помогает.
//
if reg.ReadInteger("visible")=1 then
begin
Notef.Show;
flag:=true;
end
else
begin
Notef.Hide;
flag:=false;
end;
//
в OnShow:
ShowWindow(Application.Handle,SW_HIDE);
и ещё в
procedure TNoteF.AppIdle(Sender: TObject; var Done: Boolean);
Больше не трогаю Show и Hide.

---

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

Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.008 c