Question

求助delphi识别验证码（随机生成的验证码，但是是纯数字，图像清晰）

哪位高手能用delphi编一段用ie浏览器登录这个页面，然后自动输入用户名、密码，再识别验证码，最后点击登录的代码？满分献上！在线等！
地址是：

ht去掉我tp://oa.去掉我zibchina.com:8000/see去掉我yon/index去掉我.jsp

问题更新：这样吧，谁能用控件把上面地址中的验证码图片显示在image控件里就行，这个应该有人会吧？网上搜索现成的就很多，我现在悟性差，谁能详细说明下怎么得到那个图片就行。（图片地址很简单，查看网页源代码，里面有个能点击的代码，点进去就得到图片地址了，我就是想把这个图片粘贴到image控件里，谢谢啦）

Answer 1

别想太多，这个题目完全可以当做是个 小项目来做，其它几个不难，但图像分析这块相对要求较高，必须要学过图像处理技术的人才能弄，而且要自己设计实现图像的二值化，字符识别功能要求较高。现实点，这个东西必须由团队分工合作，若一个人，即使精通delphi，ie编程，图像处理，估计没一个月做不出来。你能出200分，也应知道没人会给你答案的，真有需要，其网络别的地方进行商业协调更现实

Answer 2

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP,
StdCtrls, jpeg, GIFImage, WinInet;

type
TForm1 = class(TForm)
Image1: TImage;
IdHTTP1: TIdHTTP;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
const
url = '验证图片的地址，这个你问题中说你能查到，至于什么是真正的地址，就是这个地址复制粘贴到浏览器里，回车后只显示验证码一张图片';

var
ms: TMemoryStream;
jpg: TJPEGImage;
begin
ms := TMemoryStream.Create;
jpg := TJPEGImage.Create;
if InternetGetConnectedState(nil,0) then //检测计算机是否联网需要引用WinInet
begin
IdHTTP1.Get(url, ms);
ms.Position := 0;

jpg.LoadFromStream(ms);
image1.Canvas.Draw(10, 10, te);
end
else
begin
ShowMessage('错误');
//jpg.Free;
te.Free;
ms.Free;
end;
end;
end.

Answer 3

2899136266

追问

什么意思？