Buffer überprüfen ob er leer ist

[skaven]

Hallo,

würde gerne eine Überprüfung schreiben die mir angiebt ob ein buffer leer ist oder nicht.

Benutze das Programm Turbo async, damit sollte das doch gehen.

[Dax]

Es kommt immer darauf an, was du mit "leerer Puffer" meinst. Wenn du "leer" so verstehst, das jedes Byte des Puffers 0 ist, sollte das einfach gehen:

Delphi-Quellcode:

type
  TByteArray = array of Byte;

function IsBufferEmpty(Buffer: TByteArray): boolean;
var i: Integer;
begin
  for i := 0 to Length(Buffer)-1 do
    if Buffer[i] <> 0 then
    begin
      Result := false;
      Exit;
    end;
  Result := true;
end;

[skaven]

Danke für die Hilfe, hab es mit "charready" versucht, funktioniert auch.