Prvni verze

frmVyberSarze.dfm

@@ -0,0 +1,145 @@
+object formVyberSarze: TformVyberSarze
+  Left = 0
+  Top = 0
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsSingle
+  Caption = '  Vyberte '#353'arzi'
+  ClientHeight = 506
+  ClientWidth = 585
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -19
+  Font.Name = 'Segoe UI'
+  Font.Style = []
+  Position = poOwnerFormCenter
+  TextHeight = 25
+  object GridPanel1: TGridPanel
+    Left = 0
+    Top = 0
+    Width = 585
+    Height = 506
+    Align = alClient
+    ColumnCollection = <
+      item
+        Value = 100.000000000000000000
+      end>
+    ControlCollection = <
+      item
+        Column = 0
+        Control = GridPanel2
+        Row = 2
+      end
+      item
+        Column = 0
+        Control = grdSarze
+        Row = 1
+      end>
+    RowCollection = <
+      item
+        Value = 10.000000000000000000
+      end
+      item
+        Value = 80.000000000000000000
+      end
+      item
+        Value = 10.000000000000000000
+      end>
+    TabOrder = 0
+    object GridPanel2: TGridPanel
+      Left = 1
+      Top = 455
+      Width = 583
+      Height = 50
+      Align = alClient
+      ColumnCollection = <
+        item
+          Value = 50.000000000000000000
+        end
+        item
+          Value = 50.000000000000000000
+        end>
+      ControlCollection = <
+        item
+          Column = 0
+          Control = btnOK
+          Row = 0
+        end
+        item
+          Column = 1
+          Control = btnZrusit
+          Row = 0
+        end>
+      RowCollection = <
+        item
+          Value = 100.000000000000000000
+        end>
+      TabOrder = 0
+      DesignSize = (
+        583
+        50)
+      object btnOK: TButton
+        Left = 76
+        Top = 5
+        Width = 140
+        Height = 40
+        Anchors = []
+        Caption = 'OK'
+        TabOrder = 0
+        OnClick = btnOKClick
+      end
+      object btnZrusit: TButton
+        Left = 366
+        Top = 5
+        Width = 140
+        Height = 40
+        Anchors = []
+        Caption = 'Zru'#353'it'
+        TabOrder = 1
+        OnClick = btnZrusitClick
+      end
+    end
+    object grdSarze: TDBGrid
+      Left = 1
+      Top = 51
+      Width = 583
+      Height = 404
+      Align = alClient
+      DataSource = dm.dsSarze
+      TabOrder = 1
+      TitleFont.Charset = DEFAULT_CHARSET
+      TitleFont.Color = clWindowText
+      TitleFont.Height = -19
+      TitleFont.Name = 'Segoe UI'
+      TitleFont.Style = []
+      Columns = <
+        item
+          Expanded = False
+          FieldName = 'colSarze'
+          Title.Alignment = taCenter
+          Title.Caption = #352'ar'#382'e'
+          Width = 564
+          Visible = True
+        end
+        item
+          Expanded = False
+          FieldName = 'colSarze2'
+          Visible = False
+        end
+        item
+          Alignment = taCenter
+          Expanded = False
+          FieldName = 'colMnoz'
+          Title.Alignment = taCenter
+          Title.Caption = 'Mno'#382'stv'#237
+          Width = -1
+          Visible = False
+        end
+        item
+          Expanded = False
+          FieldName = 'colIDKmen'
+          Visible = False
+        end>
+    end
+  end
+end