Rysowanie po pasku tytułowym formy

0

Rysuję sobie po pasku tytułowym formy
[code]
DC := GetWindowDC(Handle);
hP:=CreatePen(PS_SOLID, 1, RGB(255,86,0));
SelectObject (DC, hP) ;
MoveToEx (DC, 27, y2, Nil) ;
LineTo (DC, Form1.Width-80, y2) ;
[/code]
Wszystko było by dobrz gdyby nie fakt że np. WinXP i Win98 mają paski tytułowe różnmej szerokosci więc trzeba rysować w różnych miejscach zależnie od systemu.
Rozwiazałem to tak iż sprawdzam sobie jaki system jest i zależnie od rodzaju progrm ustawia różne położenie współrzędnej y, a w moim kodzie to jest y2.
Wystąpił jednak inny problem. WinXP może mieć styl WindowsClassic i wszystko wygląda jak w np. Win98 no a mój program niestety wykrywa WinXP i tu moje pytanie - jak sobie z tym poradzić ?
Da sie jakoś ustalić szerokość paska tytułowego formy ?

0

[...]
Wszystko było by dobrz gdyby nie fakt że np. WinXP i Win98 mają paski tytułowe różnmej szerokosci [...]

nie bardzo Cie czaje ale to na kazdym prawie systemie jest inna wysokosc i szerokosc paska.
zalezy od ustawien danej osoby...... wiec co do tego ma system?
(w winXP masz "inne" belki, ale o czym innym tu chyba mowa)

Da sie jakoś ustalić szerokość paska tytułowego formy?

mozna pobrac szerokosc formy, i na podst tego obliczyc szerokosc i sobie wtedy odpowiednio rysowac

ps. do formatowania kodu jest znacznik </delphi/> a nie [/code/] :)

0

chodzi mi o to co jest na górze formy - tam gdzie jest nazwa programu, ikona, przyciski Close, Restore Down/Maximize i Minimize - to chyba jest pasek tytułowy formy można chyba też nazwać belką :-) - czy się mylę ?
Że można mozna pobrać szerokość formy to wiem. :-) - a na podstawie tego obliczyć szerokość paska tytułowego formy to fajnie że się da zrobić ale jak to nie mam pojęcia - i o to właśnie się tu pytam :-) jak to zrobić ?

0

Może Height-ClientHeight?

0

Rozmiar paska zadań mozna sobie ustawić samemu we właściwościach ekranu, nie jest to zależne od systemu, tylko od ustawień własnych uzytkownika, wyboru skórki, czy schematu wyglądu.

0

spoko
Form1.Height-Form1.ClientHeight załatwia sprawę :-)
dzięki

1 użytkowników online, w tym zalogowanych: 0, gości: 1