forked from HuichanKIM/Ollama-Delphi-GUI
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Unit_RequestDialog.dfm
94 lines (94 loc) · 2.15 KB
/
Unit_RequestDialog.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
object Form_RequestDialog: TForm_RequestDialog
Left = 0
Top = 0
Cursor = crHandPoint
ActiveControl = Memo_Request
BorderStyle = bsDialog
Caption = 'Chatting Dialog'
ClientHeight = 230
ClientWidth = 345
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
FormStyle = fsStayOnTop
KeyPreview = True
Position = poDefault
OnCreate = FormCreate
OnKeyPress = FormKeyPress
OnShow = FormShow
TextHeight = 15
object Label1: TLabel
Left = 8
Top = 8
Width = 97
Height = 15
Caption = 'Prompt / Message'
end
object Label_Clear: TLabel
Left = 315
Top = 9
Width = 26
Height = 13
Cursor = crHandPoint
Caption = 'Clear'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
StyleElements = [seClient, seBorder]
OnClick = Label_ClearClick
end
object SpeedButton_Trans: TSpeedButton
Left = 241
Top = 6
Width = 67
Height = 17
Caption = 'Trans.'
ImageIndex = 39
ImageName = 'ic_format_size_48px'
Images = Form_RestOllama.SVGIconVirtualImageList1
OnClick = SpeedButton_TransClick
end
object Label2: TLabel
Left = 8
Top = 184
Width = 170
Height = 15
Caption = '* Invalid characters: ", {, }, [, ]'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
StyleElements = [seClient, seBorder]
end
object Button_OK: TButton
Left = 256
Top = 192
Width = 82
Height = 25
Caption = 'Request'
ImageIndex = 12
ImageName = 'All\ic_send_48px'
Images = Form_RestOllama.SVGIconVirtualImageList1
ModalResult = 1
TabOrder = 0
end
object Memo_Request: TMemo
AlignWithMargins = True
Left = 5
Top = 29
Width = 335
Height = 144
Lines.Strings = (
'Memo_Request')
ScrollBars = ssVertical
TabOrder = 1
end
end