Einzelnen Beitrag anzeigen

Nogge

Registriert seit: 15. Jul 2004
336 Beiträge
 
Delphi 7 Professional
 
#11

Re: alle Exceptions mit try...except abfangen

  Alt 10. Mai 2005, 12:31
Delphi-Quellcode:
var
  Buffer:array of Byte;
Ich sehe keine negative Auswirkung in der Procedure "ReadBuffer":
Delphi-Quellcode:
procedure TStream.ReadBuffer(var Buffer; Count: Longint);
begin
  if (Count <> 0) and (Read(Buffer, Count) <> Count) then
    raise EReadError.CreateRes(@SReadError);
end;
Zitat:
In beiden Fällen müsstest du das erste Element bei Read() angeben...
Was meinst du damit ?
  Mit Zitat antworten Zitat