Extraer el primer caracter de un string

[roman]

En efecto es un EAccessViolation. No sé por qué, pero capturar estas excepciones siempre me pone nervioso

// Saludos

[delphi.com.ar]

Empezado por roman

En efecto es un EAccessViolation. No sé por qué, pero capturar estas excepciones siempre me pone nervioso

Efectivamente yo prefiero prevenirlas

Empezado por Delphi.com.ar

{Por Caracter (Habría que evaluar que la cadena no este vacía)}

PD: ¿Se dieron cuenta las vueltas que estamos dando para algo tan simple?

[kinobi]

Empezado por roman

En efecto es un EAccessViolation. No sé por qué, pero capturar estas excepciones siempre me pone nervioso

imagino que será por la asociación que hacemos "excepción = error", no siendo realmente así, ya que una excepción es una situación anormal (o "excepcional") que requiere, si es preciso, un tratamiento especial, como es el caso que se discute en este hilo.

Saludos.

[roman]

También podríamos crear una función de carcater general:

Código Delphi [-]
function CasoCaracDe(S: String; Caracs: array of Char; Resuls: array of Integer; Defe: Integer): Integer;
var
  I: Integer;

begin
  Result := Defe;

  for I := Low(Caracs) to High(Caracs) do
    if CaracCade(S) = Caracs[i] then
    begin
      Result := Resul[i];
      break;
    end;
end;

con lo que el código se reduciría a una sóla línea:

Código Delphi [-]
Resultado := CasoCaracDe(S, ['A', 'B', 'C'], [10, 9, 8], 0);

// Saludos

[jachguate]

Parece que hay una nueva función para agregar a alguna biblioteca...

[jachguate]

Por cierto... los que han trabajado con Oracle han de conocer la excepcional funcion decode...

A mi me ha gustado tanto, que no he podido resistirme a la tentación, y tengo mi propio Decode en delphi...

Al final de cuentas, es mas o menos lo que hizo román... pero de caracter mas general.



Por supuesto, pertenece a la unidad jachUtils de la biblioteca jach...

Hasta luego.

[roman]

Empezado por jachguate

pertenece a la unidad jachUtils de la biblioteca jach

No conozco Oracle, ¿podrías platicarnos en qué consiste y si no tienes problema añadirla a romStrUtils?



// Saludos

[kinobi]

Hola,

Empezado por roman

También podríamos crear una función de carcater general:

cierto, pero (y lo hago en defensa de la propuesta que utiliza la gestión de excepciones) el tener la precaución de atrapar la posible excepción es también un método genérico, con la ventaja de que viene implantado en el propio lenguaje sin necesidad de arrastrar funciones externas.

No estoy diciendo que el utilizar funciones externas, como la que has puesto, o a la que se refiere Al, sean una solución peor, sino que, para estos casos, el mecanismo de gestión de excepciones (para Delphi y otros lenguajes que lo implantan) ha demostrado su validez, sencillez y eficacia frente a métodos "tradicionalmente" defensivos (verificar antes que no se dan determinadas circunstancias).

Saludos.

[roman]

Empezado por kinobi

con la ventaja de que viene implantado en el propio lenguaje sin necesidad de arrastrar funciones externas.

¡Caramba kinobi! Pero es que..

... estoy completamente de acuerdo contigo. ¿No lo notas?



// Saludos

[kinobi]

Empezado por roman

... estoy completamente de acuerdo contigo. ¿No lo notas?

Chico, entre tanto CaracCade, tanto CasoCaracDe, tanto Case, tanto If, tanto ... ya no sé siquiera si estoy de acuerdo conmigo mismo.

Saludos.

[roman]

Empezado por kinobi

Chico, entre tanto CaracCade, tanto CasoCaracDe, tanto Case, tanto If, tanto ... ya no sé siquiera si estoy de acuerdo conmigo mismo.

¿Se confunde uno verdad?

En fin, que esto empezó en el sexto mensaje

// Saludos

[jachguate]

Empezado por kinobi

el mecanismo de gestión de excepciones ... ha demostrado su validez, sencillez y eficacia frente a métodos "tradicionalmente" defensivos

Estamos totalmente de acuerdo. Yo no le temo a las excepciones!

bueno... las EAccessViolation me ponen algo nervioso... pero es que también soy humano..

hasta luego.

[roman]

Empezado por jachguate

las EAccessViolation me ponen algo nervioso...

Yo siempre me quedo con la sensación de que voy a tener que comprar memoria nueva



// Saludos

[jachguate]

Empezado por roman

Yo siempre me quedo con la sensación de que voy a tener que comprar memoria nueva

Bueno... debe haber algo equivalente a la cirugia reconstructiva, aunque si es un pretexto para tener una (memoria) realmente nueva, adelante...