Funciones sobre String

[RdlP]

Hola, buenas, soy nuevo y ya me leí la Guía de estilo.

Mi duda es si en Delphi 7 existe alguna función que dada una cadena tipo "hola" te devuelva los X caracteres de la izquierda o de la derecha.

Por ejemplo: Derecha(hola,2) devolvería "la", ¿existe? y si no ¿como lo podría hacer?

Gracias

[ixMike]

Hola. Bienvenido, y bien por leerte la guía

Puedes utilizar la función Copy.

Empezado por Ayuda de Delphi

The Copy function returns a substring of a string.

S is a string-type expression. Index and Count are integer-type expressions. Copy returns a string containing Count characters starting at S[Index].

If Index is larger than the length of S, Copy returns an empty string.

If Count specifies more characters than are available, the only the characters from S[Index] to the end of S are returned.

Combinada con la función Length. Algo así:

Código Delphi [-]
function Izquierda(const S: String; Count: Integer): String;
begin
Result:=Copy(S, 1, Count);
end;

function Derecha(const S: String; Count: Integer): String;
begin
Result:=Copy(S, Length(S)-Count, Count);
end;

Nota: la función "Izquierda" la puedes sustituir por la misma función Copy.


Salu2

[[Delphius]]

Lamento darte una mala noticia ixMike, acabas de reinventar la rueda. Existe la función LeftStr y RightStr, ambas declaras en la unit StrUtils.

Al menos desde la versión 6 están disponibles, desconozco si están en la 4 o 3, pero en la 7 seguro.

Saludos,

[ixMike]

Empezado por Delphius

ixMike, acabas de reinventar la rueda.

No sería la primera vez . De hecho, hasta pensé en poner un post acerca de ello.

...¡ni se te ocurra robarme la idea, ¿eh?!

[[Delphius]]

Empezado por ixMike

No sería la primera vez . De hecho, hasta pensé en poner un post acerca de ello.

...¡ni se te ocurra robarme la idea, ¿eh?!

Querrás decir que tu me la quieres robar, porque en varias ocasiones he abierto post en donde tras una serie de mensajes terminaba descubriendo que la rueda existía.

No te preocupes, no eres el único que sufre de eso... yo lo vivo casi a diario.

Saludos,

[ixMike]

Empezado por Delphius

No te preocupes, no eres el único que sufre de eso...

¿Sufrir? ¡A mí me encanta! Por dos motivos:

-Demuestra originalidad, y capacidad para desarrollar un algoritmo.
-Me gusta "ahorrar" en uses

Ah!, y esto demuestra otra cosa: hilo desvirtuado (a partir de ahora, "h.d." ó "+1" después del saludo)


Salu2.

[h.d.]
(+1)