me hace falta un componente para trabajar con fechas y bases de datos

[vic_ia]

Empezado por fearlex

... el problema es que cuando no hay ninguna fecha guardada en el campo me pone por defecto una fecha de 1889 y a mi esa fecha no me sirve pero si cada vez que el usuario tenga que introducir un registro tiene que hacer click constante para selecionar la fecha entonces no es etico, espero me ayuden

me supongo que ese componente trabaja igual que el otro que te sugirieron, una forma simple de hacer lo que quieres (que cuando el usuario no haya introducido fecha no se registre fecha alguna en el campo) puedes poner en el beforepost de tu tabla una verificación de forma :

Código Delphi [-]
if Picker.Text = '' then tabla.campo.clear;

espero te sirva...

saludos...

[fearlex]

[quote=vic_ia](que cuando el usuario no haya introducido fecha no se registre fecha alguna en el campo) [quote]
no el problema es que en el campo de la tabla no se guarda nada pero miren paso por paso:
cuando agrego un registro nuevo me pone por defecto esa fecha en como decir el text del campo, por ke no tiene esa propiedad, la que tiene es date
si yo no le pongo nada cuando salvo el me guarda en blanco, no me guarda nada pero lo que quiero es que por defecto coja la fecha de la makina que la tengo almacenada en una variable globlal, entienden ?
de veras que no se que hacer ya llevo semanas en esto y no acabo de dar con la solucion ??
gracias de todas formas

[roman]

Empezado por fearlex

lo que quiero es que por defecto coja la fecha de la makina que la tengo almacenada en una variable globlal

¡Ah! Entonces puedes asignarla en el evento OnNewRecord del dataset asociado:

Código Delphi [-]
procedure Form1.Table1NewRecord(DataSet: TDataSet);
begin
  DataSet['fecha'] := Now();
end;

// Saludos

[fearlex]

Empezado por roman

¡Ah! Entonces puedes asignarla en el evento OnNewRecord del dataset asociado:

Código Delphi [-]
procedure Form1.Table1NewRecord(DataSet: TDataSet);
begin
  DataSet['fecha'] := Now();
end;

// Saludos

Ops no entendi dond ees que se pone eso, ni a que te refieres con el dataset ni con fecha, explicame si puede que significan cada uno por ke no entendi despues de tantas horas de agobio ya casi no razono pero tengo que seguir por ke debo terminarlo cuanto antes, gracias mil gracias amigo...

[marcoszorrilla]

Aquí tienes un ejemplo:

Código Delphi [-]
procedure TDmNes.RecibosBeforePost(DataSet: TDataSet);
begin
 if DmNes.RecibosFecha.Value = null then
 DmNes.RecibosFecha.Clear;
end;

DmNes es un DataModule en donde está alojada la tabla Recibos y como es lógico Fecha es el campo que queremos controlar que no contenga valores nulos.

Un Saludo.

[roman]

Empezado por marcoszorrilla

Código Delphi [-]
procedure TDmNes.RecibosBeforePost(DataSet: TDataSet);
begin
 if DmNes.RecibosFecha.Value = null then
 DmNes.RecibosFecha.Clear;
end;

Disculpa Marcos pero en realidad este código no hace nada. El método Clear de TField lo que hace es precisamente poner en Null el valor del campo de manera que es como poner:

Código Delphi [-]
procedure TDmNes.RecibosBeforePost(DataSet: TDataSet);
begin
 if DmNes.RecibosFecha.Value = null then
   DmNes.RecibosFecha.Value := null;
end;

[marcoszorrilla]

Es que por ejemplo en Paradox, sino haces esto te coloca la fecha 1899 o algo así y de esta manera deja el campo vacio totalmente, no contiene ningún valor, como si el usuario no hubiera escrito absolutamente nada.

Un Saludo.

[fearlex]

muchas grcias ya me funciona, de de veras que se los agradezco por ke estaba botado con el problemita ese, gracias mil gracias, y como dato les dire que la forma que dijo Roman fue la que me funciono, sale perfecto y la otra pues voy a probarla en estos instantes pero es que estaba tan emocionado que en cuanto me funciono quise agradecer.........gracias mil

Saludos desde cuba amigos

[roman]

Empezado por vic_ia

Código Delphi [-]
if Picker.Text = '' then tabla.campo.clear;

Sólo que el DateTimePicker, y supongo que el mencionado DBTimePicker tampoco, no tiene una propiedad Text.

Por otro lado, la fecha de 1899 muy posiblemente se deba a que el DBTimePicker traduce un valor null (como lo será en un nuevo registro) a cero, que- traducido a tipo TDateTime -corresponde a 30/12/1899.

El problema con el DateTimePicker es precisamente que no maneja de forma nativa el concepto de fechas nulas. Y, sinceramente, cualquier control db que maneje fechas debiera tener en cuenta esto.

// Saludos

[fearlex]

Empezado por roman

Por otro lado, la fecha de 1899 muy posiblemente se deba a que el DBTimePicker traduce un valor null (como lo será en un nuevo registro) a cero, que- traducido a tipo TDateTime -corresponde a 30/12/1899.

El problema con el DateTimePicker es precisamente que no maneja de forma nativa el concepto de fechas nulas. Y, sinceramente, cualquier control db que maneje fechas debiera tener en cuenta esto.

// Saludos

Exacto esa es la fecha, sabes como podria controlar eso por ke de veras que me tiene loco el problema ??

[marcoszorrilla]

La solución que te propone Vic_ia es válida, simplemente tienes que controlar el evento BeforePost del Ttable, ahí compruebas si la fecha es nula ó no, y si es nula pues:

MiFecha.Clear;

De esta manera no se graba absolutamente nada.

Como veras tanto el DateTimePicker como el componente que dices has conseguido no tienen ningún problema, el problema es controlar cuando el usuario no introduce nada.

Un Saludo.

[roman]

Empezado por marcoszorrilla

Como veras tanto el DateTimePicker como el componente que dices has conseguido no tienen ningún problema, el problema es controlar cuando el usuario no introduce nada.

Lamento diferir en este punto. La cuestión es precisamente que con el DateTimePicker no es posible "no introducir nada" y por ende no hay forma directa de guardar una fecha nula en la base. A juzgar por la descripción de fearlex, el DBTimePicker al menos guarda fechas "cero" (léase 30/12/1899) como nulos, pero esto tampoco es solución en los casos en los que tal fecha sea un valor válido (p. ej. la fecha de nacimiento de mi abuelo). Pero por otro lado está la cuestión de que la mencionada componente, al igual que el DateTimePicker interpretarán fechas nulas como 30/12/1899. El problema en principio se resuelve en registros nuevos con la técnica del evento OnNewRecord pero ¿qué pasará cuando no se trate de registros nuevos sino de registros ya existentes con fechas nulas o si no se desea dar ningún valor por defecto al campo fecha?

// Saludos