2 public import static "ecere"
10 font = { "Courier New", 10 };
18 anchor = { 10, 10, 10, 10 };
22 property char * sourceFile
26 File f = FileOpen(value, read);
36 class LicensesForm : Window
38 caption = "License Agreements";
39 background = formColor;
40 borderStyle = sizable;
42 clientSize = { 818, 556 };
48 anchor = { 10, 60, 10, 40 };
52 this, anchor = { top = 16 }, font = { "Tahoma", 10, true };
53 caption = "This program is based on these free open source software components.";
57 this, anchor = { top = 32 }, font = { "Tahoma", 10, true };
58 caption = "By using it you agree to the terms and conditions of their individual licenses.";
62 caption = "Ecere SDK";
63 sourceFile = ":licenses/LICENSE";
64 tabControl = tabControl;
69 sourceFile = ":licenses/png.LICENSE";
70 tabControl = tabControl;
75 sourceFile = ":licenses/jpg.LICENSE";
76 tabControl = tabControl;
78 LicenseTab freetypeTab
81 sourceFile = ":licenses/freetype.LICENSE";
82 tabControl = tabControl;
84 LicenseTab harfbuzzTab
87 sourceFile = ":licenses/harfbuzz.LICENSE";
88 tabControl = tabControl;
93 sourceFile = ":licenses/ungif.LICENSE";
94 tabControl = tabControl;
99 sourceFile = ":licenses/zlib.README";
100 tabControl = tabControl;
105 sourceFile = ":licenses/sqlite.LICENSE";
106 tabControl = tabControl;
110 caption = "Tango Icons";
111 sourceFile = ":licenses/tango.COPYING";
112 tabControl = tabControl;
117 sourceFile = ":licenses/upx.LICENSE";
118 tabControl = tabControl;
122 caption = "GCC, GDB";
123 sourceFile = ":licenses/gpl.LICENSE";
124 tabControl = tabControl;
130 anchor = { bottom = 10 };
133 NotifyClicked = ButtonCloseDialog;
136 Button dontAgreeButton
139 caption = $"I don't agree";
141 anchor = { bottom = 10, right = 14 };
143 bool NotifyClicked(Button button, int x, int y, Modifiers mods)
145 ((GuiApplication)__thisModule).desktop.Destroy(0);
152 caption = $"I agree";
153 font = { "Verdana", 10, bold = true };
156 anchor = { bottom = 10 };
157 NotifyClicked = ButtonCloseDialog;