Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Daten parallel mithilfe eines Ringbuffers wegspeichern -

    Delphi
    by himitsu, 8. Jun 2009
  wenn dir 16 MB nicht zuviel Puffer sind, könntest du FHead und FTail auch einfach als Byte definieren und dann statt 0..10 auf 0..255 umsteigen, da würde die Überlaufprüfung (if FHead > 10 then) entfallen, da sie ja schon im Typ eingebaut wäre :angel:
  
  hier würde also ein einfaches "Inc" ausreichen
  procedure TRingBuffer.IncHead;
  begin
  InterlockedIncrement(FHead);
  end;