forked from HuichanKIM/Ollama-Delphi-GUI
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathUnit_Translator.dfm
116 lines (116 loc) · 2.67 KB
/
Unit_Translator.dfm
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
object Form_Translator: TForm_Translator
Left = 0
Top = 0
ActiveControl = Button_OK
BorderStyle = bsDialog
Caption = 'Translator - https://translate.googleapis.com'
ClientHeight = 399
ClientWidth = 514
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
FormStyle = fsStayOnTop
KeyPreview = True
Position = poMainFormCenter
RoundedCorners = rcOn
OnClose = FormClose
OnCreate = FormCreate
OnKeyPress = FormKeyPress
OnShow = FormShow
TextHeight = 15
object Panel_Buttons: TPanel
AlignWithMargins = True
Left = 3
Top = 361
Width = 508
Height = 35
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
DesignSize = (
508
35)
object Button_OK: TButton
Left = 419
Top = 8
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'OK'
ModalResult = 1
TabOrder = 0
end
object CheckBox_Pushtochatbox: TCheckBox
Left = 272
Top = 12
Width = 129
Height = 17
Alignment = taLeftJustify
Caption = 'Push to chat box'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -13
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 1
StyleElements = [seClient, seBorder]
end
end
object Memo_Translates: TMemo
AlignWithMargins = True
Left = 3
Top = 39
Width = 508
Height = 316
Align = alClient
BevelOuter = bvNone
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
Lines.Strings = (
'Memo_Translates')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 1
StyleElements = [seClient, seBorder]
end
object Panel_Tollbar: TPanel
AlignWithMargins = True
Left = 3
Top = 3
Width = 508
Height = 30
Align = alTop
Alignment = taLeftJustify
BevelOuter = bvNone
ShowCaption = False
TabOrder = 2
object Label_Prompt: TLabel
AlignWithMargins = True
Left = 3
Top = 3
Width = 495
Height = 24
Margins.Right = 10
Align = alClient
AutoSize = False
Caption = 'Prompt '
EllipsisPosition = epEndEllipsis
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
ExplicitWidth = 49
ExplicitHeight = 15
end
end
end