X-Git-Url: http://ecere.com/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=ide%2Fsrc%2Fabout.ec;h=5f81c3b397dd72a674c4303d12452bb60a9d1e0d;hb=cf37e3addcf039065340e429f0c3e1cf30849bb2;hp=4a71c493d4fcffe0e93f446306d5bd7dae3538f9;hpb=a5e4250baa25ffa9ab29b32bc50689654a5ee8af;p=sdk diff --git a/ide/src/about.ec b/ide/src/about.ec index 4a71c49..5f81c3b 100644 --- a/ide/src/about.ec +++ b/ide/src/about.ec @@ -6,30 +6,59 @@ import "ecere" import "licensing" +#if (defined(__WORDSIZE) && __WORDSIZE == 8) || defined(__x86_64__) +#define X64STRING " (64 bit)" +#else +#define X64STRING " (32 bit)" +#endif + class AboutIDE : Window { borderStyle = sizable; hasClose = true; - clientSize = { 440, 440 }; + minClientSize = { 462, 450 }; text = $"About the Ecere SDK"; tabCycle = true; - Label { this, text = "Ecere Software Development Kit v0.44 \"Ryōan-ji\"", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 128 } }; - Label { this, text = "Copyright © 2005-2012 Ecere Corporation", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 144 } }; - Label { this, text = "Copyright © 1996-2012 Jérôme Jacovella-St-Louis", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 160 } }; - Label { this, text = $"Lead Architect and Developer", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 188 } }; - Label { this, text = "Jérôme Jacovella-St-Louis", position = { 220, 188 } }; - Label { this, text = $"With contributions from...", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 208 } }; + EditBox versionCopyright + { + this, font = { $"Tahoma", 8.25f, bold = true }, borderStyle = none, background = white, readOnly = true, noCaret = true, multiLine = true, autoSize = true, position = { 13, 128 }; + }; + + bool OnPostCreate() + { + char * shortVersion = CopyString(REPOSITORY_VERSION); + char * message; + char * occ; + StripQuotes(shortVersion, shortVersion); + occ = strpbrk(shortVersion, "-+( "); + if(occ) *occ = '\0'; + message = PrintString( + "Ecere Software Development Kit ", strcmp(shortVersion, "unknown") ? "v" : "", shortVersion, " \"Ryōan-ji\"" X64STRING "\n" + "Build " REPOSITORY_VERSION "\n" + "Copyright © 2005-2016 Ecere Corporation\n" + "Copyright © 1996-2016 Jérôme Jacovella-St-Louis"); + versionCopyright.contents = message; + delete message; + delete shortVersion; + return true; + } + + Label { this, text = $"Lead Architect and Developer", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 194 } }; + Label { this, text = "Jérôme Jacovella-St-Louis", position = { 250, 194 } }; + Label { this, text = $"Developer (IDE, build system, EDA)", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 214 } }; + Label { this, text = "Réjean Loyer", position = { 250, 214 } }; + Label { this, text = $"With contributions from...", font = { $"Tahoma", 8.25f, bold = true }, position = { 16, 234 } }; Button licensingBtn { - this, anchor = { left = 40, bottom = 10 }; hotKey = altL; text = "Software Licenses"; + this, anchor = { left = 40, bottom = 10 }; hotKey = altL; text = $"Software Licenses"; bool NotifyClicked(Button button, int x, int y, Modifiers mods) { LicensesForm { master = this }.Modal(); return true; } }; - Button button + Button button { this, text = $"OK", isDefault = true, size = { 80, 20 }, anchor = { right = 13, bottom = 10 }; @@ -41,21 +70,50 @@ class AboutIDE : Window }; EditBox credits { - this, borderStyle = none, noCaret = true, readOnly = true, anchor = { left = 16, top = 236, bottom = 48, right = 16 }, + this, borderStyle = none, noCaret = true, readOnly = true, anchor = { left = 16, top = 252, bottom = 38, right = 16 }, background = { r = 250, g = 252, b = 255 }; multiLine = true, hasVertScroll = true, - contents = - "Réjean Loyer\n" - " Most of the additional programming on the IDE\n" - " Initial EDA design\n" - " Cross-platform and cross-compiler Makefile build system\n" + contents = + "Alexis Naveros\n" + " Font Outlines\n" + " Modern OpenGL Guidance\n" + "\n" + "Local Ottawa eC Users Community\n" + " http://www.meetup.com/eC-Programming-Language-Meetup/\n" + "\n" + "Darel Rex Finley\n" + " Quick sort algorithm\n" + "\n" + "Isaac Turner\n" + " Safe quick sort wrappers\n" + "\n" + "Peng Hai Jie\n" + " Testing on FreeBSD\n" + "\n" + "Chinese translation Team:\n" + " Peng Hai Jie\n" + " Ma Yanhong\n" + " Li Qi\n" + " Mojay Lee\n" + " Loonke\n" "\n" - "Juan Sánchez\n" + "Ricardo Nabinger Sanchez\n" + " Brazilian Portuguese translation\n" + " Work on FreeBSD support\n" + "\n" + "Juan Sánchez Rangel\n" " Oracle EDA driver\n" " Spanish translation\n" " Finally getting us an IDE toolbar!\n" "\n" + "Wikipedia User:Cquest for Ryoan-ji picture in Sakura season\n" + " http://en.wikipedia.org/wiki/File:Kyoto-Ryoan-Ji_MG_4512.jpg\n" + "\n" + "Niraj Kulkarni\n" + " EditBox fixes\n" + " Marathi translation\n" + "\n" "Jean-François Bilodeau\n" " Initial Cocoa driver code\n" "\n" @@ -71,9 +129,7 @@ class AboutIDE : Window "\n" "Max Maton\n" " Code Editor improvements\n" - "\n" - "Ricardo Nabinger Sanchez\n" - " Work on FreeBSD support\n" + " Dutch translation\n" "\n" "Li Qi\n" " Internationalization, many good samples on the forums\n" @@ -84,15 +140,19 @@ class AboutIDE : Window "Walter Charles Griffin\n" " Documentation, our mascott Ollie the Sea Otter\n" "\n" + "Ivan Rubinson\n" + " Russian translation\n" + " Hebrew translation\n" + "\n" + "Vu Tuan Tanh\n" + " Vietnamese translation\n" + "\n" + "Meggyesházi János\n" + " Hungarian translation\n" + "\n" "Necdet Cokyazici\n" " Work on debian packaging and using Ecere in najitool\n" "\n" - "Chinese translation Team:\n" - " Ma Yanhong\n" - " Li Qi\n" - " Mojay Lee\n" - " Loonke\n" - "\n" "Making the Forums alive and forcing me to write good info:\n" " D. Bane\n" " Sam Hu\n" @@ -112,7 +172,7 @@ class AboutIDE : Window " Insightful discussions, testing Ecere Blokus!\n" "\n" "Luis Felipe Righi Flores\n" - " Brazilian portuguese translation (under way)\n" + " Brazilian portuguese translation\n" "\n" "Special Thanks\n" "\n" @@ -124,9 +184,11 @@ class AboutIDE : Window "\n" " All the guys on #ecere for moral support\n" "\n" + " Dmitrijs Ledkovs for sponsoring the SDK into Debian/Ubuntu\n" + "\n" " #launchpad, #ubuntu-packaging,\n" - " #ubuntu-motu (tumbleweed, jtaylor...)\n" - " For help to finally resolve these PPA issues!\n" + " #ubuntu-motu (tumbleweed, jtaylor, micahg...)\n" + " For help with Debian/Ubuntu packaging\n" "\n" " freebyte.com\n" "\n" @@ -150,12 +212,12 @@ class AboutIDE : Window //Label { this, text = "Max Maton", position = { 192, 204 } }; Picture picture { - this, size = { 318, 94 }, position = { 64, 11 }, image = { ":ecere.jpg" }; + this, size = { 318, 94 }, anchor = { top = 11 }, image = { ":ecere.jpg" }; cursor = ((GuiApplication)__thisModule).GetCursor(hand); bool OnLeftButtonDown(int x, int y, Modifiers mods) { - ShellOpen("http://www.ecere.com/"); + ShellOpen("http://ecere.org/"); return true; } };