哪位朋友有winrunner 识别的delphi 插件

lkc

哪位朋友有winrunner 识别的delphi 插件，若有能否发到我邮箱，小弟我不胜感激。
51LKC@163.com

ayong401

从网上找来的.
在WinRunner中识别Delphi控件
袁海松 杨欣源  


您的位置：测试工具

在WinRunner中识别Delphi控件

袁海松 杨欣源


# 制作环境：

# WinRunner 7.0 Build 7211

# Delphi 6.0

# 方法发现： 袁海松

# 制 作： 杨欣源

# 使用方法：

# Step 1 拷贝本文档中所有内容

# Step 2 打开WinRunner\lib\vbinit中的script文件

# Step 3 将内容粘贴在段落“

# VisualBasic 4.0 Standart controls”之前

# Step 4 重新运行WinRunner

# Step 5 启动时装载VB Addin

# TBitBtn

set_class_map("tbitbtn", "push_button"); set_record_attr("tbitbtn", "class label x y", "MSW_id", "location");

# TButton

set_class_map("tbutton", "push_button"); set_record_attr("tbutton", "class label x y", "MSW_id", "location");

# TCheckBox

set_class_map("tcheckbox", "check_button"); set_record_attr("tcheckbox", "class label x y", "MSW_id", "location");

# TComboBox

set_class_map("TComboBox", "combobox");db2inst1 set_record_attr("TComboBox", "class attached_text x y", "MSW_id", "location");

# TDateTimePicker

set_class_map("tdatetimepicker", "sysdatetimepick32"); set_record_attr("tdatetimepicker", "class attached_text x y", "MSW_id", "location");

# TEdit

set_class_map("tedit", "edit"); set_record_attr("tedit", "class attached_text x y", "MSW_id", "location");

# TGroupButton

set_class_map("tgroupbutton", "radio_button"); set_record_attr("tgroupbutton", "class label x y", "MSW_id", "location");

# TListBox

set_class_map("TListBox", "listbox"); set_record_attr("TListBox", "class attached_text x y", "MSW_id", "location");

# TListView

set_class_map("TListView", "syslistview32"); set_record_attr("TListView", "class attached_text x y abs_x", "MSW_id", "location");

# TMaskEdit

set_class_map("TMaskEdit", "edit"); set_record_attr("TMaskEdit", "class attached_text x y", "MSW_id", "location");

# TMemo

set_class_map("tmemo", "edit"); set_record_attr("tmemo", "class attached_text x y", "MSW_id", "location");

# TMonthCalendar

set_class_map("TMonthCalendar", "sysmonthcal32"); set_record_attr("TMonthCalendar", "class attached_text x y", "MSW_id", "location");

# TRadioButton

set_class_map("TRadioButton", "radio_button"); set_record_attr("TRadioButton", "class label x y", "MSW_id", "location");

# TRickEdit

set_class_map("TRichEdit", "edit"); set_record_attr("TRichEdit", "class attached_text x y", "MSW_id", "location");

# TPageControl

set_class_map("tpagecontrol", "systabcontrol32"); set_record_attr("tpagecontrol", "class attached_text x y", "MSW_id", "location");

# TStaticText

set_class_map("TStaticText", "object"); set_record_attr("TStaticText", "class regexp_MSW_class label", "attached_text MSW_id MSW_class", "location");

# TTreeView

set_class_map("ttreeview", "systreeview32"); set_record_attr("ttreeview", "class attached_text", "MSW_id", "location");

　

Song

论坛中的回帖中已经有了，看看能不能用啊？

http://bbs.51testing.com/viewthread.php?tid=2222&fpage=5
http://bbs.51testing.com/viewthread.php?tid=2775&fpage=1

[ Last edited by Song on 2005-8-10 at 14:06 ]

archonwang

其实，对于Grid类型的控件支持还不是很好。需要手工调整。

liaohuaiyi

好象有专门测试delphi的工具的吧？各位大虾能否告之一二

neusdc

up

plqueen

可不可以也請song給我發一個
yzhh595@sohu.com
  thk!

lzz

song，能否给我发一份啊？我在网上找了好久都没找到。

lzz

可以发到：zhoufan03@126.com

minji

我也要一份，谢谢

amtrc@163.com

JerryCoo18

给我一份好吗！xiedong18@sohu.com

qd_pudding

也给我一份吧谢谢
qdxhcaq@yahoo.com.cn

Nokia0906

邮箱：frontpage_cn@163.com

fanna007

fanna007_2003cd@hotmail.com

venus_nie

能给我一份吗？谢了

Venus_Nie@hotmail.com

飘雪

可以给我发一份吗？谢谢
liuhx_618@126.com

raymond.tang

cdzhaolang

我也要一份:cdzhaolang@163.com

Nokia0906

frontpage_cn@163.com

netup

song，能否给我发一份啊
netup@163.com