一个用Delphi做的通用UI功能测试方案,大家提提意见

   常见的功能测试软件需要了解DOM或SWT,SWING对象，我觉得简直是多此一举。
   我正在用Delphi做一个验收测试程序，貌似可以男女老少大小通吃,可用于web,SWT,swing,桌面或甚至手机测试，原理是局部截屏,
再通过全屏图像匹配查找，来定位鼠标，模拟键盘输入，并作正确性判断。Delphi本身即做为测试脚本语言,并做数据库清空比对以及日志输出。
   编的过程中有两个难点，不过好在都解决了，一个是图像匹配速度问题，利用到了scanline来快速取点。另一个是表单的输入，如果也用截屏的方法，
反而比较笨拙，好在Delphi自带了Webbrowser，可用于html表单解析,可以两者结合起来用,用于表单项比较多的情况。
   此软件的目的着重于功能测试，不考虑压力测试，也不适用于UI整体配色、背景、字体经常变换的情况。

一个测试更改用户名的脚本示例：

try
  testName:='account';   //指定测试数据存放在\account\目录下
  clickAt('profileLink'); //在全屏查找\account\profileLink.bmp图像，找到后鼠标单击它, 超出一定时限后还找不到则出错
  waitfor('submit');      //等待表单提交link显示出来，直到超时出错
  clickAtRight('username');    //点username.bmp对应的输入栏,鼠标将会点在匹配部分的右边沿中心点，即text input部分，而不是点在文字上
  writekeys(KEY_CLEAR); //模拟键盘输入，将现有内容删除
  writekeys('abc');     //输入一些字符
  clickAt('submit');   //点提交link
  waitfor('success');    //等待成功画面出现
  checkDB('select username from user where userid=`001`','abc'); //比对数据库
  log.add('account test passed!');
except
  log.add('account test failed!');
end;