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.