请问怎样用VBlinit的方式来识别delphi中的TLabel控件？

zengyixun

请问怎样用VBlinit的方式来识别delphi中的TLabel控件？

zengyixun

原帖由 zengyixun 于 2006-10-8 10:39 发表
请问怎样用VBlinit的方式来识别delphi中的TLabel控件？

sdlkfj9
唉，当前国内的自动化测试水平就这个样子吗？又是自己搞定！华为的呢？不是NB吗？不是冲出亚洲走向世界了吗？唉！不说老！
把方法贴出来，给大家作点贡献吧！方法是笨了点，总比没有强！
win_activate ("TPanel_6");/*还要解决的就是Panel窗体化带来的location不确定因素*/
win_get_text("TPanel_6",text,1,1, 600, 500);

report_msg (text);
elements = split (text, path_array, "：");/*先使用“：”把字串split一次*/
for(i=1;i<=elements;i++)
{
        curent_name = path_array ;
        elements_split = split (curent_name, path_array_array, " ");/*再使用“ ”把字串再split一次，这样就把字段：与其后的值分隔开了，而两个字段之间的字符相连则为前一个字段的值*/
        for(j=1;j<=elements_split;j++)
        {
                curent_name_text=path_array_array[j];
                report_msg ("The report is in " & curent_name_text);
        }
}

[ 本帖最后由 zengyixun 于 2006-10-9 11:36 编辑 ]

zengyixun

sdlkfj6
不要把Panel窗体化，就把它obj就行了，然后再用obj_get_text 提取Text，搞定。

fish_j

华为的上班时间上不了网....^_^,下班时间谁会上测试论坛....要加班啊..