FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
problemas, convertir fecha desde un string
que tal gente
he estado buscando este tipode ayuda pero no encuentro una solucion uso un grid y desde ahi voy a validar una fecha dada de esta forma '201207' para que me la convierta de esta forma '20/12/2007' tengo este codigo perome marca error Código:
var aFeha : string; Fecha : Date; begin aFecha := Grid.Cells[0, aRow]; //toma el valor de la celda Fecha := StrtoDateTime(aFecha); // me merca el error end; saludos |
#2
|
|||
|
|||
1. que error te da?
2. Cambia el tipo de variable de Date a TDate(e incluso te diría que usaras un TDateTime que es mejor) Y creo que con la segunda solución ya se subsanará el error, sino pasaremos a cosas más mejores. Un saludo espero haberte ayudado. |
#3
|
|||
|
|||
que tal, TAL jeje
oye muchas gracias por tu ayuda, mira cambiando como dices, me sale el mismo error Project ejemplos.exe raised exception class EConvertError with message "121212" is not a valid date' de esta forma quedo el codigo Código:
var aFeha : string; Fecha : TDateTime; begin aFecha := Grid.Cells[0, aRow]; //toma el valor de la celda Fecha := StrtoDateTime(aFecha); // me merca el error end; |
#4
|
|||
|
|||
Asegurate de que Afecha vale '201207' y luego y por si acaso que está en buen formato.
Código:
function CadAFec(const AFecha:string):TdateTime; var cad : string; begin cad := Afecha[1]+Afecha[2]+'/'+Afecha[3]+Afecha[4]+'/'+ Afecha[5]+Afecha[6]+Afecha[7]+Afecha[8]); result := strtoDatetime(cad); end También puedes usar esta función que le pasas el formato de la fecha StrToDateFmt(Afecha,'ddmmyyy'); Prueba a ver que tal. Un saludo. |
#5
|
|||
|
|||
Eres ungenio jejeje
Funciono del todo bien, solo un comentario me lo guarda de esta forma '12/Dic/2008' cuando introdusco =12/Dic/2008= se podria guardar de esta forma '12/12/2008' en verdad muchas gracias por tu ayuda saludos |
#6
|
|||
|
|||
A mandar, para eso estamos
|
#7
|
||||
|
||||
Esto lo convierte:
var FStr: string; Fecha: Date; begin with Grid do FStr:= Copy(Cells[0,aRow],1,2) + '/' + Copy(Cells[0,aRow],3,2) + '/' + Copy(Cells[0,aRow],6,4); Fecha:= StrToDate(FStr); end; |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
convertir string a pchar | rzf1983 | Varios | 5 | 22-10-2007 19:17:33 |
convertir string | jsanchez | Varios | 3 | 31-07-2006 22:23:19 |
convertir un String en TTreeNode | jmlifi | Varios | 3 | 26-08-2005 15:56:01 |
Convertir un String en Pchart | eyscom | Varios | 1 | 28-03-2004 15:51:30 |
Convertir un string a puntero | jnrico | Varios | 1 | 27-05-2003 16:29:47 |
|