[fpc-pascal] GetCurrentThreadID to string

2009-05-21 Thread Graeme Geldenhuys
Hi, How do I convert the GetCurrentThreadID() result to a string? At the moment for Linux and Windows the following works: var lsThreadID: string begin lsThreadID := IntToStr(GetCurrentThreadID); But under Mac OS the above code gives me the following error: Error: Incompatible

[fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Graeme Geldenhuys
Hi, How do I use platform specific include files like FPC does, but in my own projects? for example: In tiOPF we have a tiUtils.pas unit. We try and limit IFDEFs to only that unit. Often we have a single tiXXX() method which contains a {IFDEF FPC} or {IFDEF UNIX} and {IFDEF WINDOWS}. I would

Re: [fpc-pascal] GetCurrentThreadID to string

2009-05-21 Thread dmitry boyarintsev
lsThreadID := IntToStr(PtrUInt(GetCurrentThreadID)); should solve ANY problem. thanks, dmitry ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Marco van de Voort
In our previous episode, Graeme Geldenhuys said: How do I use platform specific include files like FPC does, but in my own projects? FPC has actually several schemes. The most common two are: 1 {$ifdef'ed} inclusion of includefiles. 2 having make set the includedir to a target version. The

Re: [fpc-pascal] GetCurrentThreadID to string

2009-05-21 Thread Vinzent Höfler
Graeme Geldenhuys graemeg.li...@gmail.com: How do I convert the GetCurrentThreadID() result to a string? At the moment for Linux and Windows the following works: var lsThreadID: string begin lsThreadID := IntToStr(GetCurrentThreadID); lsThreadID := SysUtils.IntToStr

Re: [fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Tomas Hajny
On Thu, May 21, 2009 10:13, Marco van de Voort wrote: In our previous episode, Graeme Geldenhuys said: How do I use platform specific include files like FPC does, but in my own projects? FPC has actually several schemes. The most common two are: 1 {$ifdef'ed} inclusion of includefiles. 2

Re: [fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Graeme Geldenhuys
2009/5/21 Marco van de Voort mar...@stack.nl: 2 having make set the includedir to a target version. The first is dead simple, the second depends on your makefile system. Ah, so that's the secret. :-) Thanks, I'll try this one. I'm pretty sure I can use some of the built-in path macros in

Re: [fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Marco van de Voort
In our previous episode, Tomas Hajny said: Well, additional advantages of not having IFDEFs in the code (second scenario) include higher consistency of implementation across the platforms and no need for changes in the common source when adding support for new platforms. That is one side. On

Re: [fpc-pascal] Using platform specific include files like FPC does

2009-05-21 Thread Marco van de Voort
In our previous episode, Graeme Geldenhuys said: Ah, so that's the secret. :-) Thanks, I'll try this one. I'm pretty sure I can use some of the built-in path macros in Lazarus IDE to accomplish this. Afaik lazarus already does this in de lcl/ dir. Note that afaik the main reason FPC does

[fpc-pascal] Gecko / Firefox / XPCOM

2009-05-21 Thread Henrik Genssen
Hi, I am trying to use the gecko libs from http://sourceforge.net/projects/d-gecko with lazarus. i get the following errors: Hint: Start of reading config file c:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg Hint: End of reading config file c:\lazarus\fpc\2.2.2\bin\i386-win32\fpc.cfg Free Pascal

Re: [fpc-pascal] Gecko / Firefox / XPCOM

2009-05-21 Thread Flávio Etrusco
On Thu, May 21, 2009 at 5:34 PM, Henrik Genssen henrik.gens...@mediafactory.de wrote: (...) nsMemory.pas(155,13) Warning: Some fields coming before GetMem weren't initialized nsMemory.pas(157,17) Warning: Some fields coming before ReallocMem weren't initialized nsMemory.pas(157,17) Error: