Einzelnen Beitrag anzeigen

DelTurbo

Registriert seit: 12. Dez 2009
Ort: Eifel
1.212 Beiträge
 
Delphi 2007 Architect
 
#1

Dynamische Arrays (mal wieder)

  Alt 21. Nov 2013, 09:59
Delphi-Version: 2007
Hi,
ich arbeite mit Dynamischen Arrays. Um einen neuen "Slot" zu bekommen habe ich eine Funktion. Nun habe ich aber mehrer Dynamische Arrays. Leider alles verschieden Typen. Mal Integer, mal Strings, mal Records.

Ich dachte nun daran GetNextFreeField das Array zu übergeben. Aber man muss ja einen Typ angeben. z.b. GetNextFreeField(var ar:Array of Strings):Integer;
Damit kann ich ja dann wieder kein anderes Array vergrössern.

Nun zu miener Frage. Geht das überhaupt, das man z.b. nur GetNextFreeField(var ar:Array):Integer; irgendwie angeben kann? Also quasi ohne Typ.

Vielen dank im voraus

Delphi-Quellcode:
function GetNextFreeField:Integer;
var
   i         :Integer;
begin
    if KData=nil then begin
      SetLength(KData,1);
    end else begin
      SetLength(KData,high(KData)+2);
    end;
    Result:=high(KData);
end;
Alle meine Rechtschreibfehler sind Urheberrechtlich geschützt!!
  Mit Zitat antworten Zitat