| Server Side Delphi - Kestral Computing | Start | Index | Next |
Thread Local Storage |
|||
Each thread has 64 4byte storage locations
Code:
var ThreadLocalVariable:DWord; p:pointer begin ThreadLocalVariable := TLSAlloc; TLSSetValue(ThreadLocalVariable, p); p := TLSGetValue(ThreadLocalVariable); TLSFree(ThreadLocalVariable); end;
| Grahame Grieve |