写了一个用来清空edit 的过程
procedure TForm1.csh;
var
i: Integer;
begin
for i := 0 to Form1.ComponentCount - 1 do
begin
//
if Form1.Components[i] is TEdit then
begin
(Form1.Components[i] as TEdit).Clear;
end;
end;
end;
formshow的时候调用直接到Form1.ComponentCount报错
如果用 普通窗体就不会报错
如果窗体显示之后再调用也不会报错
有谁遇到类似的问题吗

self 没学过吧。好好去看书吧。