Hallo, ich möchte verschiedene Werte buffern. Die Werte sollen zu dem in verschiedene Buffer.
Irgendwie habe ich einen Denkfehler, aber so richtig finden tu ich ihn nicht...
Also, mein Buffer sieht so aus (Ausschnitt):
Delphi-Quellcode:
pBuffer=^TBuffer;
TBuffer = class(TObject)
private
buffersize:Integer;
counter:Integer;
Das Buffer-Array:
Buffer: array [1..12] of pBuffer;
Die Erstellung der Buffer und Einsortierung:
Delphi-Quellcode:
b1:=TBuffer.create(buffersize);
b2:=TBuffer.create(buffersize);
....
buffer[1]:=@b1;
buffer[2]:=@b2;
Teil vom Create:
Delphi-Quellcode:
buffersize:=bufferlength;
SetLength(array, buffersize);
counter:=0;
Hier mal eine Buffer-funktion:
Delphi-Quellcode:
procedure TBuffer.tuwas(wert:single);
begin
counter:=counter+1;
array[counter]:=wert;
Createn klappt alles ohne Probleme, auch wenn ich bei "Erstellung und Einsortierung" reindebugge, scheint sich das so aufzubauen, wie gewollt.
debugge ich aber in die Buffer-Funktion rein, hat counter aber nicht den Wert 0, und bei der Zuweisung von "wert" kommt dann ein Absturtz mit Assembler-Fenster...
Ich habe das so umständlich gemacht, um mit buffer[i] schneller zugreifen zu können als mit buffer1, buffer2, ...
Weiss jemand Rat?