Multiple xbrowse's in same dialog??

Multiple xbrowse's in same dialog??

Postby bradmaudlin » Wed Apr 11, 2012 9:28 pm

I am trying to browse 3 different DBF Files in one Dialog.
Does anyone have a sample of this?? I have tried several different browse classes but have not got any to work properly.
I am using xHarbour and FWH.
I would like to use the Txbrowse Class if possible.

Thanks, Brad.
bradmaudlin
 
Posts: 27
Joined: Fri Jan 11, 2008 9:58 pm
Location: St Joe, MO

Re: Multiple xbrowse's in same dialog??

Postby joseluisysturiz » Thu Apr 12, 2012 4:16 am

Dios no está muerto...

Gracias a mi Dios ante todo!
User avatar
joseluisysturiz
 
Posts: 2064
Joined: Fri Jan 06, 2006 9:28 pm
Location: Guatire - Caracas - Venezuela

Re: Multiple xbrowse's in same dialog??

Postby anserkk » Thu Apr 12, 2012 4:46 am

Code: Select all  Expand view
#include "FiveWin.ch"
#include "xBrowse.ch"

//------------------//
Function Main()
    Local oDlg,oBrw1,oBrw2,oBrw3

    USE \FWH\SAmples\Customer NEW
    USE \FWH\Samples\Clients NEW
    USE \FWH\Samples\Part NEW    
   
    DEFINE DIALOG oDlg TITLE "Multiple xBrowse" FROM 1,1 to 500,900 PIXEL
   
        @1,1 XBROWSE oBrw1 OF oDlg PIXEL SIZE 150,250;
            ALIAS "Customer"
        oBrw1:CreateFromCode()        
           
        @1,150 XBROWSE oBrw2 OF oDlg PIXEL SIZE 150,250;
            ALIAS "Clients"
        oBrw2:CreateFromCode()                
           
        @1,300 XBROWSE oBrw3 OF oDlg PIXEL SIZE 150,250 ;
            ALIAS "Part"
        oBrw3:CreateFromCode()                
   
    ACTIVATE DIALOG oDlg
   
    CLOSE DATABASES

Return NIL


Regards
Anser
User avatar
anserkk
 
Posts: 1332
Joined: Fri Jun 13, 2008 11:04 am
Location: Kochi, India


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 57 guests