Frage : Akte, die sich an Größe erhöht

Wie, jedes Mal wenn wir zurück in den VBA Code erhalten, scheint die Dateigröße zunimmt drastisch… manchmal um 1MB… und uns didn; t tun wirklich alles,…, das wir noch 2003 für verschiedene Gründe… anders als Öffnung verwenden und reparierend, die scheint, es zu schrumpfen eine Spitze, gibt es irgendwelche einfachen Tricks zu die Akte unten zu einer handlichen Größe zurückbekommen?

Antwort : Akte, die sich an Größe erhöht

nach der Zuordnung des Aktenweges Pfostenmethode des Datensatzes benennen:

Verfahren TForm1.cxImage1PropertiesCustomClick (Absender: TObject);
anfangen
     wenn OpenPictureDialog1.Execute dann
     anfangen
           YourDataSet.FieldByName („PicPath ").AsString: = OpenPictureDialog1.FileName;
           YourDataSet.Post;
           cxImage1.Picture.LoadFromFile (OpenPictureDialog1.FileName);
   Ende;
Ende