[[duilioisola]]

dato1-dato2; fecha

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]);
   //Desde el principo 
   Dato1 := Copy(SList.Lines[i], 1, PosMenos);
   //Desde la posición de - 
   Dato1 := Copy(SList.Lines[i], PosMenos, PosPuntoYComa-PosMenos);
   //Desde la posición de ;
   Fecha := Copy(SList.Lines[i], PosPuntoYComa, Length(SList.Lines[i]-PosPuntoYComa));