Question : Dossier augmentant dans la taille

Semble comme chaque fois que nous obtenons de nouveau dans le code de VBA, la taille de fichier de fichier augmente considérablement… parfois par 1MB… et nous didn ; t font vraiment quelque chose… que nous employons toujours 2003 pour différentes raisons… autre que l'ouverture et réparant qui semble le rétrécir un peu, y a-t-il des tours simples à récupérer le dossier vers le bas à une taille maniable ?
class= de

Réponse : Dossier augmentant dans la taille

appeler la méthode de poteau d'ensemble de données après l'attribution du chemin de dossier :

procédé TForm1.cxImage1PropertiesCustomClick (expéditeur : TObject) ;
commencer
     si OpenPictureDialog1.Execute alors
     commencer
           YourDataSet.FieldByName (« PicPath ").AsString : = OpenPictureDialog1.FileName ;
           YourDataSet.Post ;
           cxImage1.Picture.LoadFromFile (OpenPictureDialog1.FileName) ;
   extrémité ;
extrémité