Paar Fragen zu Delphi

[thetrue]

Moin,
ich habe da paar Fragen:

1. Wie kann ich prüfen ob ein wert in einem Array vorhanden ist?

Delphi-Quellcode:

...
var
   child: array of Integer;
...
if not child[0] = 0 then ... <-- geht nicht

2. warum geht das hier nicht:

child[length(child)] := 1;

[droppi]

so prüfst du ab der wert vorhanden ist und wenn nicht dann wird was anderes ausgeführt
if child[0]<>0 then ...

[EDatabaseError]

er will gesammt abfragn ob ne 1, 2, 3... drin steht so fragst du nur ab if nicht 0.

Mfg Tobi

[mkinzler]

Geht das?
if child[0] <> 0 then ...

[droppi]

warum nicht?
wenn alle werte des arrays geprüft werden sollen dan kann man das mit einer for to schleife machen

[thetrue]

ne geht auch nicht

[pszopp]

Das sollte doch klappen:

Delphi-Quellcode:

for i := Low(EinArray) to High(EinArray) do begin
  if (EinArray[i] = EineZahl) then begin
    ShowMessage(Format('%d wurde gefunden', [EineZahl]));
    break;
  end; // if
end; // for i

Gruß,
pszopp

[droppi]

es kommt natürlich darauf an ob du prüfen willst ob ein wert drin ist oder ob er nicht drin ist.

zu 2. wenn du das machst wird der index zu groß, damit es funzt solltest du es so machen
child[length(child)-1] := 1; und du musst natürlich auch die größe des arrays eistellen denn in deinem beispiel ist die nicht angegeben.

[thetrue]

Zitat von droppi:

es kommt natürlich darauf an ob du prüfen willst ob ein wert drin ist oder ob er nicht drin ist.

zu 2. wenn du das machst wird der index zu groß, damit es funzt solltest du es so machen
child[length(child)-1] := 1; und du musst natürlich auch die größe des arrays eistellen denn in deinem beispiel ist die nicht angegeben.

habe schon versucht, geht auch nicht

ABER EGAL! ICH BRAUCHE DAS NET hier DER THREAD IST NUN WICHTIG: http://www.delphipraxis.net/internal...ct.php?t=84198

[Zacherl]

Was für ein Fehler erscheint?
EDIT: Child muss auch initialisiert werden mit SetLength(Child, 10 (oder halt anderer Wert));