File: Unit5.lfm

package info (click to toggle)
optgeo 2.25-1
  • links: PTS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 6,948 kB
  • sloc: pascal: 58,877; xml: 63; makefile: 58
file content (65 lines) | stat: -rw-r--r-- 1,596 bytes parent folder | download
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
object saisienombrerayons: Tsaisienombrerayons
  Left = 461
  Height = 162
  Top = 98
  Width = 455
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Nombre de rayons'
  ClientHeight = 162
  ClientWidth = 455
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object StaticText1: TLabel
    Left = 8
    Height = 17
    Top = 24
    Width = 320
    Caption = 'Nombre de rayons émis par cette source ponctuelle:'
    ParentColor = False
  end
  object SpinEdit1: TSpinEdit
    AnchorSideLeft.Control = StaticText1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = StaticText1
    AnchorSideTop.Side = asrCenter
    Left = 338
    Height = 29
    Top = 18
    Width = 46
    AutoSize = False
    BorderSpacing.Left = 10
    Font.Style = [fsBold]
    MaxValue = 50
    MinValue = 2
    ParentFont = False
    TabOrder = 0
    Value = 5
  end
  object BitBtn1: TBitBtn
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = SpinEdit1
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 10
    Height = 95
    Top = 57
    Width = 435
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    BorderSpacing.Right = 10
    BorderSpacing.Bottom = 10
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 1
  end
end