Einzelnen Beitrag anzeigen

Strict

Registriert seit: 25. Mär 2020
47 Beiträge
 
#9

AW: Strings aus Pascal-Datei filtern und exportieren

  Alt 16. Apr 2020, 22:33
Bei mir passiert da nichts. Das Memo bleibt leer
Delphi-Quellcode:
 LLines := TStringList.Create;
 try
  LFileToParse := 'Language.EN.pas';
  if FileExists(LFileToParse) then
   begin
    LLines.LoadFromFile(LFileToParse);
    if LLines.Count > 0 then
     begin
      for M in TRegEx.Matches(LLines.Text, '^[a-z]+$') do // kannst dich auch mit M.NextMatch durchhangeln, statt dem FOR
       Memo1.Lines.Add(M.Index.ToString + ' ' + M.Value);

      if TRegEx.IsMatch(LLines.Text, '^[a-z]+$', [roIgnoreCase]) then
       begin
       end;
     end;
   end;
 finally
  LLines.Free;
 end;
  Mit Zitat antworten Zitat