Das Ding baut mir gerade eine Klasse für einen Ringspeicher mit Beispiel. Toll!
Offenbar wird das Beispiel in einer anderen Sprache erzeugt und dann wird versucht, dies in Pascal umzuwandeln.
Delphi-Quellcode:
type
TRingBuffer = class
private
FData: array[0..BUFFER_SIZE-1] of Integer;
FHead, FTail: Integer;
public
constructor Create;
procedure AddData(Value: Integer);
function GetData: Integer;
property Empty: Boolean read (FHead = FTail);
property Full: Boolean read ((FTail + 1) mod BUFFER_SIZE = FHead);
end;
Die Deklaration für Empty und Full gibt es doch nicht in Delphi oder irre ich mich?