StatusBarHeight() ?

[filperj]

Voilà, une question toute bête (peut-être même très bête):
comment retrouver la hauteur de la statusbar ?
(par ex pour la barre de menu on a MenuHeight()... )

[Chris]

Salut

Comme ça, peut-être :

Code : Tout sélectionner

;- Window Constants
Enumeration
  #Window_0
EndEnumeration

;- StatusBar Constants
Enumeration
  #StatusBar_0
EndEnumeration

Procedure Open_Window_0()
  If OpenWindow(#Window_0, 216, 0, 600, 300,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )")
    hStBar = CreateStatusBar(#StatusBar_0, WindowID())
;**********************************************************
    ;- Récupération de la hauteur et de la largeur de la StatusBar
    
    HeightStBar = SendMessage_(hStBar,#SB_GETRECT,0,@Value.RECT)
    SB_Height = Value\bottom - Value\top
    SB_Length = Value\right - Value\left
;-*********************************************************
    Debug SB_Length
    Debug SB_Height
  EndIf
EndProcedure

Chris

[filperj]

cool, ça marche
Merci beaucoup

[Chris]

cool, ça marche

Ben oui, si ça marchait pas, j'aurais pas posté

Chris

[filperj]

Sait-on jamais, ya des blagueurs, desfois
Non, je voulais surtout dire que je suis arrivé à le faire marcher (et du 1er coup).