ja genau die innere Schleife ist mein Problem:
sie geht gerade 168 Artikel durch
Bsp. die Artikelnummer 4711 soll gesucht werden
die innere Schleife sagt dann 167 x gibts nicht und 1x gibts doch.
wie lasse ich diese inner Schleife durch die gesamte Datei laufen bzw. setze eine
Finde-Variable?
Delphi-Quellcode:
for L := 1 to strtoint(DB_Lokal_index_read) do
begin // pfad definieren
ini:=Tinifile.create(einstellungen.artikelreg);
DB_Lokal_artikelnummer:= ini.readstring(inttostr(L), 'artikelnummer', DB_Lokal_artikelnummer);
if (DB_Lokal_artikelnummer='-1')or (DB_Lokal_artikelnummer='') then DB_Lokal_artikelnummer:='0';
// nummern vergleichen
if (RDB_artikelnummer=DB_Lokal_artikelnummer)
then begin
break
end;
end;