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>