haitao:
内部的具体实现可以隐藏;但是大致过程必须说明 (141字) (haitao [2] 今天 09:12 )
[阅读: 678] 2008-06-06 01:18:50
相当于因此为这个函数补充了一个大致过程说明
function THandleStream.Read(var Buffer; Count: Longint): Longint;
begin
Result := FileRead(FHandle, Buffer, Count);
if Result = -1 then Result := 0;
end;