Avocado/uwsparcie.lfm at main · Programista-Art/Avocado · GitHub

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
object Wsparcie: TWsparcie
  Left = 350
  Height = 297
  Top = 250
  Width = 418
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Wsparcie'
  ClientHeight = 297
  ClientWidth = 418
  Position = poMainFormCenter
  object Panel2: TPanel
    Left = 0
    Height = 32
    Top = 265
    Width = 418
    Align = alBottom
    BevelColor = clWindowFrame
    ClientHeight = 32
    ClientWidth = 418
    Color = clWindowFrame
    ParentBackground = False
    ParentColor = False
    TabOrder = 0
    object LabelStatus: TLabel
      Left = 1
      Height = 30
      Top = 1
      Width = 386
      Align = alClient
      Alignment = taCenter
      Color = clWindow
      Font.CharSet = EASTEUROPE_CHARSET
      Font.Color = clWhite
      Font.Pitch = fpVariable
      Font.Quality = fqDraft
      ParentColor = False
      ParentFont = False
    end
    object SpeedButton1: TSpeedButton
      Left = 387
      Height = 30
      Top = 1
      Width = 30
      Align = alRight
      Caption = 'OK'
      OnClick = SpeedButton1Click
    end
  end
  object PanelDolny: TPanel
    Left = 0
    Height = 129
    Top = 136
    Width = 418
    Align = alBottom
    ClientHeight = 129
    ClientWidth = 418
    ParentBackground = False
    TabOrder = 1
    object SpeedButton2: TSpeedButton
      Left = 32
      Height = 40
      Top = 24
      Width = 344
      Caption = 'Support Avocado on Patronite'
      Font.CharSet = EASTEUROPE_CHARSET
      Font.Height = -21
      Font.Pitch = fpVariable
      Font.Quality = fqDraft
      ParentFont = False
      OnClick = SpeedButton2Click
    end
    object Button1: TButton
      Left = 32
      Height = 40
      Top = 72
      Width = 344
      Caption = 'Buy me a coffee'
      Font.CharSet = EASTEUROPE_CHARSET
      Font.Height = -21
      Font.Pitch = fpVariable
      Font.Quality = fqDraft
      ParentFont = False
      TabOrder = 0
      OnClick = Button1Click
    end
  end
  object Memo1: TMemo
    Left = 5
    Height = 126
    Top = 5
    Width = 408
    Align = alClient
    BorderSpacing.Around = 5
    Color = clBlack
    Font.CharSet = EASTEUROPE_CHARSET
    Font.Color = clWhite
    Font.Pitch = fpVariable
    Font.Quality = fqDraft
    Lines.Strings = (
      'Support the development of the Avocado programming language!'
      'If you like the project and want to help its further development, you can do so by donating any amount.'
      'Your support will help me create new features, improve documentation, and grow the Avocado ecosystem.'
      ''
      'Thank you for every support – even the smallest amount makes a difference!'
    )
    ParentFont = False
    ReadOnly = True
    TabOrder = 2
  end
end