Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
 
Delphi XE2 Professional
 
#6

AW: Probleme beim abrufen von arrays

  Alt 20. Okt 2012, 16:27
Es funktioniert nicht
Das ist keine Fehlermeldung!
Was geht nicht?


Wenn dann mit einen break:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
 var i:integer;
 begin
   for i:= 1 to 100 do
   begin
     if edit4.Text = person[i].Name then
     begin
       edit2.Text:= person[i].Name;
       edit1.Text:= person[i].Vorname;
       edit3.Text:= inttostr(person[i].Alter);
       edit4.Text:= '';

       break;
     end;
   end;
end;
Wenn der Name, der im Edit4 eingegeben wurde, gefunden wurde, dann werden die 3 Edits beschrieben und Edit4 geleert.
Die Schleife läuft aber weiter. Ist dann der Name des nachfolgenden Array-Eintrags auch leer (also nil), dann wird
aus diesem Array-Element gelesen.

[Edit]
"exit" gegen "break" getauscht - ist richtiger bei Schleifen!
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<

Geändert von Helmi (20. Okt 2012 um 16:33 Uhr)
  Mit Zitat antworten Zitat