看看这个过程的问题在哪

Question

procedure Tf_scoreinput.BitBtn1Click(Sender: TObject);var i:integer;
begin
for i:= 0 to f_scoreinput.ComponentCount-1 do
  begin
    if components[i] is  Tzqedit then
    tedit(components[i]).Text:='';
    end;
end;显示 if语句有问题if components[i] is  Tzqedit then

Answer 1

我改成了 if i=8 then 这样行吗

Answer 2

 components[i] is  Tzqedit ???
应该给一个确切的东西吧，加括号看看呢

Answer 3

Tzqedit类型有单元定义吗？
if components[i] is  Tzqedit then 本身没有问题
如果当前是窗体，则考虑
for k := 0 to Self.ControlCount-1 do begin
  if Self.Controls[k] is Tzqedit then
end;

Answer 4

我以解决 应将Tzqedit 改为Tedit