Forum: Object-Pascal / Delphi-Language
Delphi
by gammatester,
28. Jan 2010
Das dürfte krachen, wenn Du mehr als 255 Bytes nach SData lesen willst. Der dynamische Teil funktioniert bei mir:
procedure TForm1.Button1Click(Sender: TObject);
var
Data : Array of Byte;
var
st: AnsiString;
len: Integer;
f: tfilestream;
begin
f := tfilestream.Create('test',fmOpenRead);
Forum: Object-Pascal / Delphi-Language
Delphi
by gammatester,
28. Jan 2010
Neben dem was, mkinzler gesagt hat, gibt es ein Mischmasch aus Type/var-Deklaration, die nicht übersetzt wird. Entweder type data = oder var data: aber nicht type Data: Array of Byte. Jedenfalls funktioniert der folgende Schnipsel ohnt Probleme:
procedure TForm1.Button1Click(Sender: TObject);
var
Data : Array of Byte;
var
st: AnsiString;
len: Integer;
begin
setlength(data,4);
...