Forms
type TAsyncCallQueueItem = record
Method: TDataEvent;
Data: PtrInt;
NextItem: PAsyncCallQueueItem;