FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Insertar campo nulo en un label
Necesito saber como introducir una campo nulo de una tabla paradox 7 en un label ubicado sobre un form (Estoy utilizando Delphi 5 Enterprice)
Yo lo hice de la siguiente manera: procedure TForm9.DBGrid1DblClick(Sender: TObject); var dni: Variant; begin dni:=modelodatos.TblOfab.FieldValues['Dni']; Form8.Label41.Caption:=dni; end; pero me arrojo el siguiente error: Proyect Proyect1.exe raised exception class EVariantError with messagge 'Invalid type variant conversion' Process stopped. Use Step or Run to continue Desde ya muchas gracias. Saludos
__________________
Cita:
|
#2
|
|||
|
|||
Si el valor es nulo, "no tiene valor" (y notese las comillas) por lo que podrías asignarle una cadena vacía al Edit
Código:
if modelodatos.TblOfab.FieldByName('Dni').IsNull then Form8.Label41.Caption := '' else Form8.Label41.Caption := modelodatos.TblOfab.FieldByName('Dni').AsString; |
|
|
|