• From: Perugia (Italy)
  • Registered: 2019-01-29
  • Posts: 337

Topic: Clear text in all text box of a form

Hello everyone and thank you for reading my request. In a button I gave these instructions to delete all the text of each text box of a form:

procedure frmAvvio_Button1_OnClick (Sender: TObject; var Cancel: boolean);
  var
  i : integer;
begin
  for i:= 0 to ComponentCount -1 do
     if Components[i] is TEdit then TEdit (Components[i]).Clear;
end;

But it does not work. It tells me: Undeclared identifier: 'ComponentCount'

Thanks to all and a greeting.

www.fabiobernini.it
www.reteinformatica.biz

reteinformatica's Website

2 Reply by sparrow (edited by sparrow 2023-03-14 20:45:24)

  • From: Рідна МАТИ, UKRAINE
  • Registered: 2018-06-02
  • Posts: 895

Re: Clear text in all text box of a form

Hi,
Right syntax -
frmAvvio.ComponentCount
frmAvvio.Components
TdbEdit



procedure frmAvvio_Button1_OnClick (Sender: TObject; var Cancel: boolean);
 var
  i : integer;
begin
  for i:= 0 to frmAvvio.ComponentCount -1 do
     if frmAvvio.Components[i] is TdbEdit then TdbEdit(frmAvvio.Components[i]).Clear;
end;

3 Reply by reteinformatica (edited by reteinformatica 2023-03-14 20:48:13)

  • From: Perugia (Italy)
  • Registered: 2019-01-29
  • Posts: 337

Re: Clear text in all text box of a form

Oh what a trivial mistake. Thanks very much sparrow.
What is TdbEdit's equivalent for comboox?

www.fabiobernini.it
www.reteinformatica.biz

reteinformatica's Website

  • From: Рідна МАТИ, UKRAINE
  • Registered: 2018-06-02
  • Posts: 895

Re: Clear text in all text box of a form

http://myvisualdatabase.com/help_en/ComboBox.html


TdbComboBox

  • From: Рідна МАТИ, UKRAINE
  • Registered: 2018-06-02
  • Posts: 895

Re: Clear text in all text box of a form

Example
clear all components on form
Choose what you need


http://myvisualdatabase.com/forum/viewt … 667#p18667

  • From: Perugia (Italy)
  • Registered: 2019-01-29
  • Posts: 337

Re: Clear text in all text box of a form

Well, thank you very much, I didn't know that page. Is there an istructions set to clear all results in a table grid?

www.fabiobernini.it
www.reteinformatica.biz

reteinformatica's Website

7 Reply by sparrow (edited by sparrow 2023-03-14 21:02:51)

  • From: Рідна МАТИ, UKRAINE
  • Registered: 2018-06-02
  • Posts: 895

Re: Clear text in all text box of a form

IF Form.Components[i] is TdbStringGridEx Then TdbStringGridEx(Form.Components[i]).ClearRows;

http://myvisualdatabase.com/help_en/scr … egrid.html

  • From: Perugia (Italy)
  • Registered: 2019-01-29
  • Posts: 337

Re: Clear text in all text box of a form

Thank you very much sparrow I did what I needed.
Long live Ukraine

www.fabiobernini.it
www.reteinformatica.biz

reteinformatica's Website

  • From: Рідна МАТИ, UKRAINE
  • Registered: 2018-06-02
  • Posts: 895

Re: Clear text in all text box of a form

Thanks