dbgrid o stringgrid
 

Hola, tengo un problema tengo que cargar una tabla en pantalla de ausentismos donde Muestro el tipo de ausentismo, fecha inicio y la Fecha final , deberia hacer otra columna con cantidad de dias segun fechas y otras columnas mas que no estan en ninguna tabla de la base de datos, sino que con datos que voy trayendo de la BD voy haciendo. Con el dbgrid se puede agregar columnas propias sin leer campos y elaborarlas ejemplo dentro de un while. No me sale.....

Gracias

Hola

Para eso debes crear un campo calculado en tu dataset, realizar la operación en el evento OnCalcFields y lo verás reflejado en tu DBGrid.

Salud OS

dbgrid
 

o sea que si hago un proceso en oncalcfield me agrega una columna ?

Gracias

Bueno, primero debes de agregar un campo calculado en la tabla o query y con el evento OnCalcFields generas las operaciones para asignarles el valor.

Salud OS

dbgrid
 

Disculpame si no entiendo, por ejemplo necesito crear una columna che me diga los dias desde la fecha inicial hasta hoy si el campo fecha final de ausentismo de la persona esta en blanco. Tengo que crear en el query un campo ficticio para que me cree la columna y despues uso el oncalcfields?.


Graciassss

Clic derecho del mouse en tu tabla/query
Clic en fieldseditor,
Clic en newfield,

llenas las propiedades, por ejemplo para los dias

Name = dias
Type = integer

Fieldtype = calculated

clic en OK

Hasta aqui ya tienes el campo calculado.

Ahora en el evento OnCalcFields de la Tabla/Query

Código Delphi [-]
procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
  Table1.FieldByName('dias').AsInteger := Trunc(Table1.fieldbyname('FechaFin').Value -
                                                Table1.fieldbyname('FechaIni').Value);
end;

Existe una función DaysBetween, pero estoy pensando en que no tengas esa función en tu delphi, por cuestiones de versión.

Salud OS

dbgrid
 

Gracias amigoo!! tema solucionado.

Hombre, pues que bueno.

Salud OS