|
|
#1
|
|||
|
|||
модальная форма
Помогите сделать так, чтобы при нажатии кнопки " начать тестирование" вылетало главное окно..... Все создал, но в коде, где что прописывать, чтоб оно появлялось, запутался совсем....
вот ссылка на фал так как для форума большой.. http://narod.ru/disk/38448164001/%D0%9D%D0%BE%D0%B2%D0%B0%D1%8F%20%D0%BF%D0%B0%D0%B F%D0%BA%D0%B0.rar.html |
#2
|
|||
|
|||
FMain.ShowModal;
|
#3
|
|||
|
|||
Цитата:
program fmain; uses Forms, ULogin in 'ULogin.pas' {Flog}, Umain in 'Umain.pas' {}; {$R *.res} begin Application.Initialize; Application.CreateForm(TFlog,Flog ); Application.CreateForm(Tfmain, Flog); if Flog.ShowModal=fmain then Application.terminate else begin Fmain.Visible:=true; end; Application.Run; end. а что сдесь прописать? точнее как правильнее? |
#4
|
|||
|
|||
Ничего не пиши, тебе же просто нужно при нажатии на кнопку показывать другую форму.
|
Этот пользователь сказал Спасибо m1sclick за это полезное сообщение: | ||
cyber922 (22.01.2012)
|
#5
|
|||
|
|||
Цитата:
|
#6
|
|||
|
|||
|