Update open child form textbox from parent form with tgabbed MDI mgr

State Not Answered
Replies 4 replies
Subscribers 7 subscribers
Views 1352828 views
Users 0 members are here

UltraTabbedMdiManager

445

Greg Newman posted over 12 years ago

I have a small app that uses a tabbed mdi mgr and a menu bar to load some child forms. On the parent, I have a date selector. When I change the date, I want to update an open child form (in tabbed MDI) with the new date and perform some actions, such as change text in a textbox.

What would be the best way to automatically update all open child forms when the date is changed on the parent at anytime? I have tried code below but doesn't really work.

I change the date in date selector event like (

Form1.dateProcessed = Me.cmdChangeDate.Text

In tabbed child I use and set up an event/property like

Private fField As String
Public Event UpdateDate(ByVal x As String)
Public Property dateProcessed() As String
Get
Return Me.fField
End Get
Set(ByVal value As String)
' Raise the event
RaiseEvent UpdateDate(value)
UpdateFormText(value)
End Set
End Property

this calls my delegate sub:

Delegate Sub MethodInvoker(ByVal arg As Object)
Private Sub UpdateFormText(ByVal arg As Object)
If Me.InvokeRequired Then
Me.Invoke(New MethodInvoker(AddressOf UpdateFormText), arg)
Exit Sub
Else
Me.UltraTextEditor1.Text = arg.ToString
End If
End Sub

This does call the delegate and at the point where the UltratextEditor1.text is assigned it does have the value correctly but does not actually display on child form. This works OK if I do not use a tabbed mdi mgr, but regular MDI without tabs. I cannot figure out what I'm doing wrong. Any suggestions?

Parents

445

Offline Greg Newman posted over 12 years ago

Here is an example simple app that demonstrates what is not working.

The value of the textbox is equal to what is sent but is not displayed on the tabbed form.

tabMidiTest.rar
Cancel
Reply

Cancel

53790

Georgi posted over 12 years ago in reply to Greg Newman

Hello Greg,

I research your sample and I made small modifications in the :

Private Sub cmdChangeDate_Click(sender As System.Object, e As System.EventArgs) _

Handles cmdChangeDate.TextChanged

If UltraTabbedMdiManager1.ActiveTab IsNot Nothing Then

DirectCast(UltraTabbedMdiManager1.ActiveTab.Form, Form1).UltraTextEditor1.Value = Me.cmdChangeDate.Text

End If

End Sub

Could you please take a look at the attached smaple for more details and let me know if you have any questions.

Regards

tabMidiTest.zip

445

Offline Greg Newman posted over 12 years ago in reply to Georgi

works like a charm ....

thanks.
Cancel
Reply

Cancel

Reply

53790

Georgi posted over 12 years ago in reply to Greg Newman

Thanks for the feedback. If you have any further questions, do not hesitate to write us

Regards
Cancel
Reply

Cancel

Children

No Data

Private fField As StringPublic Event UpdateDate(ByVal x As String)Public Property dateProcessed() As StringGet Return Me.fFieldEnd GetSet(ByVal value As String)' Raise the event RaiseEvent UpdateDate(value) UpdateFormText(value)End SetEnd Property

this calls my delegate sub:

Private fField As String
Public Event UpdateDate(ByVal x As String)
Public Property dateProcessed() As String
Get
Return Me.fField
End Get
Set(ByVal value As String)
' Raise the event
RaiseEvent UpdateDate(value)
UpdateFormText(value)
End Set
End Property