sono qua di nuovo con il mio problema che non mi salva i dati ma ho aperto un nuovo post in quanto ho visto il motivo ma non lo capisco. Prima avevo reinstallato Libreoffice e sembrava a posto solo in quanto per le prove avevo tolto il full screen ai miei form.
Premetto che:
uso FORM ESTERNI al database, fogli writer.
per essere sicuro di non avere nessun problema e fare un po di pulizia ho fatto un bel Format e adesso e' tutto nuovo e aggiornato.
Vengo al punto, nei miei Form ho dei pulsanti di uscita collegati a una macro, se esco dal Form con il pulsante non salva i dati nel database, se esco usando il pulsante di Writer mi salva il tutto.
Allego le macro, che, ci tengo anche a precisare ho sempre usato.
Grazie se avete qualche idea.
Codice: Seleziona tutto
sub finestra_close( oEvent as object )
ThisComponent.CurrentController.Frame.close(True)
end sub
REM -----------------------------------------------------
public sub ExitBase
dim oForm as object
dim oFormLM as object
dim i as integer
oForm = Thiscomponent
oFormLM = oForm.CurrentController.Frame.LayoutManager
for i = lbound(oFormLM.elements) to ubound(oFormLM.elements)
oFormLM.showElement(oFormLM.elements(i).resourceurl)
next i
oForm.refresh
oForm.currentController.frame.close(true)
end sub