HI,
ähnlich wie der If-Schleife ging es auch der Case-Schleife, sie wurden nie erfunden. Es handelt sich um eine Anweisung (nicht um eine Schleife).
Wenn dein Textdokument eine feste Struktur hat, dann solttest du diese ruhig ausnutzen. An sich kannst du natürlich schauen, ob du eine 0 in der Zeile findest und ob diese vor jeder anderen Ziffer liegt, aber wenn du z.B. immer Strings der Form
04857576 IrgendEinName
hast, dann könntest du auch mittels
Delphi-Quellcode:
// mit list deiner StringList
if list.Count > 0 then
begin
for i := 0 to list.Count - 1 do
begin
if list[i][1] = 0 then
begin
// durch 0049 ersetzen
end
else
begin
// is klar
end;
end;
end;
Gruß Der Unwissende