-
Notifications
You must be signed in to change notification settings - Fork 16
/
ts.dpr
63 lines (56 loc) · 2.25 KB
/
ts.dpr
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
program TS;
{ TILE STUDIO
Web site: http://tilestudio.sourceforge.net/
Written by: Mike Wiering, University of Nijmegen
E-mail: [email protected]
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License as
published by the Free Software Foundation; either version 2 of the
License, or (at your option) any later version. See the file
COPYING included with this distribution for more information.
}
uses
Forms,
Main in 'Main.pas' {MainForm},
Tiles in 'Tiles.pas',
Import in 'Import.pas' {ImportTiles},
About in 'About.pas' {AboutForm},
Create in 'Create.pas' {NewForm},
TileCopy in 'TileCopy.pas' {CopyTilesForm},
MCEdit in 'MCEdit.pas' {MapCode},
CGSettings in 'CGSettings.pas' {CodeGen},
SelectDir in 'SelectDir.pas' {OutputDir},
Export in 'Export.pas' {ExportTiles},
Scroll in 'Scroll.pas' {MapScroll},
Calc in 'Calc.pas',
PalMan in 'PalMan.pas' {PaletteManager},
ImpPovAni in 'ImpPovAni.pas' {PovAni},
InfoForm in 'InfoForm.pas' {Lists},
ListsForm in 'ListsForm.pas' {Lists},
ReplaceColors in 'ReplaceColors.pas' {Replace},
Settings in 'Settings.pas' {SettingsForm},
RGBConvForm in 'RGBConvForm.pas' {RGBConv};
{$R *.RES}
begin
Application.Initialize;
Application.Title := 'Tile Studio';
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TOutputDir, OutputDir);
Application.CreateForm(TExportTiles, ExportTiles);
Application.CreateForm(TMapScroll, MapScroll);
Application.CreateForm(TPaletteManager, PaletteManager);
Application.CreateForm(TPovAni, PovAni);
Application.CreateForm(TInfo, Info);
Application.CreateForm(TLists, Lists);
Application.CreateForm(TReplace, Replace);
Application.CreateForm(TSettingsForm, SettingsForm);
Application.CreateForm(TRGBConv, RGBConv);
Application.Icon := MainForm.Icon;
Application.CreateForm(TImportTiles, ImportTiles);
Application.CreateForm(TAboutForm, AboutForm);
Application.CreateForm(TNewForm, NewForm);
Application.CreateForm(TCopyTilesForm, CopyTilesForm);
Application.CreateForm(TMapCode, MapCode);
Application.CreateForm(TCodeGen, CodeGen);
Application.Run;
end.