Memo <-Bestimmte Inhalte auslesen und als Variable speichern

[MrSpock]

Hallo olafb,

Zitat:

//mach was du willst, z.b. das hier:
StrList.Add(copy(memo1.lines.strings[i], length(suchstr) + 2, length(memo1.lines.strings[i])));

wenn du das Ergebnis in einer Variablen haben möchtest, die z.B. Wert heißt, funktioniert folgendes:

Delphi-Quellcode:

try
  zahlStr := copy(memo1.lines.strings[i], length(suchstr) + 2, length(memo1.lines.strings[i])-length(suchstr)-1);
  Wert := StrToInt(zahlStr);
except
  on exception do
  begin
    Wert := -1;
    MessageDlg(zahlStr+' ist keine gültige Ziffernfolge.');
  end;
end;