kannst du nich einfach so tun?
wenn in deinem memo es wie folgt steht..
Key=Value
Delphi-Quellcode:
var
xSL: TStringlist;
begin
xSL := TStringlist.Create;
xSL.Assign(Memo1.Lines);
iValue := StrToIntDef(xSL.Values['Key'], 0);
FreeAndNil(xSL);
end;
wenn Value ne zahl ist
