I use Delphi 7 and 5.0.26-community-nt
Code: Select all
DROP TABLE IF EXISTS `abc_pm`.`vendor_of`;
CREATE TABLE `abc_pm`.`vendor_of` (
`vendor_id` int(10) unsigned default NULL,
`producer_id` int(10) unsigned default NULL
) ENGINE=InnoDB DEFAULT CHARSET=latin1;
Code: Select all
ZTable1.Edit; // the same happen also with TZQuery
ZTable1.FieldByName('producer_id').AsVariant := 1; << exception raised
ZTable1.Post;
For this, is not possible to use lookup fields
NOTE: I'VE FIXED THE PROBLEM USING INTEGER SIGNED FIELD TYPE
Bye.