for i:=0 to ComponentCount-1 do if Components[i] is TEdit then if (Components[i] as TEdit).Tag=1 then //用Tag属性标记要清空的TEdit (Components[i] as TEdit).Clear;
for i:=0 to Form.ComponentCount-1 do if Form.Components[i] is TEdit then (Form.Components[i] as TEdit).Clear;
好简单的问题,呵呵!
if Components[i] is TEdit then
if (Components[i] as TEdit).Tag=1 then //用Tag属性标记要清空的TEdit
(Components[i] as TEdit).Clear;
if Form.Components[i] is TEdit then
(Form.Components[i] as TEdit).Clear;