добавил часть модулей, нужно переделать БД на records

This commit is contained in:
PC1\PTyTb
2025-08-06 14:54:32 +03:00
parent d68064187d
commit dacd2e6050
23 changed files with 2610 additions and 201 deletions
+39
View File
@@ -0,0 +1,39 @@
object fShowText: TfShowText
Left = 0
Top = 0
Caption = 'fShowText'
ClientHeight = 295
ClientWidth = 498
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
DesignerMasterStyle = 0
object Memo1: TMemo
Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
DataDetectorTypes = []
Align = Client
Size.Width = 498.000000000000000000
Size.Height = 262.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
Viewport.Width = 494.000000000000000000
Viewport.Height = 258.000000000000000000
end
object Panel1: TPanel
Align = Bottom
Position.Y = 262.000000000000000000
Size.Width = 498.000000000000000000
Size.Height = 33.000000000000000000
Size.PlatformDefault = False
TabOrder = 1
object Label1: TLabel
Position.X = 8.000000000000000000
Position.Y = 8.000000000000000000
Size.Width = 345.000000000000000000
Size.Height = 17.000000000000000000
Size.PlatformDefault = False
Text = #1057#1082#1086#1087#1080#1088#1091#1081' '#1101#1090#1091' '#1089#1089#1099#1083#1082#1091' '#1080' '#1086#1090#1082#1088#1086#1081' '#1074' '#1073#1088#1072#1091#1079#1077#1088#1077' '#1089' '#1072#1082#1082#1072#1091#1085#1090#1086#1084' '#1073#1086#1090#1072
TabOrder = 1
end
end
end