hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 10430 899a30018ede
parent 10428 7c25297720f1
child 10432 b0abef0ee78c
equal deleted inserted replaced
10428:7c25297720f1 10430:899a30018ede
     8                    str: shortstring;
     8                    str: shortstring;
     9                    len: Longword;
     9                    len: Longword;
    10                    buf: Pointer
    10                    buf: Pointer
    11                end;
    11                end;
    12     TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);
    12     TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);
    13     TGUICallback = procedure (p: pointer; msgType: TMessageType; msg: PChar; len: Longword);
    13     TGUICallback = procedure (p: pointer; msgType: TMessageType; msg: PChar; len: Longword); cdecl;
    14 
    14 
    15 implementation
    15 implementation
    16 
    16 
    17 end.
    17 end.