[發問] DelphiChat.exe的線上更新程式? |
|
axsoft
版主 發表:681 回覆:1056 積分:969 註冊:2002-03-13 發送簡訊給我 |
請問DelphiChat.exe的線上更新程式是如何實做的?機制如何?有無防火牆的限制?
時間就是金錢---[ 發問前請先找找舊文章]
附加檔案:00019808_chinese.zip
| ||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
引言: 請問DelphiChat.exe的線上更新程式是如何實做的?機制如何?有無防火牆的限制? 時間就是金錢---[ 發問前請先找找舊文章]1.將執行檔目前的版本用TClientSocket連上主機傳給主機 2.主機端檢查版本與目前最新版本是否相同,若不相同告知Client要更新 3.Client端得知要更新版本用TNMHTTP元件自特定網址下載最新程式安裝檔 4.下載成功後由DelphiChat執行該新版的安裝檔 5.DelphiChat.EXE就自動結束 6.安裝執行檔接手,開始安裝... 7.裝好後會自動執行程式 8.新版更新OK 因為Chat採用TClientSocket所以會有防火牆問題! ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~ |
||
axsoft
版主 發表:681 回覆:1056 積分:969 註冊:2002-03-13 發送簡訊給我 |
引言: 1.將執行檔目前的版本用TClientSocket連上主機傳給主機 2.主機端檢查版本與目前最新版本是否相同,若不相同告知Client要更新 3.Client端得知要更新版本用TNMHTTP元件自特定網址下載最新程式安裝檔 4.下載成功後由DelphiChat執行該新版的安裝檔 5.DelphiChat.EXE就自動結束 6.安裝執行檔接手,開始安裝... 7.裝好後會自動執行程式 8.新版更新OK 因為Chat採用TClientSocket所以會有防火牆問題! ~~~Delphi K.Top討論區站長~~~那再請問新版的安裝執行檔是利用Installshell這一類的軟體來Package,還是您自行寫了一個更新安裝部分的程式? 可否公開部分的source Code? 時間就是金錢---[ 發問前請先找找舊文章] |
||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
引言: 那再請問新版的安裝執行檔是利用Installshell這一類的軟體來Package,還是您自行寫了一個更新安裝部分的程式? 可否公開部分的source Code?我是採用 GP-Install Configuration Builder v 5.0 http://www.qsc.co.uk/gpinstall.htm 是 Freeware好用又可用在商業用途 It is FREE for commercial and non-commercial use! 下載點: ftp://www.qsc.co.uk/pub/gpinst.exe 多國語言檔:(但只有簡體) ftp://www.qsc.co.uk/pub/gpl.zip 我改為繁體中文檔下載點: http://delphi.ktop.com.tw/loadfile.php?TOPICID=6199917&CC=138663 ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~ |
||
axsoft
版主 發表:681 回覆:1056 積分:969 註冊:2002-03-13 發送簡訊給我 |
引言: 我是採用 GP-Install Configuration Builder v 5.0 http://www.qsc.co.uk/gpinstall.htm 是 Freeware好用又可用在商業用途 It is FREE for commercial and non-commercial use! 下載點: http://www.qsc.co.uk/download_ins.htm 也有多國語言檔下載:(但只有簡體) 我改為繁體中文檔下載點: http://delphi.ktop.com.tw/loadfile.php?TOPICID=6199917&CC=138663 ~~~Delphi K.Top討論區站長~~~我試了一下蠻好用的!不輸給Wise及Installshell!BCB與Delphi皆可適用 由Gp Install package 的Install程式安裝完後如何啟動您的最新版本程式,有何選項可用? 我貼幾張圖給大家參考參考! 時間就是金錢---[ 發問前請先找找舊文章] 發表人 - axsoft 於 2002/07/25 08:35:56 |
||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
|||
jieshu
版主 發表:42 回覆:894 積分:745 註冊:2002-04-15 發送簡訊給我 |
引言: 我是採用 GP-Install Configuration Builder v 5.0 http://www.qsc.co.uk/gpinstall.htm 是 Freeware好用又可用在商業用途 It is FREE for commercial and non-commercial use! 下載點: ftp://www.qsc.co.uk/pub/gpinst.exe 多國語言檔:(但只有簡體) ftp://www.qsc.co.uk/pub/gpl.zip 我改為繁體中文檔下載點: http://delphi.ktop.com.tw/loadfile.php?TOPICID=6199917&CC=138663 ~~~Delphi K.Top討論區站長~~~請問站長他都是包成一個執行檔嗎?(這樣比InstallShell好多了) 可包裝BDE嗎?還是得自己參考InstallShell包了哪些檔案。
------
人生有夢,逐夢而行 人若為善,福雖未至,禍已遠離 人若為惡,禍雖未至,福已遠離 http://www.taconet.com.tw/jieshu/ |
||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
引言: 請問站長他都是包成一個執行檔嗎?(這樣比InstallShell好多了) 可包裝BDE嗎?還是得自己參考InstallShell包了哪些檔案。[/green]對喔!都是只有一個.EXE檔案,這也是我採用他的原因! 包裝BDE不容易喔!但應也可行! 先用Install Shield作一個只有BDE的! 看Install中加入哪些檔案,還有Registry有哪些! 這應該就可以了! 大家來試試看如何產生Delphi5/Delphi6用的BDE for Gp-Install的設定檔案! 請大家分享心得! ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~ |
||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
|||
Skyer
高階會員 發表:43 回覆:111 積分:120 註冊:2002-04-04 發送簡訊給我 |
引言: 我是採用 GP-Install Configuration Builder v 5.0 http://www.qsc.co.uk/gpinstall.htm 是 Freeware好用又可用在商業用途 It is FREE for commercial and non-commercial use!呵呵~~ 我覺得 InnoSetup 也很好用喔 http://www.innosetup.com 是 Free 的也可以用在商業用途 語系包在這裡 http://www.jrsoftware.org/files/istrans/ 目前共有 39 種語言 如果用 My InnoSetup Extension 的話,還可用 Delphi Script 來控制安裝程式流程 http://www.wintax.nl/isx/ 不過缺點是要自己寫安裝 Script 不過有前端程式,所以就可以不用寫 Script 了:p ISTool http://www.bhenden.org/istool/ 以下是 Script 大概樣子.. ------------------------------------------------------------------ ; Script generated by the Inno Setup Script Wizard. ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES! [Setup] AppName=LMD-Tools (Delphi 6.0) AppVerName=LMD-Tools 6.0.0.90 (Delphi 6.0) AppPublisher=LMD Innovative AppPublisherURL=http://www.lmdinnovative.com/ AppSupportURL=http://www.lmdinnovative.com/ AppUpdatesURL=http://www.lmdinnovative.com/ DefaultDirName={pf}\LMD-Tools60 DefaultGroupName=LMD-Tools (Delphi 6.0) AllowNoIcons=true OutputDir=e:\temp Compression=zip/9 InfoBeforeFile=infoDelphi6.txt RestartComputer=no MessagesFile=G:\Data\ForInstall\LMD-Tools\Chinese.isl [Files] Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite Source: G:\Data\ForInstall\LMD-Tools\infoDelphi6.txt; DestDir: {app}; CopyMode: alwaysoverwrite [Registry] Root: HKCU; Subkey: Software\Borland\Delphi\6.0\Known Packages; ValueType: string; [INI] Filename: {app}\Homepage.url; Section: InternetShortcut; Key: URL; String: http://123.123 [Icons] Name: {group}\LMD-Tools Web; Filename: {app}\Homepage.url Name: {group}\Information; Filename: {app}\infoDelphi6.txt Name: {group}\Uninstall LMD-Tools (Delphi 6.0); Filename: {uninstallexe} [UninstallDelete] Type: files; Name: {app}\Homepage.url [_ISTool] EnableISX=true [@Code] <-- 要把 @ 去掉 ^^" var DelphiPath: String; function InitializeSetup(): Boolean; begin RegQueryStringValue(HKEY_CURRENT_USER, 'xxxxxxxx\xxxxxxxxx', 'RootDir', DelphiPath); Result := True; if DelphiPath = '' then begin MsgBox('您尚未安裝 Delphi 6.0,故安裝程式即將結束', mbInformation, MB_OK); Result := False; end; end; function GetDelphiPath(Default: String): String; begin Result := DelphiPath; end;
------
-- Regards, Skyer |
||
Skyer
高階會員 發表:43 回覆:111 積分:120 註冊:2002-04-04 發送簡訊給我 |
用 InnoSetup 包進 BDE http://www.jrsoftware.org/ishowto.phtml?a=bde
------
-- Regards, Skyer |
||
bruce0211
版主 發表:157 回覆:668 積分:279 註冊:2002-06-13 發送簡訊給我 |
引言: 1.將執行檔目前的版本用TClientSocket連上主機傳給主機 2.主機端檢查版本與目前最新版本是否相同,若不相同告知Client要更新 3.Client端得知要更新版本用TNMHTTP元件自特定網址下載最新程式安裝檔 4.下載成功後由DelphiChat執行該新版的安裝檔 5.DelphiChat.EXE就自動結束 6.安裝執行檔接手,開始安裝... 7.裝好後會自動執行程式 8.新版更新OK 因為Chat採用TClientSocket所以會有防火牆問題! ~~~Delphi K.Top討論區站長~~~Dear 站長 : 小弟怎麼沒找到 TNMHTTP元件 下載檔案的方法 ? 我是用一個含有檔案路徑及檔案名稱的URL ,再用 Get 方法去做 好像不行 .... |
||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
|||
bruce0211
版主 發表:157 回覆:668 積分:279 註冊:2002-06-13 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |