delphi验证码.zip Delphi生成的汉字验证码图片代码。 for i := 1 to 4 do begin Randomize; strResult := strResult + trim(CodeChar[Random(563)]); end; vLeft := 10; img.picture := nil; //