array auf Inhalt überprüfen

[ghost1601]

Hiho,
ich habe eine form in der mehrere editfelder vorhanden sind.
aus diesen editfelder werden daten entnommen die dann in ein array geschrieben werden sollen.
nun hab ich das problem, dass ich mit einem button direkt an die stelle springen will wo noch kein eintrag vorhanden ist. ich habe allerdings keine ahnung wie ich das machen kann.
ich denke man müsste erstmal das array überprüfen ob an stelle x ein eintrag vorhanden ist.
kann mir da jemand weiterhelfen, also speziellan der stelle wie ich das array überprüfen kann?
thx

[marabu]

Hi,

du könntest deine Edit-Felder in ein array of TEdit eintragen und dann mit einer Schleife über dieses array gehen um ein leeres Feld zu finden - etwa so:

Delphi-Quellcode:

var
  EditArray: array of TEdit;
  i: Integer;
begin
  for i := Low(EditArray) to High(EditArray) do
    if EditArray[i].Text = '' then
    begin
      EditArray[i].SetFocus;
      Break;
    end;
end;

Grüße vom marabu

[ghost1601]

Zitat von marabu:

Hi,

Delphi-Quellcode:

var
  EditArray: array of TEdit;
  i: Integer;
begin
  for i := Low(EditArray) to High(EditArray) do
    if EditArray[i].Text = '' then
    begin
      EditArray[i].SetFocus;
      Break;
    end;
end;

Grüße vom marabu

ja aber ein array hab ich ja schon und nebenbei mit diesen quelltext geht man auch nicht an die erst leere stelle, soweit ich das beim testen sehen konnte...ich hatte da irgendwann mal eine FindComponent, allerdings weiß ich nicht mehr wie die funktionierte, vielleicht ginge das damit?

[marabu]

Hallo,

Zitat von ghost1601:

ja aber ein array hab ich ja schon ...

um so besser.

Zitat von ghost1601:

... und nebenbei mit diesen quelltext geht man auch nicht an die erst leere stelle

Wohin denn dann? Was meinst du denn mit "erste Stelle"? Hast du die Items im Array geordnet, damit erste und letzte Stelle definiert sind?

Zitat von ghost1601:

... ich hatte da irgendwann mal eine FindComponent, allerdings weiß ich nicht mehr wie die funktionierte:cry:, vielleicht ginge das damit?

Klar doch - es gibt immer mehrere Wege, wie man ein Problem lösen kann. Den optimalen Weg findet nur der, welcher alle Anforderungen kennt.

Freundliche Grüße

[ghost1601]

hi again^^,

das array in dem die daten stehen ist natürlich gefüllt und sortiert (das hätte ich erwähnen müssen, da hast du vollkommen recht).
die einträge dort sind von stelle 1 aufwärts eingetragen, derzeit bis zur stelle 11. die 12 wäre daher die erste freie stelle. und die soll das programm finden
falls du sonst noch weitere anforderungen erfahren willst, frag doch einfach.

[thales]

Hallo,

eine Möglichkeit wäre, das Array als dynamisches Array zu deklarieren. Es wird immer so groß gemacht, wie gerade benötigt. Die Länge fragt man mit "length(..)" ab, vergrößert wird es mit "setlength(..)".
Achtung: Die Zählung beginnt immer bei 0!

Bsp.: 12 Einträge: 0 .. 11
"n:=length(array)" ergibt den Wert 12, mit setlength(array,n+3) wird das Array um 3 Plätze erweitert ,
der erste freie platz in dass array[n].

Gruß Thales

[marabu]

Was verstehst du unter "Stelle"?
Wie ist die Ordnung definiert?

[ghost1601]

@thales: das wäre eine möglichkeit...aber ich denke dadurch würde ich nur noch mehr probleme bekommen weil dann anderswo etwas nicht hinhaut

@marabu: mit stelle ist die position im array gemeint

[marabu]

Hallo,

ich verstehe zwar immer noch nicht, was du da vorhast, aber wenn ich das Suchen nach einem unbelegten Slot im Array als unabhängiges Teilproblem betrachte, dann empfehle ich dir statt einem Array eine TObjectList zu verwenden. Mit demr Methodenaufruf IndexOf(nil) bekommst du dann den Index des ersten freien Slots.

Gute Nacht

[ghost1601]

Guten Abend,

also ich fang am besten von vorne an. ich hab ein programm mit editfeldern. in den editfeldern werden sachen eingetragen die in ein array eines eigenen datentyps geschrieben werden. diese daten, aus dem array will ich nun durchsuchen. die suche soll mir die erste freie stelle (also die wo noch nichts steht) ausgeben. sodass ich an dieser stelle fortfahren kann und auch gleich diese stelle füllen kann.
jetzt klar?