(Delphi) Resultaat functie is array.

[active2]

Hoe kan ik ervoor zorgen dat het functieresultaat een array is?

Ik heb het zo geprobeerd

result := <arraynaam>

En de functie heb ik als een integer gedefinieerd! Dus zo:

function arrayombouwen(a, b: integer ; c: array of integer ): integer ;

Maar nu krijg ik de volgende foutmelding:

Incompatible types: 'Integer' and 'array'

[Verwijderd]

code:

type
  TIntArray = array of Integer;

function ArrayOmbouwen(a, b: integer): TIntArray;

[..]

implementation

[..]

function ArrayOmbouwen(a, b: integer): TIntArray;
begin
  { voorbeeld }
  SetLength(Result,4);
  Result[0] := 0;
  Result[1] := 1;
  Result[2] := 2;
  Result[3] := 3;
end;

[Bigs]

Inderdaad.. met een type moet het lukken.

[Ariejan]

Niet vergeten SetLength te gebruiken!! Anders krijg je hele mooie foutmeldingen...

(Mooi he, dynamische arrays in Delphi)

[active2]

Ik heb dit opgevolgd met als gevolg dat ik wat minder foutmeldingen heb.

Maar nu heb ik nog een foutmelding als ik dit doe:

result := ArrayNaam ;

Incompatible types: 'Array' and 'TIntArray'

Maar ik moet zeggen ik weer wat geleerd dit wist ik nog niet. In elk geval alvast bedankt.

[Creepy]

Op dinsdag 30 oktober 2001 14:34 schreef active2 het volgende:
result := <arraynaam>

function arrayombouwen(a, b: integer ; c: array of integer ): Integer

result := ArrayNaam ;
Incompatible types: 'Array' and 'TIntArray'

Dat hebbie ook nog als je achter de functie TIntArray zet i.p.v. integer?

zo dus? (zoals hierboven ook al staat..)

code:

function arrayombouwen(a, b: integer ; c: array of integer ): TIntArray

[Verwijderd]

Kun je wat meer code geven?

Wat er fout gaat is dat Result een ander type heeft dan de variabele 'ArrayNaam' [Result is van het type TIntArray; 'ArrayNaam' van het type array]. Voor een assignment moeten deze vars in dit geval hetzelfde type hebben. Dus eigenlijk precies wat delphi zegt

Oplossing:
Maak ArrayNaam van het type TIntArray [Maar het lijkt me eigenlijk niet nodig om op de manier die jij doet een andere array aan Result te assignen]

[active2]

Even terugkomend op Creepy zei:

Ik heb overal TIntArray van gemaakt waar dat nodig was.

Ik zal morgen wel wat code geven want:

* active2 gaat naar bedje toe