M
macrolen
Unregistered / Unconfirmed
GUEST, unregistred user!
With HTMLInputElement do
begin
if (UpperCase(Type_)='TEXT') or (UpperCase(Type_)='PASSWORD') then
begin
value:='test';
if Name='user' then Value:='test'
end
else if (UpperCase(Type_)='CHECKBOX') then //复选框
begin
checked:=true;
end
else if (UpperCase(Type_)='RADIO') then //单选框
begin
checked :=true;
end;
end;
这样做,对于有很多个单选框只能选中最后一个,如何随机选中一个呢?
begin
if (UpperCase(Type_)='TEXT') or (UpperCase(Type_)='PASSWORD') then
begin
value:='test';
if Name='user' then Value:='test'
end
else if (UpperCase(Type_)='CHECKBOX') then //复选框
begin
checked:=true;
end
else if (UpperCase(Type_)='RADIO') then //单选框
begin
checked :=true;
end;
end;
这样做,对于有很多个单选框只能选中最后一个,如何随机选中一个呢?