Hi,

I'm probably doing something really silly, but I'm using a DisclosureTriange to display some advanced options, so on the Action, I'm checking to see they have resized the window to be greater that what it would be to accommodate the Advanced options GroupBox, and if they have, then do not add the extra height, otherwise add 184px to the current height to allow it to display the GroupBox.

here is my bit of code:

<code>

Dim DisclosureHeight as Integer
DisclosureHeight = Self.Height + 184

' If the Window is greater than what it would be to accommodate
' the GroupBox, then do not resize.
If Self.Height > DisclosureHeight then
        ' Carry On and Show the GroupBox        
Else
        ' Resize the current window to accommodate the GroupBox
        Self.Height = DisclosureHeight
End if

</code>

If I hardcode a value in pace if the 'DisclosureHeight', in the If statement, then it works.

Can anyone possibly point me out where I could be going wrong.

Thanks in advance

Mark

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to