FiveTech Software tech support forums

http://www.xharbour.com/index.asp?page= ... 8&show_i=1

Sandeep (India) does show me his sample.

how to display animated gif in window/dialog ?

I try the gif89 class and give me windows error 'general fault'

this might help :-

oSearch:bGotFocus := { || oSearch:selectall(), oSearch:nPos:= 1 }

sound like you need a web application to update dbf/cdx Try free xScript (clipper/xHarbour syntax) : http://www.xharbour.com/index.asp?page=add_on_xbscript&show_sub=8&show_i=1 or ActiveFoxproPage (foxpro syntax) : www.afpages.com All you need is :- - web server : IIS, Apache - input screen :...

may be for LPT1 we only need :-

opencomm()
writecomm()
closecomm()

or try BuildCommDcb( "LPT1:", @cDcb ) or try BuildCommDcb( "LPT1:9600,n,8,1", @cDcb ) By right we don't need the baud rate for LPT1. Check also if the delay happens on SetCommState(), msgwait(), etc. Try to remove the line causes delay. Check also if anti-virus software causes th...

Try this :- function fLptSend local cDcb, nBytes local nComm := OpenComm( 'LPT1', 1200, 128 ) local nError if ! BuildCommDcb( "LPT1:1200,n,8,1", @cDcb ) nError = GetCommError( nComm ) Msgwait( " BuildCommDcb Error: " + Str( nError ),'',.3 ) endif if ! SetCommState( cDcb ) nError ...

'0' = chr(asc('0'))

you forget this :

headers "header1',"header2","header3","header4" ;

2 steps to avoid runtime error for Clipper exe in high performance processor pc :

- link this obj : http://hyperupload.com/download/022a123 ... b.obj.html

- upgrade to Blinker v7.0

not sure for frame.

But you can group rows by different colors base on key field value :-

oBrw:nClrPane:={|| ...}

Try this :-

select('youralias')
set filter to &cYourFilter
go top

oLbx:gotop()
oLbx:upstable()
oLbx:refresh()

ADD COLUMN ...
:
:
PICTURE if(Gesp='J','@Z 999','999')

// modified fivewn sample to read continuos data from laser diameter reader, you can use a timer to call it . function fReadPort local cDcb, lError, nError cErrCode := space( 16 ) if !( gnComm := OpenComm( 'COM1', 1024, 10 ) ) == 0 if !(BuildCommDcb( "COM1:2400,N,8,1", @cDcb ) .and. SetCom...

Richard,

I would like to know the price too. Plz send it to me.