Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

в win7 теперь это возможно?   Найти похожие ветки 

 
brother ©   (2012-04-12 13:33) [0]

Ставлю игру (репак) и вижу вот такое окно установки:
http://brotherirk.no-ip.info/1.png
Что смутило: высота нижнего бордюра (там, где прогресс) не стандартна...
Думаю, это стандартное окно, по крайней мере
Title: I?ia?ann:
Class name: TNewStaticText
Window handle: 722816 (0x000B0780)
Parent window: 722822 (0x000B0786)
Owner window: 0      (0x00000000)
Window ID: 722816 (0x000B0780)
Window proc: 0x00000000
Client coords: x:   0 y: 378  w:  63 h:  15
Window coords: x: 393 y: 624  w:  63 h:  15

Title:
Class name: TNewProgressBar
Window handle: 1967932 (0x001E073C)
Parent window: 722822 (0x000B0786)
Owner window: 0      (0x00000000)
Window ID: 1967932 (0x001E073C)
Window proc: 0x00000000
Client coords: x:  98 y: 373  w: 459 h:  25
Window coords: x: 491 y: 619  w: 459 h:  25


Вопрос: В 7 винде теперь можно клиниться в бордюр окна?


 
CRLF   (2012-04-12 13:42) [1]

Да по идее не только в 7...


 
brother ©   (2012-04-12 13:46) [2]

ссылку бы, интересно же... как?


 
ДимкаНа   (2012-04-12 13:48) [3]

Form1.GlassFrame


 
CRLF   (2012-04-12 13:55) [4]


> ссылку бы, интересно же... как?
Ищи на тему WM_NCPAINT и далее по ссылкам.


 
Омлет ©   (2012-04-12 14:01) [5]

http://www.delphipraxis.net/74538-aero-glass-effekt-fuer-delphi-forms.html


 
ProgRAMmer Dimonych ©   (2012-04-13 11:01) [6]

Долго смотрел на скриншот. Объясните, что там необычного? Разве этого же нельзя достичь, просто разместив контролы ниже картинки?


 
brother ©   (2012-04-13 11:07) [7]

> просто разместив контролы ниже картинки?

нет, я так понимаю, нижняя часть - растянутый нижний бордюр...


 
Омлет ©   (2012-04-13 11:12) [8]


> Разве этого же нельзя достичь, просто разместив контролы
> ниже картинки?

По умолчанию матовым стеклом рисуются только тонкая рамка окна и заголовок. Чтобы расширить рамку, применяется DwmExtendFrameIntoClientArea.


 
ДимкаНа   (2012-04-13 11:37) [9]

Ребята, вы что?
http://argi.ru/bro.jpg

object Form6: TForm6
 Caption = "Form6"
 GlassFrame.Enabled = True
 GlassFrame.Bottom = 150
 object Label1: TLabel
   Left = 24
   Top = 24
   Width = 108
   Height = 25
   Caption = "Hi, brother!"
   Font.Height = -21
   ParentFont = False
 end
 object ProgressBar1: TProgressBar
   Left = 40
   Top = 144
   Width = 345
   Height = 17
   Position = 66
 end
end


 
Омлет ©   (2012-04-13 11:50) [10]


> GlassFrame.Enabled = True

in Delphi 2007 and later.


 
Edgar_Wine   (2012-04-14 05:59) [11]


> GlassFrame.Enabled = True
>  GlassFrame.Bottom = 150


Это VCL-обёртка над DwmExtendFrameIntoClientArea(). Можно вообще вертеть клиентской областью как угодно - нажмите в более-менее новом FireFox комбинацию Ctrl+Shift+E.
А скриншот не открывается, поэтому ничего сказать не могу. =(


 
brother ©   (2012-04-14 06:34) [12]

> А скриншот не открывается,

это моя локальная тачка, пока я в сети - работает) пробуй)



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

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.085 c
6-1258570088
lexel
2009-11-18 21:48
2013.03.22
Свободен домен или нет


15-1350838886
Лида
2012-10-21 21:01
2013.03.22
Обработка различных событий в Delphi


2-1331966109
novai
2012-03-17 10:35
2013.03.22
Движение объекта


3-1275925400
Дмитрий Белькевич
2010-06-07 19:43
2013.03.22
Оптимизировать запрос


2-1345387300
Владимир777
2012-08-19 18:41
2013.03.22
FTP-сервер не открывает сокет