Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Malfatto

Storm Spirit


Сообщения: 467
Благодарности: 33

Профиль | Отправить PM | Цитировать


ferget,

Цитата:
Delphi
язык, написано в заголовке
среда программирования - delphi 2010

Цитата ferget:
пример кода »
создаём 2 формы, Form1 и Form2. для Form1:

Код: Выделить весь код
procedure TForm1.FormShow(Sender: TObject);
begin
  Form2.Show;
end;
для Form2
Код: Выделить весь код
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle:=Params.ExStyle or WS_EX_APPWINDOW;
end;
результат - обе формы на таскбаре, при клике по одной вторая также выносится "вперёд".

Отправлено: 17:47, 16-08-2011 | #3