Wird nicht gespeichert oder wird (eventuell unbemerkt) garnicht aufgerufen?
Gibt es einen Unterschied zwischen F9 und Strg+F9?
Der IOTAModuleServices müsste eine Funktion SaveAll haben, wenn Du den Aufruf noch mit in Dein BeforeCompile hineinbringen könntest, müsste das einem Betätigen von "Alles speichern" entsprechen.
Die einzige Literatur, die das "SaveAll" erwähnt und die ich dazu gefunden habe, ist für Delphi 6 und in Spanisch:
http://www.marteens.com/pdfs/TheDarkSideOfDelphi6.pdf
Oder
Extending the Delphi IDE
In der (eingebetteten) PDF nach
ACCESSING THE IDE suchen und dann analog zu
Delphi-Quellcode:
// check if the BorlandIDEServices global variable is assigned
if Assigned(BorlandIDEServices)
then
begin
// access the IOTAModuleServices interface implemented in BorlandIDEServices and call CloseALL to close all modules
(BorlandIDEServices
as IOTAModuleServices).CloseAll;
end;
mal mit
Delphi-Quellcode:
// check if the BorlandIDEServices global variable is assigned
if Assigned(BorlandIDEServices)
then
begin
// access the IOTAModuleServices interface implemented in BorlandIDEServices and call SaveALL to save all modules
(BorlandIDEServices
as IOTAModuleServices).SaveAll;
end;
versuchen.
Keine Ahnung, ob das was bringt
