線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1471
推到 Plurk!
推到 Facebook!

关于流的使用资料及相关实例?

 
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-07-28 18:58:55 IP:61.155.xxx.xxx 未訂閱
TFileStream (for working with files) TStringStream (for manipulating in-memory strings) TMemoryStream (for working with a memory buffer) TBlobStream (for working with BLOB fields) TWinSocketStream (for reading and writing over a socket connection) TOleStream (for using a COM interface to read and write) 请大家提供一些关于流的使用资料及相关实例? 特别是TBlobStream、TWinSocketStream、TOleStream 方面的 最好是中文的,不要告诉我look delphi help ... ... ... 谢谢!!!
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-07-28 21:06:07 IP:202.39.xxx.xxx 未訂閱
不是中文的 http://homepages.borland.com/efg2lab/Library/Delphi/IO/StreamIO.htm --- --<-<-<@
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-29 08:16:04 IP:61.155.xxx.xxx 未訂閱
hagar 兄: 多谢了< >,不过我也找到了一些,但是将的很基础、资料不太全!< > 数据流的完全使用手册!
Rain
資深會員


發表:31
回覆:236
積分:268
註冊:2003-02-17

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-07-29 10:42:46 IP:218.5.xxx.xxx 未訂閱
lovejingtao大大的文章:談Delphi編程中“流”的應用 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=33689    //上面的地址是CHM文檔,剛看見這個位置也貼了一篇,可直接看了:
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-07-29 22:04:01 IP:61.155.xxx.xxx 未訂閱
RAIN兄多谢!多谢! 好像主要讲的是TFileStream 的应用,我主要想知道是TBlobStream、TWinSocketStream、TOleStream 方面的应用。 我 >如果谁有 > 谢谢各位!< >
Rain
資深會員


發表:31
回覆:236
積分:268
註冊:2003-02-17

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-07-30 10:08:59 IP:218.85.xxx.xxx 未訂閱
TOleStream沒什麼好講的,在AxCtrls單元找一下它的定義,很簡單,看一下大概就明白了。    TBlobStream通常用於資料庫中Blob欄位(text,image)的讀取和存入,實際應用的例子請在本站用‘TBlobStream’關鍵字搜索一下,很多,我就不貼出來了。    TWinSocketStream用於採用阻塞式Socket連接的資料讀寫, 在這邊有一篇關於這幾種流的簡單說明和例子,可參考一下: http://www.legalsoft.com.cn/Articles/ArticleBrowse.asp?idArticle=328 那段BCB的WinSocketStream的代碼轉成DELPHI如下:
uses
  ScktComp;
procedure TMyClientThread.Execute;
var
  pStream: TWinSocketStream;
  buffer: string;
begin
  { create a TWinSocketStream for reading and writing }
  pStream := TWinSocketStream.Create(ClientSocket1.Socket, 60000);
  try
    { fetch and process commands until the connection or thread is terminated }
    while (not Terminated) and (ClientSocket1.Active) do
    begin
      try
        GetNextRequest(buffer); { GetNextRequest must be a thread-safe method }            { write the request to the server }
        pStream.Write(buffer, Length(buffer)   1);
        { continue the communication (e.g. read a response from the server) }
        ...
      except
        if not(ExceptObject is EAbort) then
          Synchronize(HandleThreadException); { you must write HandleThreadException }
      end;
    end;
  finally
   pStream.free;
  end;
end;
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-07-30 10:53:52 IP:61.155.xxx.xxx 未訂閱
多谢谢!!! 哈哈,我又找到了些......
系統時間:2024-05-16 7:41:59
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!