Array an Funktion übergeben: Problem!

[silentAMD]

hi,
ich übergebe an eine funktion wie folgt ein dynamisches array vom typ TZeichenkette:

Code:

procedure AnzahlBuchstabenkette(txt: String; var arr: array of TZeichenkette; zahl, maximal: Byte);
begin
SetLength(arr, 0);

//... weiterer Code...

end;

beim versuch, dies zu compilern kommt folgender fehler: "E2008 Inkompatible Typen" in jeder zeile wo setlength steht.


was ist denn verkehrt?

[matashen]

Ich denke das liegt an deinenm TZeichenkette, zeig mal den Codeschnipsel wo du dieses deklarierst, da liegt vermutlich der Hund begraben

Gruß Matthias

[silentAMD]

daran dürfte es nicht liegen, denn wenn ich gleich den namen der globelen variable statt der übergebenen eingebe klappt es... aber bitte:

Code:

TZeichenkette = class(TObject)
  Signs: String;
  Anzahl: Integer;
private
  { Private-Deklarationen }
public
  { Public-Deklarationen }
end;

bittte helfen!!!

EDIT: hab ne lösung gefunden... array of TZeichenkette als typ deklarieren... aber wieso läuft meine ursprüngliche lösung nicht?

[Apollonius]

Schau mal in der Hilfe unter Parameter. Die Konstruktion, die du verwendet hast, ist ein "offener Array-Parameter", und damit gehen gewisse Dinge nunmal nicht.

[inherited]

Du musst dir erst einen Typ definieren, der nicht als offen missverstanden werden kann
  TZeichenkettenArray=Array of TZeichenkette; und dann diesen Typ nehmen.

[Muetze1]

Und damit man sich diese Unart der dynamischen Arrays an unsinnigen Stellen erst gar nicht angewöhnt: hier wäre eine TObjectList viel besser geeignet (und man braucht nicht mal var, es reicht sogar ein const)...