Re: [twsocket] What is wrong in this code?

2006-02-06 Thread Ionut Muntean
Hi Wilfried, I've changed the code to this: in tha main function: . Rec := PrepareRec(true); Rec.AllDist := Rec.AllDist - Dist; Rec.count := RecCount; Send(@Rec, SizeOf(TRec)); Query.Next; repeat

Re: [twsocket] What is wrong in this code?

2006-02-06 Thread Wilfried Mestdagh
Hello Ionut, Change it like this: in the main function: . Rec := PrepareRec(true); Rec.AllDist := Rec.AllDist - Dist; Rec.count := RecCount; Send(@Rec, SizeOf(TRec)); Query.Next; . in OnDataSent: