Pointer Problem

[Rolf Frei]

Versuch mal folgendes:

Delphi-Quellcode:

procedure TMainForm.OnCLick(Sender:TObject);
var
  Data : TBytes;
begin
  SetLength(Data, 4);
  Data[0] := 1;
  Data[1] := 2;
  Data[2] := 3;
  Data[3] := 4;

  DoIt(Length(Data), Pointer(Data)); // oder Pointer(Data[0])
end;