Array als var Parameter

[Jacki O]

Hallo,

ich möchte einer Procedure ein Array of Byte übergeben. In der Procedure wird die das Array Sortiert und soll der Aufrufenden Funktion zur weiteren verarbeitung zur ferfügung stehen. Macht man das so ?

Code:

procedure SortArray(var aArray : array of Byte);
begin
//Sortierung durchführen
end;

...

//Aufrufende Funktion
var tArray : array [0..3] of Byte;
    temp   : ^Word;


...
SortArray(tArray);
temp := @tArray;

....

Das funktioniert, aber ist das auch gut so ????

Gruß Jacki