File: unit6.lfm

package info (click to toggle)
dozzaqueux 3.51-2.1
  • links: PTS
  • area: main
  • in suites: bookworm, bullseye
  • size: 5,764 kB
  • sloc: pascal: 35,831; xml: 961; makefile: 50; sh: 32
file content (173 lines) | stat: -rwxr-xr-x 4,698 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
object saisieexpression: Tsaisieexpression
  Left = 445
  Height = 560
  Top = 221
  Width = 911
  ActiveControl = Editexpression
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Saisie de l''expression'
  ClientHeight = 560
  ClientWidth = 911
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object Label1: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 10
    Height = 17
    Top = 10
    Width = 797
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Saisissez l''expression de la grandeur . Les noms des variables (V,..., c1, c2,...,n1, n2...) et les noms de fonction ont les'
    Font.Color = clBlue
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label2: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Label1
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 17
    Top = 37
    Width = 238
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'significations indiquées ci-dessous:'
    Font.Color = clBlue
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label3: TLabel
    AnchorSideTop.Control = BitBtn1
    AnchorSideTop.Side = asrBottom
    Left = 6
    Height = 17
    Top = 198
    Width = 137
    BorderSpacing.Top = 10
    Caption = 'Variables utilisables:'
    Font.Color = clRed
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label4: TLabel
    AnchorSideLeft.Control = Label3
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Label3
    AnchorSideTop.Side = asrCenter
    Left = 443
    Height = 17
    Top = 198
    Width = 239
    BorderSpacing.Left = 300
    Caption = 'Opérateurs et fonctions utilisables:'
    Font.Color = clGreen
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Editexpression: TEdit
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Label2
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 10
    Height = 25
    Top = 64
    Width = 891
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    BorderSpacing.Right = 10
    OnKeyUp = EditexpressionKeyUp
    OnMouseUp = EditexpressionMouseUp
    TabOrder = 0
  end
  object BitBtn1: TBitBtn
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Editexpression
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = BitBtn2
    Left = 10
    Height = 89
    Top = 99
    Width = 619
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    BorderSpacing.Right = 10
    Caption = 'Valider'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 1
  end
  object ListBoxvariables: TListBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Label3
    AnchorSideTop.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 10
    Height = 325
    Top = 225
    Width = 400
    Anchors = [akTop, akLeft, akBottom]
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    BorderSpacing.Bottom = 10
    ClickOnSelChange = False
    ItemHeight = 0
    OnSelectionChange = ListBoxvariablesSelectionChange
    TabOrder = 2
  end
  object ListBoxfonctions: TListBox
    AnchorSideLeft.Control = ListBoxvariables
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Label4
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 440
    Height = 325
    Top = 225
    Width = 461
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Left = 30
    BorderSpacing.Top = 10
    BorderSpacing.Right = 10
    BorderSpacing.Bottom = 10
    ClickOnSelChange = False
    ItemHeight = 0
    OnSelectionChange = ListBoxfonctionsSelectionChange
    TabOrder = 3
  end
  object BitBtn2: TBitBtn
    AnchorSideTop.Control = BitBtn1
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 639
    Height = 85
    Top = 101
    Width = 262
    Anchors = [akTop, akRight]
    BorderSpacing.Right = 10
    Cancel = True
    Caption = 'Annuler'
    Kind = bkCancel
    ModalResult = 2
    TabOrder = 4
  end
end