Форум: "Основная";
Текущий архив: 2002.08.26;
Скачать: [xml.tar.bz2];
ВнизКак отобразить на taskbarе вторичные формы? Найти похожие ветки
← →
Smithson (2002-08-15 12:22) [0]Есть приложение с N-ным количеством форм. Я хочу все их отобразить на taskbar Windows. Как это сделать?
← →
Игорь Шевченко (2002-08-15 12:27) [1]Поставить им WS_EX_APPWINDOW. А вообще, не стоит пугать пользователя обилием кнопок на таскбаре :-)
← →
Smithson (2002-08-15 12:42) [2]Спасибо.
Пугать не стоит, но в каждом окне результаты запроса, на экране они перекрывают друг друга, писать менеджер окон времени нет, а так ...
← →
Skier (2002-08-15 12:46) [3]>Smithson
А что если все нужные формы занести в TList и активизировать
(передавать фокус) - только какой-то определённой форме,
в которой - результат последнего запроса... ?
← →
Smithson (2002-08-15 12:52) [4]Не вышло. Можно подробнее? В Form2.CreateParams вставил:
Procedure TForm2.CreateParams(var Params: TCreateParams);
Begin
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
End;
Возникла ошибка создания формы. Что не так?
← →
Игорь Шевченко (2002-08-15 12:55) [5]Не так - пропущен inherited
← →
Skier (2002-08-15 12:55) [6]>Smithson
inherited CreateParams(Params);
← →
Игорь Шевченко (2002-08-15 12:55) [7]Procedure TForm2.CreateParams(var Params: TCreateParams);
Begin
inherited;
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
End;
← →
Smithson (2002-08-15 12:57) [8]Огромное спасибо!
Пока писал прототип процедуры, помнил по inherited, а как дошло до реализации, забыл... Еще раз спасибо.
← →
Игорь Шевченко (2002-08-15 13:04) [9]Единственный момент: На любой из этих AppWindow форм надо сказать что-либо, подобное
procedure TForm1.FormActivate(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE);
end;
Чтобы на таскбаре не было окна от Application, иначе трудно будет переключаться между AppWindow-окнами.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.08.26;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.007 c