А как сделать в процессе выполнения программы не главное окно ...

← →
Gear (2005-01-11 18:45) [0]

А как сделать в процессе выполнения программы не главное окно главным?

← →
Семен Сорокин © (2005-01-11 19:12) [1]

1. Cкинуть в проект модуль forms.pas добавить и откомпилировать write-метод в св-во Application.MainForm
2. Выставить Application.ShowMainForm := false; и сделать второе окно (визуально) главным, только если не нужна ссылка в Application (можно еще поиграться с Restore, Minimize).

← →
Gear (2005-01-11 19:32) [2]

с первым ничего не понял :(
со вторым, дело в том что когда минимизируешь а затем максимизируешь окно то и главное появляется ((.
А если сделать так:

procedure TForm1.AppMinimize(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE);
end;

Application.OnMinimize:=AppMinimize;
Application.OnRestore:=AppMinimize;
Application.Minimize;
AppMinimize(@Self);

то при запуске минимизируется вобще все окна.

К предыдущемо Вашему посту. Хотелось бы чтобы в начальном окне имелась бы возможность с помощью кнопки запускать основное окно программы. Это стандартный случай триал версии.

А как сделать в процессе выполнения программы не главное окно ... Найти похожие ветки