Mehrere Textdateien aus Opendialog heraus ausführen

[marabu]

Guten Morgen,

Zitat von illbytes:

... TStrings und Strings sind nicht miteinander vereinbar als ich versucht hatte S dem Zeilenpuffer zuzuweisen um den Text in meinem Programmrest weiterzuverarbeiten. ...

ZeilenPuffer := s.Text;

Zitat von illbytes:

... Würd mich schon interessieren wie man evtl. TStrings in Strings konvertiert oder mit TStrings Textbestandteile (Wörter, Datum, Zeit im String) untersucht (suchen, finden ersetzen).

Du kannst ein Objekt der Klasse TStrings in einen einzigen String wandeln (siehe oben) oder als eine Folge von Strings verarbeiten:

Delphi-Quellcode:

var
  i: Integer;
  s: TStrings;
begin
  // ...
  for i := 0 to Pred(s.Count) do
    ShowMessage(s[i]);
  // ...
end;

Suchen und Ersetzen kannst du also auf dem gesamten Text oder den einzelnen Zeilen.

Freundliche Grüße