|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.01.2009, 11:46 | #1 |
Пользователь
Регистрация: 19.03.2007
Сообщений: 53
|
Скрытая форма
Посоветуйте как сделать , чтобы форма, на которой есть несколько компонентов поизвела определенные действия и исчезла с экрана. Я прообовал делать следующим образом
procedure TForm1.FormCreate(Sender: TObject); begin Try Form1.Show; Edit1.Text:='Тест формы'; Finally Form1.Free; //Form1.Close; End; end; но выскакивает программная ошибка. Может как-то иначе надо делать. Буду благодарен за помощь. Рубей |
27.01.2009, 11:54 | #2 |
Android Developer
Старожил Подтвердите свой е-майл
Регистрация: 19.02.2007
Сообщений: 3,708
|
Как вы себе представляете, вы создаете что-либо и во время создания разрушаите "это". Странно, вот поэтому и ошибка. Я так понимаю есть еще другая форма ? Вот в ней и делайте Form1 := TForm1.Create... потом ShowModal и Free. Если форм нет... то Show и само выполнится ненадо его писать в OnCreate. После Show вы делаите что хотели, и вызываите Close. Все.
|
27.01.2009, 12:37 | #3 |
Пользователь
Регистрация: 19.03.2007
Сообщений: 53
|
Скрыть форму
Другой формы нет. У меня есть один модуль, который отправляет СМС-ки в цикле. Он должен отправить СМС-ку, сообщить об этом и исчезнуть с экрана. Запускаю я этот модуль в командной строке с параметрами.
Спасибо за внимание. Рубей |
27.01.2009, 12:57 | #4 |
Участник клуба
Регистрация: 11.01.2009
Сообщений: 1,917
|
Делай все свои действия как написал только не в FormCreate ,а в FormShow и после отработки каких-то действий - закрывай форму Close;
"Заряженному танку в дуло не смотрят" @Dekmer in WoT
|
27.01.2009, 13:07 | #5 |
Баламучу слегка...
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,585
|
Вместо Form1.Close напиши
PostMessage(Form1.Handle, WM_CLOSE, 0,0); |
27.01.2009, 13:19 | #6 |
Пользователь
Регистрация: 19.03.2007
Сообщений: 53
|
Скрыть форму
Спасибою Вроде работает.
Сейчас попробую ПОЛНЫЙ ВАРИАНТ. Рубей. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Скрытая папка | Marsik | Помощь студентам | 4 | 06.12.2007 16:07 |
Скрытая таблица | LeoN | Общие вопросы Delphi | 5 | 28.11.2007 11:28 |
Скрытая папка. | Lemon | Общие вопросы Delphi | 3 | 12.06.2007 11:24 |
Форма | MAcK | Общие вопросы Delphi | 4 | 07.02.2007 01:43 |
"Скрытая работа" программы..=/ | Flash_ | Безопасность, Шифрование | 3 | 08.01.2007 19:44 |