如何可以调用delphi的 Object Inspector窗口?(200分)

  • 主题发起人 主题发起人 zhou_an_jun
  • 开始时间 开始时间
Z

zhou_an_jun

Unregistered / Unconfirmed
GUEST, unregistred user!
不知那位大侠使用过Borland/Delphi7/Source/ToolsAPI下的DesignWindows单元,该TDesignWindow类怎么使用?
Borland/Delphi7/Source/Vcl下的ValEdit单元中的TValueListEditor类怎么使用,谁能解决200分奉送,谢谢了!
 
TValueListEditor类我用过,在Additional组中
简单例子:
procedure TForm1.Button1Click(Sender: TObject);
//ParamEditor初试化
begin
with ValueListEditor1 do begin
Strings.Clear;
InsertRow('测量时间', '', True);
InsertRow('自动衰减', '自动', True);
InsertRow('增益控制', 'AGC', True);
end;

//'衰减量=','增益量'自动产生
with ParamEditor do begin
ItemProps['中频宽度'].PickList:=sSpan;//sSPan是TStrings变量
ItemProps['自动衰减'].PickList.Add('自动');
ItemProps['自动衰减'].PickList.Add('手动');
ItemProps['前置放大'].PickList.Add('ON');
ItemProps['前置放大'].PickList.Add('OFF');
ItemProps['测量结果'].EditStyle:= esEllipsis;
end;
end;
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=582349
 
ValueListEditor1是这样给Key and Value 赋值的:
ValueListEditor1.Strings.Clear //清除;
ValueListEditor1.Strings.add('Keyid=ValueData'); // 'Key=value' 可以是变量,但"="是分隔不能少;
有点像TDatabase的 params.Tstrings;
你要是把TDatabase的params.Tstrings用Code Editor打开在delphi 中显示赋值格式是'Key=value';原理一样;
 
谢谢各位,不知那位大侠使用过Borland/Delphi7/Source/ToolsAPI下的DesignWindows单元,该TDesignWindow类怎么使用?
 
后退
顶部