FiveTech Software tech support forums

... is ready for use. At the same time it also gets the total row count. If user uses GoBottom() it reads the last 100 records. If the user wants oRs:GoTo( 123040 ), then it reads 100 records around the row number 123040. As a result the class always provides the record the programmer wants without ...

METHODS: RecCount(), LastRec(), KeyCount(),RecNo(), KeyNo() GoTop(),GoBottom(),GoTo(nRec),KeyGoTo(nKey),Skip(n) FCount(),FieldPos(c),FieldName(),FieldLen(),FieldDec(),FieldType() FieldGet(),FieldPut() SetOrder(cSort,,lDescend) Save() Close() or End() --------------- ...

... be saved I can append the data or edit the data and the last thing I do with dbfcdx is to move the record pointer after I write to the disk with GoTo Recno() ADO is a bit different with SQL .. Recordsets can be added to or edited one record at a time and when a committ is made all I do is issue ...

Goto Recno() works the same .. physically moves the record pointer back to itself thereby flushing and writing the buffers

Rick Lipkin

... have you try oMailItem:Send() does it "send" or goto "out Basket" :?: Does anyone know where I can find TOLEAUTO.PRG source file? as i can say it is Part of harbour and include in hbwin

... Y este el el buildh if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST if "%FWDIR%" == "" set FWDIR=c:\fwh2304 if "%HBDIR%" == "" set ...

... ECHO ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST ECHO Compiling... if "%FWDIR%" == "" set FWDIR=c:\fwh2212 if "%XHDIR%" ...

... JIMMYSKI.C 1>>Erro.log 2>>ERROS.LOG c:\fwh\0\SKIN2>If ErrorLevel 1 Type Erro.log | More c:\fwh\0\SKIN2>If ErrorLevel 1 Goto Exit c:\fwh\0\SKIN2>C:\BCC7\bin\BRC32.Exe -R XPLOOK.RC Borland Resource Compiler Version 5.40 Copyright (c) 1990, 1999 Inprise Corporation. ...

For DBF, BookMark is RECNO() For ADO BookMark is BookMark etc. oBrw:BookMark := n is equivalent to ( oBrw:cAlias )-> GOTO( n ) for DBF and is equivalent to oBrw:oRs:BookMark := n for ADO Same way oBrw:KeyNo is same is OrdKeyNo() for DBF, AbsolutePosition of ADO, etc XBrowse can ...

Jimmy wrote:hi,

i have a Problem when place "only" 1 x GET into ButtonBar

as it can not "change" to other Control it does not "lostFocus" -> no VALID -> no GOTO

any Idea for a Workaround

Yes.
We need to have atleast 2 controls.

... Windows 9X/NT/200X/ME/XP/Vista/7/8/10 넴 ECHO 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸? ECHO  賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽? if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST set oldpath=%path% set oldinclude=%include% set oldlib=%lib% set oldlibpath=%libpath% @set current_dir=%cd% ...

hi,

i have a Problem when place "only" 1 x GET into ButtonBar

as it can not "change" to other Control it does not "lostFocus" -> no VALID -> no GOTO

any Idea for a Workaround

... } now i like to use "same" GET to "input" Number and press "ENTER" for "GOTO" ... how ... need Idea :idea: --- when "navigate" in XBROWSE Codeblock bChange will call PROCEDURE to "assign" RECNO() ...

example:
select products
goto top
do while .NOT. eof()
cnaam=TRIM(products->naam) to transform in his real fieldname

select sales
append blank
replace sales->fieldname with ....

select products
skip 1

enddo

... after the 'say' and 'get' commands become the real record names? select products a=5 b=5.8 set filter to products->niet=" " goto top do while .NOT. eof() cnaam2=TRIM(products->naam) nalias=TRIM(products->alias) @ a,5 say cnaam OF oDlg FONT oFont @ b,12 get nalias OF ...