Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   TdateTimePicker a variable (https://www.clubdelphi.com/foros/showthread.php?t=79197)

moviuz 14-06-2012 22:27:48

TdateTimePicker a variable
 
hola quisiera saber como hacer para recibir en una variable la fecha de un tdatetimepicker
lo que yo entendí he intente implementar fue esto

Código Delphi [-]
var
dorRec.Fecha=String
begin
docRec.fecha:=SeleccionadorDeFecha.DateFormat;

igual intente con esto

Código Delphi [-]
docRec.fecha:=DateToStr(SeleccionadorDeFecha.DateFormat);

y esto lo quiero hacer mandarlo a una base de datos donde tengo un campo llamado fecha de tipo date

marcoszorrilla 14-06-2012 22:32:42

Código Delphi [-]
Fecha:=DateTimePicker.Date;

Un Saludo.

moviuz 14-06-2012 22:38:00

si lo realizo como me sugieres me marca este error

incompatible types : 'string' and 'TDate'

Casimiro Noteví 14-06-2012 23:20:13

Has dicho que lo vas a guardar en un campo date en una base de datos, para ello deberás
usar una variable date y no una string, que es el error que te sale.

Código Delphi [-]
var
  dFecha : TDateTime;
  cFecha : string;
begin
  dFecha := datetimepicker.Date;
  cFecha := datetostr(datetimepicker.Date);
end;

moviuz 15-06-2012 02:04:19

ahora si lo guardo en una variable, pero al momento de mandar la variable para la inserción no respeta el formato que le había asignado el de yyyy-MM-dd que es como una de las formas que lo recibe mysql

ecfisa 15-06-2012 04:01:49

Cita:

Empezado por moviuz (Mensaje 435143)
ahora si lo guardo en una variable, pero al momento de mandar la variable para la inserción no respeta el formato que le había asignado el de yyyy-MM-dd que es como una de las formas que lo recibe mysql

Hola.

Basándome en el ejemplo que te puso Casimiro, creo que podrías hacer:
Código Delphi [-]
var
  OldShortDateFormat: string;
  dateS : string;
  dateD : TDateTime;
begin
  // Salvar formato
  OldShortDateFormat:= ShortDateFormat; 
  // Cambiar formato
  ShortDateFormat:= 'yyyy-MM-dd';  
  // Operaciones
  dateD:= DateTimePicker1.Date;
  dateS:= DateToStr(DateTimePicker1.Date);
  //...
  // Restaurar formato
  ShortDateFormat:= OldShortDateFormat;

Saludos.

moviuz 15-06-2012 05:47:18

El aporte de cada uno de ustedes fue muy agradecido :ecfisa,Casimiro Notevi,marcoszorrilla ya quedo la inserción en la base de datos , realmente me han ahorrado un unos 2 métodos mas ,muchas gracias


La franja horaria es GMT +2. Ahora son las 17:12:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi