FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Convertir caracter a codigo ASCII
Hola a todos,
En Visual Basic, para convertir un caracter cualquiera a su representación a código ASCII se utiliza la funcion ASC() Cuál es su traduccion Delphi ? Muchas gracias. |
#2
|
||||
|
||||
Ord
// Saludos |
#3
|
|||
|
|||
Error con Ord()
He utilizado la funcion Ord(), pero me encuentro con lo siguiente:
valor := Ord(MidStr(texto, 4, 1)); -> El compilador dice "Incompatible types". valor := Ord('c'); -> Funciona. Nota: valor es de tipo double, texto es un string. ¿ Por qué el compilador no acepta la primera instruccion ? Gracias. |
#4
|
||||
|
||||
Cita:
Lo que puedes hacer es asignar el resultado de MidStr a una variable String temporal S y pasar a ord el primer caracter: Ord(S[1]); // Saludos |
#5
|
||||
|
||||
Bueno, en realidad no necesitas la variable temporal, puedes hacerlo directamente:
valor := Ord(MidStr(texto, 4, 1)[1]); pero se ve un poco feillo // Saludos |
#6
|
|||
|
|||
Ya me funciona Ord()
Lo he probado y me ha funcionado.
Muchas gracias por responder tan rápidamente . |
#7
|
|||
|
|||
Mas simple seria:
Valor := Ord( texto[4] ); Saludos |
#8
|
||||
|
||||
Cita:
// Saludos |
#9
|
|||
|
|||
Gracias a todos
Si, veo que será mas facil, pero lo del ejemplo era eso, un ejemplo. En mi aplicacion, el 4 se cambia por una variable que se incrementa en funcion de un For.
Gracias. |
#10
|
|||
|
|||
Que el 4 sea una variable no impide que puedas usar la forma sencilla, que por otra parte es la forma normal que usa todo el mundo ya que es la mas rapida en tiempo de ejecucion, de hacer lo que pides. Usar MidStr es infinitamente mas lento que acceder directamente al caracter en concreto del string.
Saludos |
#11
|
|||
|
|||
Claro, ya veo.
Ah, pues muchas gracias, lo tendré en cuenta.
|
#12
|
|||
|
|||
al revés?
me pueden decir como hacer lo contrario osea pasar un ascii a caracter?
|
#13
|
||||
|
||||
Chr
Ej: Chr(65) --> 'A' // Saludos |
#14
|
||||
|
||||
Cita:
Saludos..
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|