ps und eon ist kein Byref also das var wech da
Zitat:
BYVAL
To pass an argument by value, don't use Var or Const in parameter declaration.
Zitat:
BYREF
To pass an argument by reference, Var needs to be placed in front of the parameter declaration.
EDIT:
Delphi-Quellcode:
For LoopArr = 0 To UBound(aflist1)
Debug.Print "AFLIST = " & aflist1(LoopArr)
Next LoopArr
WVB_GetEon1 = aflist1
Nur zur Info !
Die Schleife tut ja eigentlich nichts oder ?
Hier wird nur ähnlich 'ShowMessage' ausgegeben welche werte aflist[LooArr] enthält.
Daher kann die Rückgabe auch nicht
Result := floattostr(aflist1[LoopArr]);
sein.
Denke mal Result := aflist1;
gruss Emil