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

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

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

процедура после FormShow [D7, XP]

Страницы: < 1 2
Fynjy © (2008-09-05 14:21:00)
здрасьте! Вот у меня процедура Button1.Click она вызывает процедуру FormShow (вызывает другую форму - форму2). Вот если я пишу например Showmessage('что-то') после FormShow в Button1.Click то ничего не происходит, а мне нужно чтобы после закрытия формы2, Showmessage('что-то') в Button1.Click выполнялась.
unit1
type
...
implementation
uses unit2;

Procedure Button1.Click (sernder:TObject);
begin
FormShow;
showmessage('что-то...');
end;
___________________________________________
unit2
type
...
procedure FormShow;
....
implementation
uses unit1;

procedure FormShow;
begin
with TForm2.Create(application) do
try
еще одна процедура;
show;
finally;
free;
end;
end;
ну и т.д.
поможет кто-нить?

Сергей М. (2008-09-05 15:35:00) [21]

> Fynjy (05.09.08 15:30) [11]

Ну так значит форма должна быть показана модально, о чем тебе еще в [3] сказано)

Но как бы ты ее ни показывал, хоть модально хоть немодально, все равно процедура ShowMessage будет выполнена, и ты должен так или иначе увидеть при этом диал.форму с одной кнопкой..

Но ты ведь утверждаешь, что "ничего не происходит", т.е. ты не видишь эту диалог.форму с одной кнопкой, вот в чем чудеса-то)..

Fynjy (2008-09-05 15:30:00) [22]

> поверь, это "некоторое время" и есть доли секунды

да я это с фонаря написал Free не нужно там, но не в этом дело, форма вызывается нормально.
В идеале юзер при клтке кнопки должен увидеть форму со многими полями ввода, после их заполнения и получается та самая "строка" . Затем после нажатия кнопки закрыть, сразу выполняется следующая процедура после формшоу(showmessage я написал просто для примера).

Сергей М. (2008-09-05 15:15:00) [23]

> И по другому я еще не умею, не знаю как

Что ты вообще хочешь-то ? Т.е. что в идеале должен видеть юзер при клике кнопки ?
Объясни подробно, с чувством, с толком, с расстановкой)..

Palladin (2008-09-05 15:13:00) [24]

> Fynjy (05.09.08 15:07) [8]

поверь, это "некоторое время" и есть доли секунды. и на какую, интересно, продолжительность ты расчитывал этого "некоторого времени"?

Fynjy (2008-09-05 15:07:00) [25]
ну не через доли секунды а через некоторое время. И по другому я еще не умею, не знаю как, просто фрма там со множесвом лейблов, эдитов и т.д

Сергей М. (2008-09-05 14:53:00) [26]

> Сам придумал

Ну раз сам придумал, тогда скажи, каков тайный смысл создать/показать форму, чтобы тут же, через доли секунды, ее закрыть/уничтожить ?

Именно это ты и делаешь в коде, упомянутом в [4] ..

Fynjy (2008-09-05 14:51:00) [27]
Сергей М. нет, ну форма вызываетяся, а после закрытия её ничего не происходит, сообщение не выскакивает.

> Это ты сам придумал или кто-то подсказал ?)

Сам придумал.

Сергей М. (2008-09-05 14:41:00) [28]

> Ega23 © (05.09.08 14:38) [3]

А какая разница модально или не модально ее показывать ?

Все равно ShowMessage должна показать диалог, если вызов FormShow не привел к исключению, а Автор утверждает что вообще ничего не происходитпри клике батона)

Сергей М. (2008-09-05 14:38:00) [29]

> with TForm2.Create(application) do
> try
> еще одна процедура;
> show;
> finally;
> free;
> end;

Это ты сам придумал или кто-то подсказал ?)

Ega23 (2008-09-05 14:38:00) [30]
Tform.ShowModal + F1

Игорь Шевченко (2008-09-05 14:28:00) [31]
программиста найди

Медвежонок Пятачок (2008-09-05 14:26:00) [32]
showmessage выполняется сразу после show

Страницы: < 1 2

Наверх

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