❶ 关于Delphi程序自动升级问题!
最简单的可以把自动升级功能单独做成一个程序,然后这个程序去上Server获取版本信息,如果小于当前版本就从服务器上下载更新文件,然后结束掉当前的主程序,接着覆盖过去。 如果是局域网C/S的话,用exe没问题做更新文件。
❷ 关于Delphi程序自动升级问题!
远程连接,其实也就是与SQL 数据库的连接,知道对方的IP,开设的端口就可以连了,跟连本地的方法差不多。如果你用这个TADOConnection连,ConnectionString:=Format('Provider=SQLOLEDB.1;Password=%s;Persist Security Info=True;User ID=%s;Initial Catalog=%s;Data Source=%s',[登陆密码,用户名,数据库名,服务器地址]);一般用户名是sa,服务器名本地就是一点(.),远程的就IP,+端口,例如,192.168.1.25,1433,升级只是对数据库的升级,比如修改表,视图,存储过程,只要让服务器运行这些相关的SQL语句就行了,自动升级这个前面的仁兄已经讲了,就不多讲了。
❸ 如何禁止delphi 2007 自动检测升级信息
把他的SETUP.EXE改成其它文件名
❹ delphi中第三方控件DEV系统能否升级
升级会出现一些兼容性问题。一般不能自动升级,需要手动升级,也就是重新安装一个新版本的
❺ delphi DBGrid里面的值如何自动更新
你是用ADODataSet1组件与DBGrid关联,在“添加”按钮将数据写入数据库后,可执行ADODataSet1.Active:=false;ADODataSet1.Active:=true;此时DBGrid中的数据将会刷新。其实你不需要用dataTable来添加数据,直接用ADODataSet1也可以添加数据的
❻ 急!急!急!Delphi 中如何实现客户端程序自动升级
在你的客户端做一个INI文件,里面记录你放到网上的配置文件的地址,然后每次都去取这个配置文件,里面记录了最新的版本号和下载连接,并与本地的版本号比较,如果比较新,就从上述地址下载新的版本。delphi自动更新2008年09月03日 星期三 23:05仅仅是一个DEMO,正打算添加功能呢。仅仅是一个自动更新的一个思维而已。function downloadfile(url: string; f: string): boolean;begin URLDownloadToFile(nil, pchar(url), pchar(f), 0, nil); if fileexists(f) then result := true else result := false;end;procere dosomething(s: string);begin //dosomestring;end;varstrmem: tmemorystream;inif: tinifile;fname, str: string;i: integer;consthost = ' http://192.168.1.102/';beginfname := extractfilepath(application.ExeName) + 'config.ini';strmem := tmemorystream.Create;idhttp1.Get(host + 'aa.ini', strmem);strmem.Seek(0, sofrombeginning);memo1.Lines.LoadFromStream(strmem);strmem.SaveToFile(fname);strmem.Free;inif := tinifile.Create(fname);for i := 0 to form1.ComponentCount – 1 do if form1.Components[i] is tedit then begin str := inif.ReadString('form', (form1.Components[i] as tedit).Name, ''); if (extractfileext(str) = '.exe') or (extractfileext(str) = '.dll') then if downloadfile(host + str, str) then dosomething(str); (form1.Components[i] as tedit).Text := str; end;inif.Free;end;//本地东西。—-varini: tinifile;fname, str: string;i: integer;beginfname := extractfilepath(application.ExeName) + 'aa.ini';ini := tinifile.Create(fname);for i := 0 to form1.ComponentCount – 1 dobegin if form1.Components[i] is tedit then begin str := (form1.Components[i] as tedit).Text; ini.WriteString('form', form1.Components[i].Name, str) end;end;end;更新服务器上的东西。
❼ DELPHI程序无服务器端,只有数据库,如何升级程序(局域网内,一台一台安装太麻烦,共享不安全)
有数据库就好办了。更新文件放在数据库中。
❽ 怎么样用DELPHI程序实现文件的自动更新
一个tstringlist读取ftp某一个的文件 一个tstringlist来读取本地目录文件 以前者来循环, 如果本地文件存在, 就判断文件的修改日期, 如果相同, 就下一个, 如果不同, 就拷贝过来。 如果本地文件不存在, 就直接拷贝过来。
❾ delphi xe 做的应用软件如何自动升级
设置一个版本就号,每次打开的时候都验证一下,如果不一样进行下载升级
❿ Delphi 为什么我在设置 auAutoUpgrader 自动升级,打开软件后.是可以升级了.但升级了一次又一次, 要如何设
应该是中文编码问题,你可以这样做,英文名升级程序下载后改成响应中文名字不久ok了,为什么非要写成中文名升级。