这几天不知道是不是人品出了问题,老是遇上一些小bug.
昨天在公司里写了一个有浏览网页代码的小程序,图方便,使用的是tembeddedwb控件,这个控件在delphi自带的twebbrowser控件上又提供了一些选项与方法. 【程序编程相关:SQL Server 7.0 入门(六)】 【推荐阅读:我国本土MBA排名榜】 拿回家以后打开这个工程,在打开浏览页面窗口的时候却出错了:“error creating form:´´ is not a valid floating point value”.这个窗口上没有其他控件,就只有tembeddedwb控件,看情况应该是打开窗口时装载该控件时出的错,而错误应该是发生在作字符转换到float型时出现的. 【扩展信息:Deploy Environment o】 新建一个工程,放上一个tembeddedwb控件,灭有问题啊.关掉后再打开,问题重现了. 打开embeddedwb.pas单元,首先查找strtofloat函数,呵,还好,只有两个地方用到,一看都是在getprintvalues函数用的,函数内容如下: procedure tembeddedwb.getprintvalues; var s: string; regwinregistry: tregistry;function readmargin(key: string): real;
begin s := regwinregistry.readstring(key); s := stringreplace(s, ´ ´, ´´, [rfreplaceall]); if decimalseparator <> ´.´ then ... 下一页