Array of String als Parameterübergabe - Inkompatible Typen

[hitzi]

Hallo,

irgendwie steh ich heute auf dem "Schlauch" und komm nicht weiter. Ich brauch endlich Urlaub
Ich habe folgenden Quelltext:

Delphi-Quellcode:

procedure TfrmMain.GetTables(DS : TADODataSet; var mTables : array of string);
begin
  ...
  setlength(mTables, DS.RecordCount); //Fehler Inkombatible Typen
  ...

Fehler steht oben im Quelltext. Wie kann ich diesen umgehen?

MfG Hitzi

[Jens Schumann]

Zitat von hitzi:

Hallo,

irgendwie steh ich heute auf dem "Schlauch" und komm nicht weiter. Ich brauch endlich Urlaub
Ich habe folgenden Quelltext:

Delphi-Quellcode:

procedure TfrmMain.GetTables(DS : TADODataSet; var mTables : array of string);
begin
  ...
  setlength(mTables, DS.RecordCount); //Fehler Inkombatible Typen
  ...

Fehler steht oben im Quelltext. Wie kann ich diesen umgehen?

MfG Hitzi

Versuch es mal so:

Delphi-Quellcode:

Type
  TStrArray = Array of String;
...
procedure TfrmMain.GetTables(DS : TADODataSet; var mTables : TStrArray);
begin
  ...
  setlength(mTables, DS.RecordCount); //Fehler Inkombatible Typen
  ...

[Gollum]

Hallo,

so sollte es funktionieren:

Delphi-Quellcode:

type
  TMTables:array of String;
...
...
procedure TfrmMain.GetTables(DS : TADODataSet; var mTables:TMTables);
...

[hitzi]

Danke Gollum hat funktioniert. Bis auf einen kleine Fehler:

Delphi-Quellcode:

type
  TMTables = array of String;

Danke für deine Hilfe.

Hitzi

[IngoD7]

Zitat von hitzi:

Danke Gollum [...]Danke für deine Hilfe.

@Jens Schumann

Undank ist der Welt Lohn ...

[Jens Schumann]

Zitat von IngoD7:

Zitat von hitzi:

Danke Gollum [...]Danke für deine Hilfe.

@Jens Schumann

Undank ist der Welt Lohn ...

Genau

[hitzi]

Whoops .... SORRY ... VERZEIH MIR Jens

Das ist eben blöd, wenn man den Link in der Email anklickt, sehe ich erstmal nur den letzten Beitrag. Habe dann leider vegessen nochmal hochzuscrollen.

Der Dank geht natürlich auch an dich Jens. Danke.
Ich gelobe Besserung und scrolle das nächste Mal

MfG Hitzi

PS: Danke nochmal an alle die mir bei dem Problem geholfen haben. Danke