diff options
| -rw-r--r-- | src/corelib/fpg_main.pas | 2 | ||||
| -rw-r--r-- | src/gui/messagedialog.inc | 14 |
2 files changed, 15 insertions, 1 deletions
diff --git a/src/corelib/fpg_main.pas b/src/corelib/fpg_main.pas index ed87ac95..dc9d7f4c 100644 --- a/src/corelib/fpg_main.pas +++ b/src/corelib/fpg_main.pas @@ -68,7 +68,7 @@ const cMessageQueueSize = 1024; // version and name constants - fpGUIVersion = '0.6.2'; + fpGUIVersion = '0.7'; fpGUIName = 'fpGUI Toolkit'; const diff --git a/src/gui/messagedialog.inc b/src/gui/messagedialog.inc index 88a22272..077b3ea9 100644 --- a/src/gui/messagedialog.inc +++ b/src/gui/messagedialog.inc @@ -369,6 +369,20 @@ begin dlg.WindowTitle := ATitle; dlg.Buttons := [mbOK]; dlg.DefaultButton := mbOK; + dlg.Text := dlg.WindowTitle; + dlg.InformativeText := LineEnding + LineEnding + + 'This program uses ' + fpGUIName + ' version ' + fpGUIVersion + '.' + + LineEnding + LineEnding + + fpGUIName + ' is intended for Open Source and Commercial applications. fpGUI' + + ' uses the LGPL 2 license with a static linking exception - the same as the Free ' + + ' Pascal Compiler''s RTL.' + + LineEnding + LineEnding + + 'fpGUI is a Object Pascal toolkit for cross-platform application development. ' + + 'It provides single-source portability across Linux, MS Windows, *BSD ' + + 'and embedded devices like Embedded Linux and Windows CE.' + + LineEnding + LineEnding + + 'For more information, see the ' + fpGUIName + ' website at: ' + + 'http://opensoft.homeip.net/fpgui/'; dlg.PrepareLayout; dlg.ShowModal; finally |