Hallo alle Zusammen,
ich habe das Problem, das ich beim Programmablauf an einer bestimmten Stelle einen
Zugriffsfehler bekomme. Setze ich dort einen Haltepunkt und überprüfe sie mittels
'Auswerten / Ändern' wird die Wertzuweisung korrekt angezeigt (Beweis im Anhang).
Code:
function GetIdentifyStr(const InqBuf : PWord; InqBufSize : Integer): String;
var
P : PWORD;
I,J : Integer;
S : Array[0..127] of Char;
begin
P := InqBuf;
I := 0;
J := 0;
FillChar(S, SizeOf(S), Char(32));
while I < InqBufSize do
begin
inc(I);
inc(P);
S[J] := Char(P^ shr 8); <- Hier kommt die Zugriffsverletzung
inc(J);
end;
Result := StrPas(S);
end;
Könnt ihr mal schauen was da quer liegt. Für Lösungen wäre ich dankbar.