ukoenig wrote:Silvio,
function Browse() is not compatible with tDatabase.
tested from inside the tool
also You can use from folder < samples > xbradded.prg
next select tDatabase and You can browse the file customer.
regards
Uwe
static function CustEditDlg( oRec )
local oDlg, oFont, oGrp
DEFINE FONT oFont NAME "TAHOMA" SIZE 0,-14
DEFINE DIALOG oDlg SIZE 618,382 PIXEL FONT oFont TITLE "CUSTOMER"
ukoenig wrote:karinha,
the purpose :
1. examples of the syntax to use the different methods of tDatabase
2. easy adding of Your own tests without starting from the beginning to define dialogs, browser ....
It works like a box to include different tests.
everything is included in just one program
I just added to a empty dialog Silvios ID-number test
next I'm working on a test of using ORDSCOPE using tDatabase instead of a filter
Silvios ID-number-test
I added the needed ID-number to Customer.dbf
testing ORDSCOPE
regards
Uwe
try to make a source dialog edit and add new Id ( incremental field Cr as "0001"-> strzero(recno+1,4))
1. open the test dialog on two different pc ( A,B)
2. Insert a new record on Pc A but not save
3. Insert a new record on Pc B but not save
4. save Pc A
5. save Pc B
and see if you have two record with the same id
I need
a field character of 4 called ID sample "0001"
IF nAge2 = 0 // only nAge1
oCust:SetFilter( " Age == " + STR(nAge1) ) // from GET - field
ELSE
oCust:SetFilter( " Age >= " + STR(nAge1) + " .and. Age <= " + STR(nAge2) )
ENDIF
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot], nageswaragunupudi and 33 guests