今天一个朋友在使用UNIGUI碰到了问题,他要遍历窗体上的控件,然后根据类名进行相应控制。

原来的程序为:

procedure TMainForm.Fj_component;
var
  i: Integer;
begin
  for i := 0 to MainForm.ComponentCount - 1 do
  begin
    UniMemo1.Lines.Add(MainForm.Components[i].ClassName);
    if MainForm.Components[i] is TUniBitBtn then
    begin
      UniLabel1.Caption := 'found';
      (MainForm.Components[i] as TUniBitBtn).Enabled := false;

    end;
  end;
end;

这段程序无法运行,后来经过调试才发现TUniBitBtn在web网页中的类名已经更换为TUniExtBitBtn。

这说明web是在win32程序中重新转化成新的类。

http://blog.csdn.net/sunstone/archive/2011/01/29/6169279.aspx

相关文章:

  • 2022-12-23
  • 2022-01-26
  • 2021-06-21
  • 2022-01-10
  • 2021-08-03
  • 2022-12-23
  • 2021-04-19
猜你喜欢
  • 2022-12-23
  • 2022-12-23
  • 2021-05-01
  • 2021-07-31
  • 2021-12-28
  • 2022-12-23
  • 2022-12-23
相关资源
相似解决方案