Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Видимость формы [D7]

Zesik © (2007-06-04 22:29:00)
Дорогие мастера
у меня имеется глюк
при вызове процедуры
Form.Visible:=false;
форма не исчезает
хотя раньше все отрабатывало

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

Anatoly Podgoretsky (2007-06-05 12:05:00) [1]
> homm (05.06.2007 11:36:18) [18]

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

> так надо)

так ему и надо

homm (2007-06-05 11:36:00) [2]
> такого делать нельзя,выдает ошибку(почему не спрашивайте:),так надо)

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

Плохиш (2007-06-05 11:18:00) [3]

> 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('Иди учить основы!');

Плохиш (2007-06-05 11:15:00) [4]

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

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

Kolan (2007-06-05 08:31:00) [5]
> такого делать нельзя,выдает ошибку(почему не спрашивайте

Тут видимо и ошибка…

Однокамушкин (2007-06-05 08:24:00) [6]
Попрпобуйте после Visible:=False добавить Application.ProcessMessages...

Loginov Dmitry (2007-06-05 00:09:00) [7]
> есть ли другие методы для скрытия формы

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

Zesik (2007-06-05 00:04:00) [8]

> Visible:=false;

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

Anatoly Podgoretsky (2007-06-04 23:57:00) [9]
> Zesik (04.06.2007 23:44:10) [10]

Visible:=false;

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

Zesik (2007-06-04 23:44:00) [10]

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

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

Loginov Dmitry (2007-06-04 23:32:00) [11]
И лучше убрать упоминание ZagruzkaFormиз всех методов класса TZagruzkaForm

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

Zesik (2007-06-04 23:00:00) [13]
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;
повторяю раньше код отрабатывал

DVM (2007-06-04 22:56:00) [14]

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

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

DVM (2007-06-04 22:55:00) [15]

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

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

Zesik (2007-06-04 22:53:00) [16]
да
вот в этом вся и беда

Loginov Dmitry (2007-06-04 22:44:00) [17]
Хочешь сказать, что если поместить на форме кнопку и в ее обработчике разместить указанный код, то форма все-равно не исчезает?

Zesik (2007-06-04 22:34:00) [18]
это не имеет значения

Loginov Dmitry (2007-06-04 22:32:00) [19]
Какое событие приводит в выполнению приведенной строки кода?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »