***如何通过HINT来找到控件***

Question

有一个IMAGE控件，HINT中定义为：“192.168.0.1”
能否通过HINT=“192.168.0.1”，来找到这个IMAGE控件，谢谢

Answer 1

遍历一下image控件，然后根据hint判断，应该是可以找到的

Answer 2

procedure TForm1.Button2Click(Sender: TObject);
var
  i:integer;
begin
  for i:=0 to self.ControlCount-1 do
  begin
    if (self.Controls[i] is Timage)
      and ((self.Controls[i] as Timage).Hint='192.168.0.1') then
     begin
       showmessage((self.Controls[i] as Timage).Name);  //找到了
     end;
  end;
end;