Hola harimuya.
Te faltó aclarar de que tipo son las siguientes declaraciones:
Código Delphi
[-]
type
TArrayDesconocido = array[1..???] of Integer;
TDataGraf = record
Idx: Integer; Nom: string[??];
Hora: string[??];
Line: TArrayDesconocido;
end;
var
DataGraf: TDataGraf;
Henry: File of TDataGraf;
Path,Destino: string;
IniGra: Integer;
PosIniX: Integer;
IniIDx : Integer;
LetIni: Integer;
Caract: string;
wData: string;
CadenaSub: string;
VInt: TArrayDesconocido;
A partir de estas suposiciones, que bién pueden ser incorrectas, el código compila.
Pero... también te falto:
.La estructura de los datos que están en el TMemo ya que al poner cualquier texto, recibí error de conversión en la línea:
Código Delphi
[-]VInt[IniGra] := StrToInt(wData);
. La cabecera del procedimiento central (varios nombres que declaré en var, sé que son argumentos).
Para poder verificar el por qúe de la demora, deberías poner el código completo de las funciónes que nos presentas, un ejemplo de lo que puede contener el Memo y una descripción somera de lo que realiza el código.
Un saludo.