如
for I := 0 to Self.ComponentCount - 1 do begin
if Self.Components[I] is TEdit then begin
(Self.Components[I] as TEdit).Clear;
(Self.Components[I] as TEdit).Text:='复制'; end;
end;
for I := 0 to Self.ComponentCount - 1 do begin
if Self.Components[I] is TEdit then begin
(Self.Components[I] as TEdit).Clear;
(Self.Components[I] as TEdit).Text:='复制'; end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货