![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#11
|
|||
|
|||
|
Одно из простейших решений - исправить файл dpr:
Код:
program Project1;
uses
DateUtils,
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
begin
if Today < EncodeDateTime(2009, 5, 23, 0, 0, 0, 0) then
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end;
end. |