Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.07.15;
Скачать: [xml.tar.bz2];

Вниз

плавающие окна   Найти похожие ветки 

 
>>DEATH<<   (2007-06-23 15:40) [0]

Подскажите пожалуйста как сделать плавающие окошко

Заранее спасибо!!!


 
Dib@zol   (2007-06-23 15:54) [1]

Чтото типа WS_POPUP? Если да, то

SetWindowPos([хендл окна], HWND_TOPMOST, [x-коорд. окна], [y-коорд. окна], [ширина], [высота], SWP_SHOWWINDOW);


 
Ламер 2.Х ©   (2007-06-23 15:55) [2]

что это? перетаскивать мышкой что ли???:)))


 
Dib@zol   (2007-06-23 15:57) [3]


> Ламер 2.Х ©   (23.06.07 15:55) [2]


"Плавающее" в терминологии форточек означает "всплывающее", сиречь остающееся на поверхности даже если неактивно, так как остальные, не всплывающие, не могут его перекрыть.


 
>>DEATH<<   (2007-06-23 16:37) [4]


> что это? перетаскивать мышкой что ли???:)))
>

это типакак В ReGET окошко с иконкой,,или в internet download master окошко графиком скорости закачки


 
Dib@zol   (2007-06-23 16:42) [5]

Впще в Инете я новичок :((( поэтому еси не трудно пришли картинку!


 
Dib@zol   (2007-06-23 16:48) [6]

Или на крайняк опиши подробнее, КАК оно должно выглядеть. Должно ли оно быть полупрозрачным, перетаскиваемым мышой, со скруглёнными краями итп.


 
Инс ©   (2007-06-23 16:56) [7]

Сделайте маленькую формочку, перекройте 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);


 
>>DEATH<<   (2007-06-23 17:59) [8]

Инс, спасибо то что надо))
только еще два вопоса:
1 как убрать тень
2 как сделть чтоб было не поверх всех окон


 
Инс ©   (2007-06-23 18:00) [9]

Хм, я думал так наоборот круче, что ж, уберите or CS_DROPSHADOW и ExStyle:=WS_EX_TOPMOST;


 
>>DEATH<<   (2007-06-23 18:03) [10]

это для настроек,,вдруг кому так не понравится или будет мешать


 
Инс ©   (2007-06-23 18:12) [11]

Тогда это можно будет потом подрубать или отрубать динамически. Но это будет вашим домашним заданием ;) Посмотрите функции SetWindowLong/GetWindowLong


 
>>DEATH<<   (2007-06-23 18:38) [12]

Инс, пасибо дальше разбирусь))



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.07.15;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.048 c
15-1182165213
ILUT
2007-06-18 15:13
2007.07.15
Задать положение компонента


2-1182073927
..::KraN::..
2007-06-17 13:52
2007.07.15
String to ANSI


2-1182324749
Gentos
2007-06-20 11:32
2007.07.15
fsMDIChild


15-1181749507
Углук
2007-06-13 19:45
2007.07.15
Теория вероятности-лженаука?


2-1182606161
Полный Чайник
2007-06-23 17:42
2007.07.15
описание директивы Stdcall





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский