powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как сразу после созданя прибить приложение.
12 сообщений из 12, страница 1 из 1
Как сразу после созданя прибить приложение.
    #32325833
cmeptb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброе время суток есть такой вопрос:
Есть прога в которой главная форма создается в ручную.
В процедуре создания главной формы происходит обработка выполняется отсылка почты. Некобходимо как только почта отправилать прогу завершать.
Подскажите как это правильно сделать.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325838
Фотография Mihail R.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
закрыть форму.

но если уж так пошло, то лучше ее вообще не создавать, а действия прописать в файле проекта.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325842
cmeptb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не создовать нельзя т.к. я использую определенный набор компонент.
А если в процедуре создания в конце прописать Form1.Free; валится с ошибкой.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325857
Фотография Cauchy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автор писал:Не создовать нельзя т.к. я использую определенный набор компонент.
Как я понял эти компоненты не являются визуальными и тебе ничто не мешает создавать их динамически прямо в файле проекта. Я например для прикола в четверг наваял консольное приложение, работающее с акцессовской базой при помощи ADOConnection и ADODataSet.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325858
Фотография фёдор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В файле проекта
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
begin
  Application.Initialize;
  with TMainForm.Create(nil) do
  try
    Show;
  finally
    Free;
  end;
  Application.Run;
end.

И пишешь соответственно в TMainForm.OnCreate
все что надо
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325860
Фотография фёдор
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну соотв енту форму убрать из auto-create :-)
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325893
cmeptb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо за помощь.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325913
Song
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2cmeptb
А зачем тогда эту форму создавать вообще?

-----
Прежде чем сказать "Невозможно", подумай, прав ли ты?!
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32325919
Фотография Cauchy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автор писал:А зачем тогда эту форму создавать вообще?
Во-во! Я про то же.
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32326116
Сmeptb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прото там все хитро запутано и она нужна просто при определенных обстоятельствах она показываестя а при неопределенных только почта отсылается да еще набор действий происходит
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32326118
Фотография viman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А так не проще будет?

Application.Initialize;
Application.CreateForm(TfoMain, foMain);
Application.Terminate;
Application.Run;
...
Рейтинг: 0 / 0
Как сразу после созданя прибить приложение.
    #32328366
Song
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2cmeptb
Не делай эту форму главной, тогда она и показываться не будет. А покажешь когда надо.

-----
Прежде чем сказать "Невозможно", подумай, прав ли ты?!
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как сразу после созданя прибить приложение.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]