Typenproblem: Array of Byte...

[Kedariodakon]

Zitat von Thanatos81:

Wieso arbeitest du nicht gleich mit Zeigern? Dann bräuchtest du gar nichts durch den Speicher schaufeln. Oder ist das aufgrund der Programmstruktur nicht möglich?

Nicht wirklich...

Zitat von Muetze1:

Delphi-Quellcode:

Function NimmArray(Const AArray: TDataArray): Integer;
Var
  i : Integer;
Begin
  Result := 0;
  For i := Low(AArray) To High(AArray) Do
    Inc(Result, AArray[i]);
End;

Begin
  ShowMessage(IntToStr(   NimmArray( [1, 3, 54, 2, 65, 34, 76] )   ));
End.

So meinte ich das nicht...
----------------------------------

Ich habe diese Funktion:

Delphi-Quellcode:

Function sumArray( Const Data: TDataArray ): Cardinal;
Var   i: Cardinal;
Begin
   Result   := 0;
   For   i := low( Data ) To High( Data ) Do Inc( Result, Data[ i ] );
End;

und will die so in der Art hier anwenden:

Delphi-Quellcode:

Function sumArrayTests( Const Data: TDataArray; Const Start, Ende: Cardinal ): Cardinal;
Begin
   Result   := sumArray( Data[ Start..Ende ] );
End;

Das das nicht geht ist klar, aber so in der art will ich es anwenden, weiss aber net ob das einfach geht oder net...

Bye