Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
Caption :='';
for i := 1 to Pred(Length(Edit1.Text)) do
if (Edit1.Text[i] > 'Z') and (Edit1.Text[i+1] < 'a') then
Caption := IntToStr(i+1);
end;
Falls da kein Trennzeichen zwischen steht:
Großbuchstabe folgt direkt auf einen Kleinbuchstaben -> hier fängt neuer Begriff an (unwahrscheinlich weil unsauber, aber nicht ausgeschlossen). Oder stehen da wirklich Zahlen mit in der Datei? Schwierig zu beurteilen ohne einen Ausschnitt der echten Datei zu sehen.