tvplanit: New calendar icon by Roland Hahn.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8476 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/tvplanit/examples/fulldemo/ExVpRptSetup.lfm

@@ -12,7 +12,6 @@ object frmReportSetup: TfrmReportSetup
   OnCreate = FormCreate
   OnShow = FormShow
   Position = poMainFormCenter
-  LCLVersion = '1.6.4.0'
   object Panel1: TPanel
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Owner
@@ -37,6 +36,7 @@ object frmReportSetup: TfrmReportSetup
       BorderSpacing.Left = 8
       BorderSpacing.Right = 8
       Caption = 'Start Date:'
+      Color = clDefault
       FocusControl = edStartDate
       ParentColor = False
     end
@@ -52,6 +52,7 @@ object frmReportSetup: TfrmReportSetup
       BorderSpacing.Left = 8
       BorderSpacing.Right = 8
       Caption = 'End Date:'
+      Color = clDefault
       FocusControl = edEndDate
       ParentColor = False
     end
@@ -67,6 +68,7 @@ object frmReportSetup: TfrmReportSetup
       BorderSpacing.Left = 8
       BorderSpacing.Right = 8
       Caption = 'Format:'
+      Color = clDefault
       FocusControl = PrintFormatCombo
       ParentColor = False
     end
@@ -85,7 +87,7 @@ object frmReportSetup: TfrmReportSetup
       Borderspacing.Bottom = 12
       ItemHeight = 15
       Sorted = True
-      TabOrder = 0
+      TabOrder = 2
     end
     object edStartDate: TDateEdit
       AnchorSideTop.Control = Panel1
@@ -103,7 +105,7 @@ object frmReportSetup: TfrmReportSetup
       BorderSpacing.Right = 8
       NumGlyphs = 1
       MaxLength = 0
-      TabOrder = 1
+      TabOrder = 0
     end
     object edEndDate: TDateEdit
       AnchorSideLeft.Control = edStartDate
@@ -122,7 +124,22 @@ object frmReportSetup: TfrmReportSetup
       BorderSpacing.Top = 8
       NumGlyphs = 1
       MaxLength = 0
-      TabOrder = 2
+      TabOrder = 1
+    end
+    object Bevel1: TBevel
+      AnchorSideLeft.Control = Panel1
+      AnchorSideRight.Control = Panel1
+      AnchorSideRight.Side = asrBottom
+      AnchorSideBottom.Control = Panel1
+      AnchorSideBottom.Side = asrBottom
+      Left = 8
+      Height = 3
+      Top = 102
+      Width = 249
+      Anchors = [akLeft, akRight, akBottom]
+      BorderSpacing.Left = 8
+      BorderSpacing.Right = 8
+      Shape = bsBottomLine
     end
   end
   object ButtonPanel: TPanel
@@ -133,10 +150,11 @@ object frmReportSetup: TfrmReportSetup
     AnchorSideRight.Side = asrBottom
     Left = 0
     Height = 33
-    Top = 105
+    Top = 113
     Width = 265
     Anchors = [akTop, akLeft, akRight]
     AutoSize = True
+    BorderSpacing.Top = 8
     BevelOuter = bvNone
     ClientHeight = 33
     ClientWidth = 265

components/tvplanit/examples/fulldemo/ExVpRptSetup.pas

@@ -41,6 +41,7 @@ type
   { TfrmReportSetup }
 
   TfrmReportSetup = class(TForm)
+    Bevel1: TBevel;
     btnOK: TButton;
     btnCancel: TButton;
     lblStartDate: TLabel;
@@ -100,6 +101,8 @@ end;
 
 procedure TfrmReportSetup.FormCreate(Sender: TObject);
 begin
+  LoadGlyphFromRCDATA(edStartDate.Glyph, 'VpDateEdit', 16, 24, 32);
+  LoadGlyphFromRCDATA(edEndDate.Glyph, 'VpDateEdit', 16, 24, 32);
   SetCaptions;
 end;
 

components/tvplanit/languages/demo.de.po

@@ -146,6 +146,30 @@ msgstr "Mittwoch"
 msgid "XML files (*.xml)"
 msgstr "XML-Dateien (*.XML)"
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr "Löschen"

components/tvplanit/languages/demo.en.po

@@ -143,6 +143,30 @@ msgstr "Wednesday"
 msgid "XML files (*.xml)"
 msgstr "XML files (*.xml)"
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr "Delete"

components/tvplanit/languages/demo.fi.po

@@ -136,6 +136,30 @@ msgstr "Keskiviikko"
 msgid "XML files (*.xml)"
 msgstr "XML tiedostot (*xml)"
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr ""

components/tvplanit/languages/demo.nl.po

@@ -135,6 +135,30 @@ msgstr "Woensdag"
 msgid "XML files (*.xml)"
 msgstr ""
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr ""

components/tvplanit/languages/demo.pl.po

@@ -146,6 +146,30 @@ msgstr "Środa"
 msgid "XML files (*.xml)"
 msgstr "Plik XML (*.XML)"
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr "Usuń"

components/tvplanit/languages/demo.pot

@@ -133,6 +133,30 @@ msgstr ""
 msgid "XML files (*.xml)"
 msgstr ""
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr ""

components/tvplanit/languages/demo.ru.po

@@ -145,6 +145,30 @@ msgstr "Среда"
 msgid "XML files (*.xml)"
 msgstr ""
 
+#: tfrmreportsetup.btncancel.caption
+msgid "Cancel"
+msgstr ""
+
+#: tfrmreportsetup.btnok.caption
+msgid "OK"
+msgstr ""
+
+#: tfrmreportsetup.caption
+msgid "Report Setup"
+msgstr ""
+
+#: tfrmreportsetup.lblenddate.caption
+msgid "End Date:"
+msgstr ""
+
+#: tfrmreportsetup.lblformat.caption
+msgid "Format:"
+msgstr ""
+
+#: tfrmreportsetup.lblstartdate.caption
+msgid "Start Date:"
+msgstr ""
+
 #: tmainform.btndeleteres.caption
 msgid "Delete"
 msgstr ""