![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
плавающие окна
>>DEATH<< © (2007-06-23 15:40:00)Подскажите пожалуйста как сделать плавающие окошко
Заранее спасибо!!!
>>DEATH<< (2007-06-23 18:38:00) [1]Инс, пасибо дальше разбирусь))
Инс (2007-06-23 18:12:00) [2]Тогда это можно будет потом подрубать или отрубать динамически. Но это будет вашим домашним заданием ;) Посмотрите функции SetWindowLong/GetWindowLong
>>DEATH<< (2007-06-23 18:03:00) [3]это для настроек,,вдруг кому так не понравится или будет мешать
Инс (2007-06-23 18:00:00) [4]Хм, я думал так наоборот круче, что ж, уберите or CS_DROPSHADOW и ExStyle:=WS_EX_TOPMOST;
>>DEATH<< (2007-06-23 17:59:00) [5]Инс, спасибо то что надо))
только еще два вопоса:
1 как убрать тень
2 как сделть чтоб было не поверх всех окон
Инс (2007-06-23 16:56:00) [6]Сделайте маленькую формочку, перекройте CreateParams, например, так:
TForm2 = class(TForm)
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
...
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
with Params do begin
WndParent:=0;
Style:=WS_POPUP;
ExStyle:=WS_EX_TOPMOST;
WindowClass.Style:=WindowClass.Style or CS_SAVEBITS or CS_DROPSHADOW;
if NewStyleControls
then ExStyle:=ExStyle or WS_EX_TOOLWINDOW;
AddBiDiModeExStyle(ExStyle);
end;
end;
Уберите заголовок формы, а если хотите, чтобы ее можно было перетаскивать, в обработчике OnMouseDown напишите такой код:
ReleaseCapture;
Perform(WM_SYSCOMMAND,$F012,0);
Dib@zol (2007-06-23 16:48:00) [7]Или на крайняк опиши подробнее, КАК оно должно выглядеть. Должно ли оно быть полупрозрачным, перетаскиваемым мышой, со скруглёнными краями итп.
Dib@zol (2007-06-23 16:42:00) [8]Впще в Инете я новичок :((( поэтому еси не трудно пришли картинку!
>>DEATH<< (2007-06-23 16:37:00) [9]
> что это? перетаскивать мышкой что ли???:)))
>
это типакак В ReGET окошко с иконкой,,или в internet download master окошко графиком скорости закачки
Dib@zol (2007-06-23 15:57:00) [10]
> Ламер 2.Х © (23.06.07 15:55) [2]
"Плавающее" в терминологии форточек означает "всплывающее", сиречь остающееся на поверхности даже если неактивно, так как остальные, не всплывающие, не могут его перекрыть.
Ламер 2.Х (2007-06-23 15:55:00) [11]что это? перетаскивать мышкой что ли???:)))
Dib@zol (2007-06-23 15:54:00) [12]Чтото типа WS_POPUP? Если да, то
SetWindowPos([хендл окна], HWND_TOPMOST, [x-коорд. окна], [y-коорд. окна], [ширина], [высота], SWP_SHOWWINDOW);