StrataFrame Forum » StrataFrame Application Framework - V1 » Business Objects and Data Access (How do I?) » My BO don't move when I use the BrowseDialog and OLEDB VFP Table

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Trent L. Taylor — Thu, 28 Jan 2010 10:39:44 GMT

Thanks for sharing, Larry! :)

My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Elio Reyes — Thu, 28 Jan 2010 10:39:44 GMT

Hi

When the Browse Dialog is working, I can search, sort results... Everything is Ok, but When I use SF Browse Info Panel or try to get the result pointer from the search... The BO is steel in the first record.

Thanks SF

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Larry Caylor — Thu, 28 Jan 2010 10:38:42 GMT

Just though I'd add this post in case someone runs into this problem and they were handling the RowChanged event. In my case I was handling the event but each time it was raised the BO's current row index pointed to the first record no matter which record was selected from the search results. In my case I was populating the BO from a view and it turned out that I had forgot to define a primary key in BO mapper. Once I defined a key, everything worked as it shoud. Dumb mistake but sometimes those are the most difficult to find;)

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Edhy Rijo — Mon, 06 Oct 2008 12:06:33 GMT

Pedro, I think I know what your problem is.

In the Panel_Consulta_Cigarros, you have to drop an instance of the BO you want to use, then in the 2 textboxes you have to bind them to the BO instance.

When you assign the Panel_Consulta_Cigarros to the Browser Dialog, this will translate the BD BO to the instance of the Panel_Consulta_Cigarros BO, this is pretty much like what is done with the ChildForm dialog BO translations.

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Edhy Rijo — Mon, 06 Oct 2008 11:45:51 GMT

Hi Pedro,

More info is needed to check on this sample:

The VFPOLEDB driver you are using.
The EXPENDIO.DBC
Which is the form that is not working?

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Elio Reyes — Mon, 06 Oct 2008 11:20:32 GMT

Here's the code ...

Thanks a lot

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Edhy Rijo — Mon, 06 Oct 2008 10:37:48 GMT

Hi Pedro,

Did you try to debug your code? Also post your code so we can see it.

Also in the Panel, make sure you have an instance of the BO used in the Browser Dialog.

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Elio Reyes — Mon, 06 Oct 2008 10:26:16 GMT

Hi

I'm so sorry to make lose your time, but is happening to me.

Maybe I have to put a index key or else to my Free Table. Because the Browse Dialog is working very good is just the move of the BO And work excellent in all my SQL Tables, is Just in this case with a Free Visual Foxpro Table.

[b]
Thanks SF[/b]

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Trent L. Taylor — Sun, 05 Oct 2008 19:21:17 GMT

Pedro,

I would ask you to double check your work as I know that this works as Edhy has described. This is a heavily leveraged part of a BD and something that we use everyday and I am confident that there is not an issue here.

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Elio Reyes — Fri, 03 Oct 2008 11:11:05 GMT

Yes. I do that but always show me the first record.

RE: My BO don't move when I use the BrowseDialog and OLEDB VFP Table

Edhy Rijo — Thu, 02 Oct 2008 18:32:19 GMT

Hi Pedro,

You have to add code to the InfoPanel.RowChanged event to update the data in the info panel.

Here a sample:

[codesnippet][code]

Private Sub CustomersBrowseInfoPanel_RowChanged(ByVal e As MicroFour.StrataFrame.UI.Windows.Forms.BrowseDialogRowChangedEventArgs) Handles MyBase.RowChanged

'-- Strong-type the business object

With CType(e.BusinessObject, bizCustomers)

'-- Set the Customer detailed info.

Me.lblCompanyName.Text = .CompanyName

Me.lblStreet.Text = .Street

Me.lblCityStateZip.Text = String.Format("{0}, {1} {2}", .City, .State, .ZipCode)

Me.lblContactName.Text = .ContactName

Me.lblBusinessPhone.Text = .Phone

Me.lblFax.Text = .Fax

Me.lblMobilPhone.Text = .Mobil

Me.lnkeMailAddress.Text = .eMail

End With

End Sub

[/code][/codesnippet]