hedgewars: hedgewars/uFLTypes.pas@03519fd9f98d (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
10452 03519fd9f98d Show team color in teams list widget, also allow to change it on mouse click unc0rr parents: 10450 diff changeset	5	TMessageType = (mtPreview, mtAddPlayingTeam, mtRemovePlayingTeam, mtAddTeam, mtRemoveTeam
03519fd9f98d Show team color in teams list widget, also allow to change it on mouse click unc0rr parents: 10450 diff changeset	6	, mtTeamColor);
10428 7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	7
7c25297720f1 More refactoring: move PoC preview getting code into flib unc0rr parents: 10420 diff changeset	8	TIPCMessage = record
10418 091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	9	str: shortstring;
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	10	len: Longword;
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	11	buf: Pointer
091d2c0216c3 Move away from passing shortstrings into C code, now IPC works unc0rr parents: 10406 diff changeset	12	end;
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	13
10420 02c573d19224 flib: unc0rr parents: 10418 diff changeset	14	TIPCCallback = procedure (p: pointer; msg: PChar; len: Longword);
10430 899a30018ede Getter and setter for seed unc0rr parents: 10428 diff changeset	15	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	16
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	17	TGameType = (gtPreview, gtLocal);
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	18	THedgehog = record
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	19	name: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	20	hat: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	21	end;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	22	TTeam = record
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	23	teamName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	24	flag: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	25	graveName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	26	fortName: shortstring;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	27	owner: shortstring;
10450 bf9e30b4ef9b - Store index of color instead of its value unc0rr parents: 10444 diff changeset	28	color: Longword;
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	29	extDriven: boolean;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	30	botLevel: Longword;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	31	hedgehogs: array[0..7] of THedgehog;
b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	32	hogsNumber: Longword;
10440 b74a7bbe224e - Implement getTeamsList (not tested) unc0rr parents: 10432 diff changeset	33	end;
b74a7bbe224e - Implement getTeamsList (not tested) unc0rr parents: 10432 diff changeset	34	PTeam = ^TTeam;
10432 b0abef0ee78c Quick Game PoC unc0rr parents: 10430 diff changeset	35
10406 b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	36	implementation
b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	37
b5fd52ac760f Basic layout of frontlib, some more sdl bindings unc0rr parents: diff changeset	38	end.

author	unc0rr
	Mon, 03 Nov 2014 00:01:02 +0300
branch	qmlfrontend
changeset 10452	03519fd9f98d
parent 10450	bf9e30b4ef9b
child 10819	57e21f7621b0
permissions	-rw-r--r--