delphi11值得升级吗

delphi11值得升级吗,第1张

值得,升级后解决了很多bug。在用delphi使用过程中时常出现崩溃、卡顿的现象,建议升级下一版本。这种情况大多数是由于delphi本身出现bug,一般开发者发现问题后,会很快更新解决的。

远程连接,其实也就是与SQL 数据库的连接,知道对方的IP,开设的端口就可以连了,跟连本地的方法差不多。如果你用这个TADOConnection连,

ConnectionString:=Format('Provider=SQLOLEDB.1Password=%sPersist Security Info=TrueUser ID=%sInitial Catalog=%sData Source=%s',[登陆密码,用户名,数据库名,服务器地址])一般用户名是sa,服务器名本地就是一点(.),远程的就IP,+端口,例如,192.168.1.25,1433,

升级只是对数据库的升级,比如修改表,视图,存储过程,只要让服务器运行这些相关的SQL语句就行了,自动升级这个前面的仁兄已经讲了,就不多讲了。

在你的客户端做一个INI文件,里面记录你放到网上的配置文件的地址,然后每次都去取这个配置文件,里面记录了最新的版本号和下载连接,并与本地的版本号比较,如果比较新,就从上述地址下载新的版本。delphi自动更新2008年09月03日 星期三 23:05仅仅是一个DEMO,正打算添加功能呢。仅仅是一个自动更新的一个思维而已。function downloadfile(url: stringf: string): booleanbeginURLDownloadToFile(nil, pchar(url), pchar(f), 0, nil) if fileexists(f) then result := trueelse result := falseendprocedure dosomething(s: string)begin//dosomestringendvarstrmem: tmemorystreaminif: tinifilefname, str: stringi: integerconsthost = ' http://192.168.1.102/'beginfname := extractfilepath(application.ExeName) + 'config.ini'strmem := tmemorystream.Createidhttp1.Get(host + 'aa.ini', strmem)strmem.Seek(0, sofrombeginning)memo1.Lines.LoadFromStream(strmem)strmem.SaveToFile(fname)strmem.Freeinif := tinifile.Create(fname)for i := 0 to form1.ComponentCount - 1 doif form1.Components[i] is tedit thenbegin str := inif.ReadString('form', (form1.Components[i] as tedit).Name, '') if (extractfileext(str) = '.exe') or (extractfileext(str) = '.dll') thenif downloadfile(host + str, str) then dosomething(str) (form1.Components[i] as tedit).Text := str endinif.Freeend//本地东西。----varini: tinifilefname, str: stringi: integerbeginfname := extractfilepath(application.ExeName) + 'aa.ini'ini := tinifile.Create(fname)for i := 0 to form1.ComponentCount - 1 dobeginif form1.Components[i] is tedit thenbegin str := (form1.Components[i] as tedit).Text ini.WriteString('form', form1.Components[i].Name, str)endendend更新服务器上的东西。


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/11108822.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-13
下一篇 2023-05-13

发表评论

登录后才能评论

评论列表(0条)

保存