Видимость формы

← →
Zesik © (2007-06-04 22:29) [0]

Дорогие мастера
у меня имеется глюк
при вызове процедуры
Form.Visible:=false;
форма не исчезает
хотя раньше все отрабатывало

Поэтому может ктонибуть дать кодик, для скрытия формы

← →
Loginov Dmitry © (2007-06-04 22:32) [1]

Какое событие приводит в выполнению приведенной строки кода?

← →
Zesik © (2007-06-04 22:34) [2]

это не имеет значения

← →
Loginov Dmitry © (2007-06-04 22:44) [3]

Хочешь сказать, что если поместить на форме кнопку и в ее обработчике разместить указанный код, то форма все-равно не исчезает?

← →
Zesik © (2007-06-04 22:53) [4]

да
вот в этом вся и беда

← →
DVM © (2007-06-04 22:55) [5]

> Хочешь сказать, что если поместить на форме кнопку и в ее
> обработчике разместить указанный код, то форма все-равно
> не исчезает?

Ну и такое возможно, может у него там понапихано собственных обработчиков сообщений.

← →
DVM © (2007-06-04 22:56) [6]

> да
> вот в этом вся и беда

Покажи dfm формы и pas (хотя бы только interface часть)

← →
Zesik © (2007-06-04 23:00) [7]

procedure TZagruzkaForm.Timer1Timer(Sender: TObject); var y:integer; begin y:=ProgressBar1.Position; z:=y+5; ProgressBar1.Position:=z; y:=z; if z=100 then begin ZagruzkaForm.Visible:=false; Timer1.Enabled:=false; PasForm.ShowModal; end;
повторяю раньше код отрабатывал

← →
Loginov Dmitry © (2007-06-04 23:31) [8]

А если чуть-чуть пошаманить :) Вот так не сработает?
ZagruzkaForm.Visible:=true;
ZagruzkaForm.Visible:=false;

← →
Loginov Dmitry © (2007-06-04 23:32) [9]

И лучше убрать упоминание ZagruzkaForm из всех методов класса TZagruzkaForm

← →
Zesik © (2007-06-04 23:44) [10]

> Loginov Dmitry © (04.06.07 23:31) [8]
>
> А если чуть-чуть пошаманить :) Вот так не сработает?
> ZagruzkaForm.Visible:=true;
> ZagruzkaForm.Visible:=false;
>

ZagruzkaForm.Visible:=true;
такого делать нельзя,выдает ошибку(почему не спрашивайте:),так надо)

← →
Anatoly Podgoretsky © (2007-06-04 23:57) [11]

> Zesik (04.06.2007 23:44:10) [10]

Visible:=false;

И больше ничего

← →
Zesik © (2007-06-05 00:04) [12]

> Visible:=false;

не помагает
я повторяю есть ли другие методы для скрытия формы
есть метод сделать форму прозрачной(но я его не помню:( )

← →
Loginov Dmitry © (2007-06-05 00:09) [13]

> есть ли другие методы для скрытия формы

есть типа этого:
ShowWindow(Handle, SW_HIDE)

← →
Однокамушкин (2007-06-05 08:24) [14]

Попрпобуйте после Visible:=False добавить Application.ProcessMessages...

> такого делать нельзя,выдает ошибку(почему не спрашивайте

Тут видимо и ошибка&#133

> Zesik © (04.06.07 22:29)
> Дорогие мастера
> у меня имеется глюк
> при вызове процедуры
> Form.Visible:=false;
> форма не исчезает

Форма скрывается, но не так какую ожидаешь...

> Zesik © (04.06.07 23:00) [7]
>
> procedure TZagruzkaForm.Timer1Timer(Sender: TObject);
> var
> y:integer;
> begin
> y:=ProgressBar1.Position;
> z:=y+5;
> ProgressBar1.Position:=z;
> y:=z;
> if z=100 then
> begin
> ZagruzkaForm.Visible:=false;
> Timer1.Enabled:=false;
> PasForm.ShowModal;
> end;

Предлагаю в этот обработчик включить следующий код:
if self <> ZagruzkaForm then MessageBox("Иди учить основы!");

> такого делать нельзя,выдает ошибку(почему не спрашивайте:),так надо)

Ну тогда и ты нас не спрашивай ничего. Или выкладывай все на чистоту.

> homm (05.06.2007 11:36:18) [18]

Да не и не надо, и так все понятно

> так надо)

так ему и надо

Видимость формы Найти похожие ветки