Thx RBNube
To conclude the thread, this is what I used:
Placed in the taskbar1
Sub NodeMouseUp(node as TaskBarNode)
Select Case node.Text
case "Beheer Gebruikers"
if not(Self IsA studentswindow) then
App.SwitchWindow(self,new studentswindow)
end if
case "Beheer Opdrachten"
if not(self IsA KeyFilesWindow) then
App.SwitchWindow(self,new KeyFilesWindow)
end if
end Select
End Sub
Code in App:
Sub SwitchWindow(OldWindow As Window,NewWindow As Window)
NewWindow.Left = OldWindow.Left
NewWindow.Top = OldWindow.Top
NewWindow.Width = OldWindow.Width
NewWindow.Height = OldWindow.Height
OldWindow.Close
End Sub
This works as intended (and isn't that much away from what you
suggested)
What went wrong in the previous version was the part :
if self <> studentswindow------> which opens up a new studentswindow
On 31-okt-06, at 05:18, RBNUBE wrote:
The -20 and +20 are hacks that may not be correct on all systems.
I think
this has to do with RB not knowing/allowing you to get or taking into
account the height of title bars. Though it seems to work fine if
you are
duplicating the window that is calling the code.
No need for those
I'm still using RB 5.5. Maybe this has changed in the newer
versions or
perhaps I'm missing something.
Nice talking to an older person. Is it true animals used to talk when
you were young? ;-)
OK,ok I'm 42 myself
BTW, I'm not sure why you're doing this. This seems unusual. Is it
possible that a PagePanel on a single window might be a better
solution?
HTH
Well I grew into it in order to have a bit more seperation between
the two completely different procedures. And the taskbar is just
available on my MBP . Might still change this...
And yes,
It sure helps to talk about a problem on the list so
THX
Bart
_______________________________________________
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>
