Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Insertar campo nulo en un label (https://www.clubdelphi.com/foros/showthread.php?t=7178)

jrcosta75 06-02-2004 14:27:01

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

__cadetill 06-02-2004 14:35:04

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;

Espero te sirva


La franja horaria es GMT +2. Ahora son las 08:35:37.

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