FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Extraer Decimales De Un Numero
Buenas tengo una duda como puedo extraer los decimales de un numero, o simplemente como extraeer los dos unltimos caracteres de una string, tengo instalado delphis 6, trate con ansisrightstr pero no reconoce la funcion se que algo estoy asiendo mal pero ni idea de que es, si alquien puede iluminarme el camino se lo agradeceria, por favor con un ejemplo, gracias.
Última edición por dec fecha: 07-04-2009 a las 15:28:39. |
#2
|
||||
|
||||
Hola, para extraer los decimales de un número puedes utilizar la función Frac
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#3
|
||||
|
||||
Hola luis vazquez,
La respuesta de caro es correcta, siempre y cuando conviertas el numero string a real. Ahora bien, si el número lo tienes en string y lo que deseas es obtener los decimales en formato string puedes hacer uso de RightStr(). Esta función devuelve pertenece a la unidad StrUtils (disponible desde D6). La otra opción es emplear Copy() para copiar los 2, 3 o la cantidad de caracteres que representan a los decimales. Revisa la ayuda sobre el uso de RightStr(). Saludos, PD: Mi inglés me está fallando, no se si es RigthStr() o RightStr() |
#4
|
||||
|
||||
Hola, si quieres obtener los ultimos caracteres de una cadena puedes utilizar RightStr.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#6
|
|||
|
|||
gracias por sus respuestas pero.....
trate de usar el rightstr pero me dice que no esta declarado y la verdad no se como declarar la funcion, trate de hacerlo antes del begin del procedure en unboton pero me da todo en blancon, no regresa nada.
procedure TForm1.Button1Click(Sender: TObject); function RightStr(const AText: string; ACount: Integer): string; begin end;// si no pongo el begin y el end me genera error. begin label1.caption:=RightStr('Programmer', 7); end; la verdad ando mas enrredado que perro con 3 colas, agradeceria una respuesta, nunca he usado funciones y se que es cencillo pero no entiendo como declararlas gracias por su prontas respuestas especialmente a caro |
#7
|
||||
|
||||
Hola luis vazquez,
No hay declarar la función. La función ya fue declarada y pertenece a la unidad StrUtils, como lo he expresado unos post antes. Intuyo que el error que te da se debe a que no declaraste en uses la unidad correspondiente. Saludos, |
#8
|
||||
|
||||
Hola, el error es porque debes añadir en uses la unidad StrUtils como te ha indicado Delphius.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#9
|
|||
|
|||
Gracias
Gracias Por Sus Concejos, Todo Funciono Bien Despues De Meter El Strutil En Su Lugar, Ya Termine El Programa Y Aprendi Nuevas Cosas Muchas Gracias Por Su Ayuda:d
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Número con decimales | blueicaro | OOP | 5 | 01-11-2007 11:16:40 |
Extraer un numero de un sttring?? | danytorres | Varios | 2 | 09-08-2006 15:43:47 |
Numero con dos decimales | zvf | OOP | 9 | 07-04-2006 20:27:06 |
Numero decimales en un double | satabel | Impresión | 1 | 23-07-2005 18:09:23 |
Número de decimales en Access | javiermorales | Conexión con bases de datos | 1 | 15-09-2004 21:24:39 |
|