TDBF and empty field

[christophe_D]

hello ,

with this code i have a probleme when a field is empty
i have a error "invalide cast" with a TBDF when Myfield (FtString) is empty
MyEdit is a Tedit

Code: [Select]



procedure Tform1.Myprocedure;


begin
  MyEdit.text:=MyBase.fieldValues['MyFiled'];
[../..]
end;


so for the moment i use this code

Code: [Select]



procedure Tform1.Myprocedure;


begin
  if MyBase.fieldValues['MyFiled']<>'' then MyEdit.text:=MyBase.fieldValues['MyFiled'];
[../..]
end;


is there a solution ??
use a a TDBedit , i can't because MyEdit is not use only with MyBase

thank for your answer

[lazarillo]

procedure Tform1.Myprocedure;


begin
  if MyBase.FieldByName('name_field').AsString <>'' then
..................................................

end;

[christophe_D]

procedure Tform1.Myprocedure;


begin
  if MyBase.FieldByName('name_field').AsString <>'' then
..................................................

end;

thanks !!!

i have forget the [.AsString] !!!!