Стартовый пул

2024-04-02 08:46:59 +03:00
parent fd57fffd3a
commit 3bb34d000b
5591 changed files with 3291734 additions and 0 deletions
--- a/RXLib/.svn/pristine/b1/b16ef382c948ee93777cf83e64207a159b493452.svn-base
+++ b/RXLib/.svn/pristine/b1/b16ef382c948ee93777cf83e64207a159b493452.svn-base
@@ -0,0 +1,233 @@
+object rxSortByForm: TrxSortByForm
+  Left = 450
+  Height = 398
+  Top = 243
+  Width = 684
+  ActiveControl = AddBtn
+  Caption = 'Sort by fields'
+  ClientHeight = 398
+  ClientWidth = 684
+  OnCreate = FormCreate
+  Position = poScreenCenter
+  LCLVersion = '1.7'
+  object Label1: TLabel
+    AnchorSideLeft.Control = AddBtn
+    AnchorSideLeft.Side = asrBottom
+    AnchorSideTop.Control = Owner
+    Left = 421
+    Height = 20
+    Top = 6
+    Width = 113
+    BorderSpacing.Around = 6
+    Caption = '&Fields for sorting:'
+    FocusControl = ListBox1
+    ParentColor = False
+  end
+  object Label2: TLabel
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Control = Owner
+    Left = 6
+    Height = 20
+    Top = 6
+    Width = 60
+    BorderSpacing.Around = 6
+    Caption = '&All fields:'
+    FocusControl = ListBox2
+    ParentColor = False
+  end
+  object ListBox2: TListBox
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Control = Label2
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = AddBtn
+    AnchorSideBottom.Control = CheckBox1
+    Left = 6
+    Height = 282
+    Top = 32
+    Width = 258
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Around = 6
+    ItemHeight = 0
+    OnDblClick = ListBox2DblClick
+    ScrollWidth = 256
+    TabOrder = 0
+    TopIndex = -1
+  end
+  object RemoveBtn: TBitBtn
+    AnchorSideLeft.Control = AddBtn
+    AnchorSideTop.Control = AddBtn
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = AddBtn
+    AnchorSideRight.Side = asrBottom
+    Left = 270
+    Height = 35
+    Top = 73
+    Width = 145
+    Anchors = [akTop, akLeft, akRight]
+    AutoSize = True
+    BorderSpacing.Top = 6
+    Caption = '&Remove'
+    Glyph.Data = {
+      8A010000424D8A01000000000000760000002800000018000000170000000100
+      0400000000001401000000000000000000001000000010000000000000000000
+      80000080000000808000800000008000800080800000C0C0C000808080000000
+      C80000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
+      7777777777777777777777777877777777777777777777770077777777777777
+      7777777090777777777777777777770990777777777777777777709990777777
+      7777777777770999907777777777777777709999900000008777777777099999
+      999999990777777770999999999999990777777709999999999999990777777F
+      999999999999999907777777F999999999999999077777777F99999999999999
+      0777777777F999999999999907777777777F999998FFFFFF877777777777F999
+      987777777777777777777F999877777777777777777777F99877777777777777
+      7777777F987777777777777777777777F877777777777777777777777F777777
+      7777777777777777777777777777
+    }
+    OnClick = RemoveBtnClick
+    TabOrder = 2
+  end
+  object UpBtn: TBitBtn
+    AnchorSideLeft.Control = AddBtn
+    AnchorSideTop.Control = RemoveBtn
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = AddBtn
+    AnchorSideRight.Side = asrBottom
+    Left = 270
+    Height = 36
+    Top = 114
+    Width = 145
+    Anchors = [akTop, akLeft, akRight]
+    AutoSize = True
+    BorderSpacing.Top = 6
+    Caption = 'M&ove up'
+    Glyph.Data = {
+      96010000424D9601000000000000760000002800000017000000180000000100
+      0400000000002001000000000000000000001000000010000000000000000000
+      80000080000000808000800000008000800080800000C0C0C000808080000000
+      C80000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
+      7777777777707777777777777777777777707777777777777777777777707777
+      77780000000877777770777777709999999F77777770777777709999999F7777
+      7770777777709999999F77777770777777709999999F77777770777777709999
+      999F77777770777777709999999F77777770780000009999999888888F707709
+      9999999999999999F7707770999999999999999F7770777709999999999999F7
+      777077777099999999999F7777707777770999999999F7777770777777709999
+      999F7777777077777777099999F7777777707777777770999F77777777707777
+      77777709F7777777777077777777777F77777777777077777777777777777777
+      7770777777777777777777777770777777777777777777777770
+    }
+    OnClick = UpBtnClick
+    TabOrder = 3
+  end
+  object DownBtn: TBitBtn
+    AnchorSideLeft.Control = AddBtn
+    AnchorSideTop.Control = UpBtn
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = AddBtn
+    AnchorSideRight.Side = asrBottom
+    Left = 270
+    Height = 36
+    Top = 156
+    Width = 145
+    Anchors = [akTop, akLeft, akRight]
+    AutoSize = True
+    BorderSpacing.Top = 6
+    Caption = '&Move down'
+    Glyph.Data = {
+      96010000424D9601000000000000760000002800000017000000180000000100
+      0400000000002001000000000000000000001000000010000000000000000000
+      80000080000000808000800000008000800080800000C0C0C000808080000000
+      C80000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
+      7777777777707777777777777777777777707777777777777777777777707777
+      7777777F777777777770777777777709F777777777707777777770999F777777
+      777077777777099999F777777770777777709999999F77777770777777099999
+      9999F777777077777099999999999F777770777709999999999999F777707770
+      999999999999999F777077099999999999999999F77078000000999999988888
+      8F70777777709999999F77777770777777709999999F77777770777777709999
+      999F77777770777777709999999F77777770777777709999999F777777707777
+      77709999999F7777777077777778000000087777777077777777777777777777
+      7770777777777777777777777770777777777777777777777770
+    }
+    OnClick = DownBtnClick
+    TabOrder = 4
+  end
+  object ListBox1: TListBox
+    AnchorSideLeft.Control = AddBtn
+    AnchorSideLeft.Side = asrBottom
+    AnchorSideTop.Control = Label1
+    AnchorSideTop.Side = asrBottom
+    AnchorSideRight.Control = Owner
+    AnchorSideRight.Side = asrBottom
+    AnchorSideBottom.Control = CheckBox1
+    Left = 421
+    Height = 282
+    Top = 32
+    Width = 257
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Around = 6
+    ItemHeight = 0
+    OnDblClick = SpeedButton1Click
+    OnDrawItem = ListBox1DrawItem
+    ScrollWidth = 255
+    Style = lbOwnerDrawFixed
+    TabOrder = 5
+    TopIndex = -1
+  end
+  object AddBtn: TBitBtn
+    AnchorSideLeft.Control = Owner
+    AnchorSideLeft.Side = asrCenter
+    AnchorSideTop.Control = ListBox1
+    Left = 270
+    Height = 35
+    Top = 32
+    Width = 145
+    AutoSize = True
+    Caption = '&Add field to sort'
+    Glyph.Data = {
+      8A010000424D8A01000000000000760000002800000018000000170000000100
+      0400000000001401000000000000000000001000000010000000000000000000
+      80000080000000808000800000008000800080800000C0C0C000808080000000
+      C80000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
+      7777777777777777777777877777777777777777777777007777777777777777
+      7777770907777777777777777777770990777777777777777777770999077777
+      7777777777777709999077777777777800000009999907777777777099999999
+      9999907777777770999999999999990777777770999999999999999077777770
+      9999999999999999F7777770999999999999999F7777777099999999999999F7
+      777777709999999999999F7777777778FFFFFF899999F7777777777777777789
+      999F7777777777777777778999F7777777777777777777899F77777777777777
+      77777789F7777777777777777777778F7777777777777777777777F777777777
+      7777777777777777777777777777
+    }
+    Layout = blGlyphRight
+    OnClick = AddBtnClick
+    TabOrder = 1
+  end
+  object ButtonPanel1: TButtonPanel
+    Left = 6
+    Height = 42
+    Top = 350
+    Width = 672
+    OKButton.Name = 'OKButton'
+    OKButton.DefaultCaption = True
+    HelpButton.Name = 'HelpButton'
+    HelpButton.DefaultCaption = True
+    CloseButton.Name = 'CloseButton'
+    CloseButton.DefaultCaption = True
+    CancelButton.Name = 'CancelButton'
+    CancelButton.DefaultCaption = True
+    TabOrder = 6
+    ShowButtons = [pbOK, pbCancel, pbHelp]
+  end
+  object CheckBox1: TCheckBox
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Side = asrBottom
+    AnchorSideBottom.Control = ButtonPanel1
+    Left = 6
+    Height = 24
+    Top = 320
+    Width = 158
+    Anchors = [akLeft, akBottom]
+    BorderSpacing.Around = 6
+    Caption = 'Case insensitive sort'
+    Enabled = False
+    TabOrder = 7
+  end
+end