Ver Mensaje Individual
  #13  
Antiguo 24-03-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por gcc32 Ver Mensaje
...
¿Otra pregunta, como elimino los dos puntos de la hora para poder operar como si fuera un numero? Ej: 22:47:00 -> 224700
...
Pues sencillamente puedes reemplazar los dos puntos( por vacio('') haciendo algo así:
Código Delphi [-]
Label1.Caption:=StringReplace(TimeToStr(Now),':','',[rfReplaceAll]);
ahora si lo quieres como número entero podría ser así:
Código Delphi [-]
entero:=StrToInt(Trim(StringReplace(TimeToStr(Now),':','',[rfReplaceAll])));
.
Aunque en éste ultimo he agregado la funcion Trim para eliminar los espacios en blanco ya sea por delante o al final, ya que tal parece se obtiene un error si no se lo hace,ya que al hacer la transformacion y reeplazo se obtiene un espacio en blanco al final. .
Espero te sea de utilidad..
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 24-03-2010 a las 23:29:11.
Responder Con Cita