Thema: Delphi Array länge verändern

Einzelnen Beitrag anzeigen

Murcielago82

Registriert seit: 7. Apr 2006
30 Beiträge
 
#1

Array länge verändern

  Alt 26. Jun 2006, 14:15
Hallo, ich will die länge eines arrays erst in einer Procedure setzen.


Delphi-Quellcode:
procedure zahlsetzen_generieren(i,j : integer;StringGrid1:TStringGrid);

VAR zeiger,k,zahl,wo:integer;
möglichkeit : array [0..zeiger] of integer; //Zeiger soll erst in der procedur gesetzt werden???
geprüft: boolean;

procedure prüfen();
  begin
  geprüft:= false;
  geprüft:= check_zeile(i,zahl);
  if geprüft = false then
      begin
        geprüft:=check_spalte(j,zahl);
        if geprüft = false then
          begin
            geprüft:=check_3x3(zahl,i,j);
            if geprüft = false then
            begin
              exit;
            end;
          end;
        end;
  end;

begin
  zeiger:=0;
  for k:=0 to 9 do
    begin
    prüfen();
    if geprüft = false then
      begin
      möglichkeit[zeiger]:= k;
      inc(zeiger); //Hier sollte Zeiger immer erhöht werden wenn zulässig
      end;
    end;
end;
Leider bekomme ich immer ine Fehlermeldung wenn ich oben das array erstelle. Ist sowas überhaupt möglich was ich vorhabe?
Gruss
  Mit Zitat antworten Zitat