Copiar los 6 primeros carateres de una cadena

[Ledian_Fdez]

Hola amigos de este foro:

Existe alguna funcion que me permita copiar de una cadena una x cantidad de carateres a partir de una posicion determinada. No recuerdo bien pero me parece que lo hacia de esta forma. lko que ahora no me sale:

cadena := copytostr(micadena,0,6);

pero no me reconoce el comando copytostr.

como podria hacerlo?

saludos
Ledian

[Caro]

Hola, debes utilizar Copy.


cadena := copy(micadena,1,6);


Saluditos

[MAXIUM]

Me pregunto cuantos milisegundos se ahorran sin usar funciones.


Var
Cadena:= String[6];
MiCadena:= String;
Begin
Cadena:= MiCadena;
....
....
....
End;

[Al González]

También puedes usar la función LeftStr:
Str2 := LeftStr (Str1, 6);

[roman]

Me pregunto cuantos milisegundos se ahorran sin usar funciones.


Var
Cadena:= String[6];
MiCadena:= String;
Begin
Cadena:= MiCadena;
....
....
....
End;


Ingenioso. Aunque los milisegundos que ganas los pierdes en los bytes de la variable extra :D

// Saludos