Skip to content

Commit ec8fae9

Browse files
committed
bk/2025-06-27-1132
1 parent 45979b6 commit ec8fae9

File tree

2 files changed

+0
-44
lines changed

2 files changed

+0
-44
lines changed

Samples/FunctionCalling/Src/Main.View.dfm

Lines changed: 0 additions & 43 deletions
Original file line numberDiff line numberDiff line change
@@ -32,7 +32,6 @@ object MainView: TMainView
3232
Height = 65
3333
Align = alTop
3434
TabOrder = 0
35-
ExplicitWidth = 742
3635
object Label1: TLabel
3736
Left = 18
3837
Top = 8
@@ -135,7 +134,6 @@ object MainView: TMainView
135134
Height = 256
136135
Align = alTop
137136
TabOrder = 1
138-
ExplicitWidth = 742
139137
object gBoxQuestion: TGroupBox
140138
Left = 1
141139
Top = 1
@@ -147,7 +145,6 @@ object MainView: TMainView
147145
Padding.Right = 1
148146
Padding.Bottom = 1
149147
TabOrder = 0
150-
ExplicitWidth = 740
151148
object mmQuestion: TMemo
152149
Left = 3
153150
Top = 17
@@ -158,8 +155,6 @@ object MainView: TMainView
158155
Lines.Strings = (
159156
'Ol'#225' quem '#233' voc'#234' e quem '#233' o seu fabricante?')
160157
TabOrder = 0
161-
ExplicitWidth = 734
162-
ExplicitHeight = 127
163158
end
164159
object gBoxDefaultsPrompts: TGroupBox
165160
Left = 3
@@ -169,7 +164,6 @@ object MainView: TMainView
169164
Align = alBottom
170165
Caption = ' Defaults Prompts '
171166
TabOrder = 1
172-
ExplicitWidth = 744
173167
object pnDefaultsPrompts01: TPanel
174168
Left = 2
175169
Top = 17
@@ -179,9 +173,6 @@ object MainView: TMainView
179173
BevelOuter = bvNone
180174
Padding.Bottom = 3
181175
TabOrder = 0
182-
ExplicitLeft = 3
183-
ExplicitTop = 11
184-
ExplicitWidth = 1182
185176
object btnDadosCliente: TButton
186177
Left = 182
187178
Top = 0
@@ -224,7 +215,6 @@ object MainView: TMainView
224215
BevelOuter = bvNone
225216
Padding.Bottom = 3
226217
TabOrder = 1
227-
ExplicitWidth = 730
228218
object btnVendasPeriodo: TButton
229219
Left = 0
230220
Top = 0
@@ -234,7 +224,6 @@ object MainView: TMainView
234224
Caption = 'Vendas per'#237'odo'
235225
TabOrder = 0
236226
OnClick = btnVendasPeriodoClick
237-
ExplicitHeight = 21
238227
end
239228
object btnVendasPeriodoDetalhando: TButton
240229
Left = 182
@@ -245,8 +234,6 @@ object MainView: TMainView
245234
Caption = 'Vendas per'#237'odo (detalhando)'
246235
TabOrder = 1
247236
OnClick = btnVendasPeriodoDetalhandoClick
248-
ExplicitLeft = 176
249-
ExplicitTop = -3
250237
end
251238
object btnVendasPeriodoClienteMaisVendas: TButton
252239
Left = 364
@@ -257,8 +244,6 @@ object MainView: TMainView
257244
Caption = 'Clientes com mais vendas'
258245
TabOrder = 2
259246
OnClick = btnVendasPeriodoClienteMaisVendasClick
260-
ExplicitLeft = 358
261-
ExplicitTop = -3
262247
end
263248
object btnVendasPeriodoEmailMaisVendas: TButton
264249
Left = 546
@@ -269,8 +254,6 @@ object MainView: TMainView
269254
Caption = 'Email clientes mais vendas'
270255
TabOrder = 3
271256
OnClick = btnVendasPeriodoEmailMaisVendasClick
272-
ExplicitLeft = 552
273-
ExplicitTop = -3
274257
end
275258
object btnVendasDoDiaX: TButton
276259
Left = 728
@@ -281,8 +264,6 @@ object MainView: TMainView
281264
Caption = 'Vendas do dia X'
282265
TabOrder = 4
283266
OnClick = btnVendasDoDiaXClick
284-
ExplicitLeft = 734
285-
ExplicitTop = -3
286267
end
287268
end
288269
object pnDefaultsPrompts03: TPanel
@@ -294,8 +275,6 @@ object MainView: TMainView
294275
BevelOuter = bvNone
295276
Padding.Bottom = 3
296277
TabOrder = 2
297-
ExplicitTop = 68
298-
ExplicitWidth = 730
299278
object btnAPIViaCep: TButton
300279
Left = 0
301280
Top = 0
@@ -305,9 +284,6 @@ object MainView: TMainView
305284
Caption = 'API ViaCep'
306285
TabOrder = 0
307286
OnClick = btnAPIViaCepClick
308-
ExplicitLeft = 9
309-
ExplicitTop = 5
310-
ExplicitHeight = 22
311287
end
312288
object btnAPIViaCepMaisInternet: TButton
313289
Left = 182
@@ -318,8 +294,6 @@ object MainView: TMainView
318294
Caption = 'API ViaCep + Internet'
319295
TabOrder = 1
320296
OnClick = btnAPIViaCepMaisInternetClick
321-
ExplicitLeft = 176
322-
ExplicitTop = 3
323297
end
324298
end
325299
end
@@ -334,7 +308,6 @@ object MainView: TMainView
334308
Padding.Right = 2
335309
Padding.Bottom = 2
336310
TabOrder = 1
337-
ExplicitWidth = 740
338311
object btnExecute: TBitBtn
339312
Left = 1
340313
Top = 3
@@ -345,8 +318,6 @@ object MainView: TMainView
345318
Caption = 'Execute'
346319
TabOrder = 0
347320
OnClick = btnExecuteClick
348-
ExplicitLeft = -2
349-
ExplicitTop = 1
350321
end
351322
object ProgressBar1: TProgressBar
352323
AlignWithMargins = True
@@ -378,8 +349,6 @@ object MainView: TMainView
378349
Padding.Right = 1
379350
Padding.Bottom = 1
380351
TabOrder = 2
381-
ExplicitWidth = 742
382-
ExplicitHeight = 327
383352
object mmResponse: TMemo
384353
Left = 3
385354
Top = 17
@@ -389,18 +358,6 @@ object MainView: TMainView
389358
BorderStyle = bsNone
390359
ScrollBars = ssVertical
391360
TabOrder = 0
392-
ExplicitLeft = 2
393-
ExplicitTop = 16
394-
ExplicitWidth = 746
395-
end
396-
object Memo1: TMemo
397-
Left = 536
398-
Top = 24
399-
Width = 225
400-
Height = 249
401-
Lines.Strings = (
402-
'Memo1')
403-
TabOrder = 1
404361
end
405362
end
406363
end

Samples/FunctionCalling/Src/Main.View.pas

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -52,7 +52,6 @@ TMainView = class(TForm)
5252
btnVendasPeriodoClienteMaisVendas: TButton;
5353
btnVendasPeriodoEmailMaisVendas: TButton;
5454
btnVendasDoDiaX: TButton;
55-
Memo1: TMemo;
5655
procedure FormCreate(Sender: TObject);
5756
procedure btnExecuteClick(Sender: TObject);
5857
procedure TMSFNCCloudAI1Executed(Sender: TObject; AResponse: TTMSFNCCloudAIResponse; AHttpStatusCode: Integer;

0 commit comments

Comments
 (0)