Entonces debes buscar la posición de - (el menos) y leer este dato en una variable mediante desde la posición 1 hasta la posición encontrada.
Luego buscas la posición del ; (punto y coma) y extraes el dato2
Finalmente, desde ; hasta el final será la fecha.
Código Delphi
[-]
PosMenos := Pos('-',SList.Lines[i]);
PosPuntoYComa := Pos(';',SList.Lines[i]);
Dato1 := Copy(SList.Lines[i], 1, PosMenos);
Dato1 := Copy(SList.Lines[i], PosMenos, PosPuntoYComa-PosMenos);
Fecha := Copy(SList.Lines[i], PosPuntoYComa, Length(SList.Lines[i]-PosPuntoYComa));