在答題的過程中，小弟我發現有很多會員發問這方面的問題，也就是有關於螢幕畫面傳輸、檔案傳輸...各種 Stream 的傳輸，所以，寫下這個範例提供給大家參考

1.此篇文章的目的為何??
  主要的目的在示範如何在 Client/Server 之間互相傳輸螢幕畫面    2.是否有完整的範例 Project (包含 Source Code) 可以下載??
  Client 端: http://delphi.ktop.com.tw/loadfile.php?TOPICID=11286793&CC=252427
  Server 端: http://delphi.ktop.com.tw/loadfile.php?TOPICID=11287106&CC=2524343    3.該如何操作這個範例??
  (1)下載及解壓縮檔案 Server.zip 至 Server 端，並執行檔案 Server.exe
  (2)下載及解壓縮檔案 Client.zip 至 Client 端，並執行檔案 Client.exe
  (3)在「Client Form」的下方「Server IP Address」欄位輸入 Server 端的
     IP 位址
  (4)在「Client Form」的下方的 ComboBox 選擇「Server To Client」，按
     「Start」Button 即可在「Client Form」看到 Server 端傳送過來的螢幕
     畫面 (每秒更新一次)，最後按「Stop」Button 即可停止
  (5)在「Client Form」的下方的 ComboBox 選擇「Client To Server」，按
     「Start」Button 即可在「Server Form」看到 Client 端傳送過來的螢幕
     畫面 (每秒更新一次)，最後按「Stop」Button 即可停止    4.此範例可以在哪一個作業系統執行??
  理論上在 Windows 9X/ME/NT/2000/XP/2003 都可以執行，不過目前只有在
  Windows 2000 實際測試過，有興趣的會員，也請幫忙測試看看    5.此範例是否有限制??
  是的，目前只適用一個 Client 與一個 Server 連線，想要做到多個 Client
  的話，請參考本範例的基本架構自行修改

6.此範例是否有其他的注意事項??
  是的，本範例主要是利用 Indy V9.00.11 TIdTCPClient/TIdTCPServer 元件
  達成目的，所以想要重新編譯此範例的話，請先檢查 BCB 內的 Indy 版本是
  否正確
  (1)BCB 6.0 原本附的是 Indy 8.0 元件
  (2)如果想要把 BCB 6.0 的 Indy 元件昇級至 9.0 的話，可先在此下載 (包
     括元件本身、說明文件、範例程式碼)
     http://www.indyproject.org/download/Indy9.html
  (3)下載完成以後，可依照以下連結文章中的步驟，安裝至 BCB
     http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25182
  (4)另外，在執行此範例的時候，建議最好使用配備較好的電腦，不然在截取
     畫面的時候，容易造成作業系統 Delay 的現象 (例如: 滑鼠在移動的時候
     會有暫停的現象)，以下為兩種電腦配備的測試結果，提供參考
     (a)會造成 Delay 的現象 (Notebook, P3-1G, 256 MB, VGA-S3-8MB)
     (b)不會造成 Delay 的現象 (PC, AMD-1.4G, 512 MB, VGA-AGP4X-64MB)    7.如果寫得不好，或是有不對的地方，請大家多多指教

-- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/08/20 23:37:30

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

不虧是包前輩， 把這些大大小小問題通通「包」起來， 這程式不儘好用，也是個學習indy的入門好教材~

這正是我尋找已久的寶物

致包大人: 小弟因沒有 C 的工作環境, 不能開啟閣下的源碼細看, 可否把source code用text mode顯示出來, 提供小弟以作參考 謝謝

請問... 小弟我正好有需要此一程式範例.. 但是不能下載耶.請有那位大大提供給此一程式給我. mail:ncmfj2004@yahoo.com.tw 謝謝 Try it!

------
Try it!

不好意思，小弟可能太慢看到此篇文章了
http://www.indyproject.org/download/Indy9.html
似乎已經沒辦法連結了~~不知有沒有人可以轉寄給我的呢，萬分感謝^^因為我自己在寫時有一點問題，想看一下大大寫的^^

Mail: love.suntree@msa.hinet.net

剛找到的元件Screen Spy v.1.0並附上範例
http://www.torry.net/quicksearchd.php?String=screenspy
TScreenSpy is a screen capture component to capture screen to serials of TBitmap.
TScreenEncoder can capture/ encode/ send screen from one PC other PCs. Because it use UDP as transmission protocol, use of multicast/broadcast IP can send screen to a huge number of PCs on the network without additional CPU/Network resource (must use with TScreenPlayer).
TScreenPlayer can receive/decode screen. Multicast-IP property allow to receive Multicast packet from one network node (must use with TScreenEncoder).

壓縮檔還缺BufferUDP.pas編譯時會出現錯誤
下載後將檔案放在ScrSpy.pas同一個目錄下即可編譯成功
http://delphi.ktop.com.tw/board.php?cid=31&fid=97&tid=87337

我把好久以前的文章翻出來了
我client打開來要編輯

在run的時候有錯誤
[C Error] Unit1.cpp(43): E2227 Extra parameter in call to _fastcall TIdTCPClient::Connect()
[C Error] Unit1.cpp(120): E2227 Extra parameter in call to _fastcall TIdTCPConnection::WriteStream(TStream *,const bool,const bool)

我有安裝indy9了
沒有修改過任何程式碼就有錯誤，是不是我有什麼還沒安裝好呢？

另外
在server
[C Error] Unit1.cpp(72): E2227 Extra parameter in call to _fastcall TIdTCPConnection::WriteStream(TStream *,const bool,const bool)

indy 我看了幾次 好像也沒設錯
開啟bcb時沒有任何錯誤

編輯記錄