Is it not timeing out because there is no data received, consequently breaking out of the while loop?
Perhaps try: 1. while not (LastError <> 0) do begin 2. if lastError<>*ErrTimeOut* then break; 3. if canread(1000) then begin 4. LCMD := Recvstring(1000); 5. myconverterfunc1:=...@callconv1; 6. myconverterfunc1(LCMD); 7. end 8. else 9. sleep(100); 10. end; On Wed, May 27, 2009 at 11:59 AM, lloyd thomas <[email protected]>wrote: > I managed to get an error, but it is meaningless to me. > error = Timeout during operation 27/05/2009 00:09:35 > > Which is a bit strange as I would not expect any activity at that time. > Any Ideas? > > 2009/5/25 Werner Hauptfleisch <[email protected]>: > > Hi, > > > > To get the error description to you can just read the value of > LastErrorDesc > > if LastError <> 0. > > > > W > > > > On Mon, May 25, 2009 at 3:45 AM, lloyd thomas <[email protected]> > > wrote: > >> > >> Could be GetErrorDesc(LastError); > >> > >> found this in synaser.pas > >> {:Returns the descriptive text associated with ErrorCode. You need this > >> method only in special cases. Description of LastError is now > >> accessible > >> through the LastErrorDesc property.} > >> class function GetErrorDesc(ErrorCode: integer): string; > >> > >> I'll give it a try. > >> Thanks for the info. > >> > >> 2009/5/24 Roberto <[email protected]>: > >> > You are writing the error to console _only if_ there is an exception > >> > raised. If LastError <> 0, there will be no error message displayed. > >> > add this after your current WriteLn(): if LastError<> 0 then WriteLn( > >> > ..LastError... and ..ErrorDesc...) > >> > (I can't remember the exact property/function to get the last error > >> > description, look it up). > >> > > >> > 2009/5/24 lloyd thomas <[email protected]>: > >> >> Thanks Werner, > >> >> I am not sure what the error is and I am not clear how to get it > would > >> >> the following be the correct way? > >> >> > >> >> if active = true then begin > >> >> try > >> >> while not (terminated) do begin > >> >> if lastError<>0 then break; > >> >> if canread(1000) then begin > >> >> LCMD := Recvstring(1000); > >> >> myconverterfunc1:=...@callconv1; > >> >> myconverterfunc1(LCMD); > >> >> end; > >> >> end; > >> >> end; > >> >> except > >> >> on E: Exception do > >> >> Writeln(E.message); //write error > >> >> end; > >> >> > >> >> 2009/5/23 Werner Hauptfleisch <[email protected]>: > >> >>> I note you are breaking out of the while statement when lastError <> > >> >>> 0. > >> >>> Should an error occur and the process loose control of the serial > >> >>> port, why > >> >>> not try and connect and configure the port again? Also, what is the > >> >>> error > >> >>> that you are getting when it stops to collect data? > >> >>> > >> >>> On Wed, May 20, 2009 at 1:34 PM, lloyd thomas > >> >>> <[email protected]> > >> >>> wrote: > >> >>>> > >> >>>> I have written a console app witch uses synaser to collect data > which > >> >>>> is then converted and placed into a database. > >> >>>> The problem I am having is that the app will run for a couple of > days > >> >>>> and then the serial port part of it will stop collecting data. If I > >> >>>> restart the app it happens all over again. > >> >>>> Rather than bore you here I have placed an abridged version of the > >> >>>> code > >> >>>> here > >> >>>> > >> >>>> http://pastebin.com/m5e3de129 > >> >>>> > >> >>>> I am using: > >> >>>> Windows Vista Business > >> >>>> Lazarus 0.9.26 Beta > >> >>>> FPC 2.2.2 > >> >>>> > >> >>>> Thanks for you help in advance > >> >>>> > >> >>>> Lloydie T > >> >>>> > >> >>>> > >> > > >> > > >> > > ------------------------------------------------------------------------------ > >> > Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT > >> > is a gathering of tech-side developers & brand creativity > professionals. > >> > Meet > >> > the minds behind Google Creative Lab, Visual Complexity, Processing, & > >> > iPhoneDevCamp asthey present alongside digital heavyweights like > >> > Barbarian > >> > Group, R/GA, & Big Spaceship. http://www.creativitycat.com > >> > _______________________________________________ > >> > synalist-public mailing list > >> > [email protected] > >> > https://lists.sourceforge.net/lists/listinfo/synalist-public > >> > > >> > >> > >> > ------------------------------------------------------------------------------ > >> Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT > >> is a gathering of tech-side developers & brand creativity professionals. > >> Meet > >> the minds behind Google Creative Lab, Visual Complexity, Processing, & > >> iPhoneDevCamp asthey present alongside digital heavyweights like > Barbarian > >> Group, R/GA, & Big Spaceship. http://www.creativitycat.com > >> _______________________________________________ > >> synalist-public mailing list > >> [email protected] > >> https://lists.sourceforge.net/lists/listinfo/synalist-public > > > > > > > ------------------------------------------------------------------------------ > > Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT > > is a gathering of tech-side developers & brand creativity professionals. > > Meet > > the minds behind Google Creative Lab, Visual Complexity, Processing, & > > iPhoneDevCamp asthey present alongside digital heavyweights like > Barbarian > > Group, R/GA, & Big Spaceship. http://www.creativitycat.com > > _______________________________________________ > > synalist-public mailing list > > [email protected] > > https://lists.sourceforge.net/lists/listinfo/synalist-public > > > > > > > ------------------------------------------------------------------------------ > Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT > is a gathering of tech-side developers & brand creativity professionals. > Meet > the minds behind Google Creative Lab, Visual Complexity, Processing, & > iPhoneDevCamp as they present alongside digital heavyweights like Barbarian > Group, R/GA, & Big Spaceship. http://p.sf.net/sfu/creativitycat-com > _______________________________________________ > synalist-public mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/synalist-public >
------------------------------------------------------------------------------ Register Now for Creativity and Technology (CaT), June 3rd, NYC. CaT is a gathering of tech-side developers & brand creativity professionals. Meet the minds behind Google Creative Lab, Visual Complexity, Processing, & iPhoneDevCamp as they present alongside digital heavyweights like Barbarian Group, R/GA, & Big Spaceship. http://p.sf.net/sfu/creativitycat-com
_______________________________________________ synalist-public mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/synalist-public
