5. Juli 2011 16:18
IF EXISTS('\\192.168.80.30\Ablage_ET-Artikel$\'+BomComponent[Level]."No." + '.BMP') THEN BEGIN
Item.Picture.IMPORT('\\192.168.80.30\Ablage_ET-Artikel$\'+BomComponent[Level]."No." + '.BMP',FALSE);
Item.CALCFIELDS(Picture);
END ELSE BEGIN
CLEAR(Item.Picture);
END;
8. Juli 2011 09:51