Вниз
Скачать: CL | DM;

Все равно не понял :о)   Найти похожие ветки 

← →
Aszbed ©   (2002-08-19 14:47) [0]

Так я и не разобрался с формами!!!! может кто поможет? могу отослать программный код... помогите плизз


← →
Skier ©   (2002-08-19 14:49) [1]

>Aszbed
А в чём косяк-то ?


← →
Aszbed ©   (2002-08-19 14:55) [2]

да глючок маленький - нажимаем на кнопку - появляется второе окно(модальное). Там мы делаем процедуру и нажимаем на кнопочку чтоб форма спряталась, но она-то прячется, а вот модальность к первому окну не приходит - так и продолжает beepать


← →
Skier ©   (2002-08-19 14:58) [3]

>Aszbed
Всё так и должно быть !
Второе окно либо нужно делать не модальным (Show), либо
не прятать его, а закрывать(освобождать).


← →
Aszbed ©   (2002-08-19 15:14) [4]

ye?// имеется в виду что я делаю close, а оно(второе) все равно beepает :
function TMainForm.ShowRemain(const What: String; const Remain: Integer): Boolean;
var
Last: TLastFrm;
begin
Last := TLastFrm.Create(Self);
try
Last.What := What;
Last.Count := Remain;
Last.ShowModal;
Result := Last.Good ;
finally
Last.Free
end
end;


procedure TLastFrm.Button1Click(Sender: TObject);
begin
lastFrm.close;
mainform.Show;
end;


первое окно ОБЯЗАНО оставаться открытым.... Оно ДОЛЖНО быть всегда на виду - поэтому и не идет функция MainForm.showModal - как из этого выпутаться?


← →
Skier ©   (2002-08-19 15:20) [5]

>Aszbed
Что должно происходить на второй форме (какая там логика ?) ?


← →
Aszbed ©   (2002-08-20 00:59) [6]

вторая форма - таймер.... то есть на первой форме мы выставляем время и смотрим параметры системы и т.д., а это второе окно появляется как предупреждение о скором выключении\перезагрузке компа.... а так как это важно - следовательно оно должно быть модальным.... вот и запутался :о)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
1-95874
snoup
2002-08-17 21:37
2002.08.29
Как программно открыть на машине ресурсы (доступ к файлам и принт


14-95983
Саня
2002-08-03 14:59
2002.08.29
MathCad


1-95898
Punk4
2002-08-11 20:48
2002.08.29
try... finally в Delphi 5


1-95785
просто панк
2002-08-15 02:48
2002.08.29
ещё раз про левые эдиты...


6-95937
Fenix
2002-06-20 16:48
2002.08.29
Опять проблемы с сокетами...




   Наверх