On Fri, Mar 31, 2017 at 1:15 PM, Henry Vermaak <henry.verm...@gmail.com> wrote:
> On Fri, Mar 31, 2017 at 08:42:24AM -0700, fredvs wrote: > > > Z:\home\fred\uos\examples\uos.pas(7438,29) Warning: (4046) > Constructing a > > > class "TThread" with abstract method "Execute" > > > > Huh, is it Is it serious doctor? > > I use this: > > function DummyThread(param: pointer): ptrint; > begin > Result := 0; > EndThread(Result); > end; > > begin > BeginThread(@DummyThread); > ... > ... > end. What about calling TM directly? Something like this: uses cthreads; var TM: TThreadManager; begin TM := Default(TThreadManager); // just hiding hint 'variable TM doesn't seem to be initialized' GetThreadManager(TM); IsMultiThread := TM.InitManager; ... end. I can't test it now (I would like to debug it asap), but I think FPC offer some option to start the TM without starting a new -- dummy -- thread. o.O -- Silvio Clécio
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal