Ver Mensaje Individual
  #1  
Antiguo 07-06-2006
nenufer nenufer is offline
Miembro
 
Registrado: dic 2005
Posts: 90
Reputación: 19
nenufer Va por buen camino
Cambiar el caption de un boton segun el registro

Buenas a tod@s!! Pues bien como dice el titulo me gustaria cambiar el caption de un boton segun el registro. Explico:
Tengo una tabla clientes y un campo es Fecha_Baja.
Me gustaria que si el cliente que esta mostrando en ese momento tiene fecha_baja nula que me muestre en el caption Baja sino que me muestre Alta.
El codigo que tengo hecho lo he puesto en el afterSroll:

Código Delphi [-]
procedure TDM.TblClientesAfterScroll(DataSet: TDataSet);
begin
  if TblCientessFecha_baja.Value = null then
    FrmClientes.Btnbaja.Caption := 'Baja'
  else
    FrmClientes.Btnbaja.Caption := 'Alta';
end;

Con este codigo me da un error: 'Acces violation at address 058113E8 in module project.exe. Read of address 0000033C'

Me muestra el error este pero la ejecucion sigue, pero el caption me lo muestra mal. Siempre muestra Alta

Los datos los muestro con dbedits y utilizo TTables. Puede ser que sea por el TTable el error?

Si alguien me puede ayudar gracias de antemano.
Responder Con Cita