if not (Query1.FieldByName('Field1').isnull) then Edit1.Text := Query1.FieldByName('field1').asString;
利用字段对象的IsNull属性,如下:if Not Query1.FieldByName('FieldName').IsNull then Edit1.Text := Query1.FieldByName('FieldName').AsString;
if Not Query1.FieldByName('FieldName').IsNull or Not Query1.FieldByName('FieldName').Asstring='' then Edit1.Text := Query1.FieldByName('FieldName').AsString;
Edit1.Text := Query1.FieldByName('field1').asString;
Edit1.Text := Query1.FieldByName('FieldName').AsString;
Edit1.Text := Query1.FieldByName('FieldName').AsString;