hedgewars: hedgewars/uFLTypes.pas@b0abef0ee78c (annotated)

10406 b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	1	unit uFLTypes;
10418 091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	2	interface
10406 b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	3
10428 7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	4	type
7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	5	TMessageType = (mtPreview);
7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	6
7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	7	TIPCMessage = record
10418 091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	8	str: shortstring;
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	9	len: Longword;
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	10	buf: Pointer
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	11	end;
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	12
10420 02c573d19224 flib: unc0rr parents: 10418 diff changeset	13	TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);
10430 899a30018ede Getter and setter for seed unc0rr parents: 10428 diff changeset	14	TGUICallback = procedure (p: pointer; msgType: TMessageType; msg: PChar; len: Longword); cdecl;
10406 b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	15
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	16	TGameType = (gtPreview, gtLocal);
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	17	THedgehog = record
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	18	name: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	19	hat: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	20	end;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	21	TTeam = record
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	22	teamName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	23	flag: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	24	graveName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	25	fortName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	26	owner: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	27	color: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	28	extDriven: boolean;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	29	botLevel: Longword;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	30	hedgehogs: array[0..7] of THedgehog;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	31	hogsNumber: Longword;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	32	end;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	33
10406 b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	34	implementation
b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	35
b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	36	end.

author	unc0rr
	Sun, 28 Sep 2014 21:33:14 +0400
branch	qmlfrontend
changeset 10432	b0abef0ee78c
parent 10430	899a30018ede
child 10440	b74a7bbe224e
permissions	-rw-r--r--