Re: [libreoffice-users] Base : How to control insert into a form in order to generat my own keys by macro ?

Hi Patrick,
> So, if I set the property {AllowInserts = false}, do the Form stop to
> handling the insert but continue to fired /"Before Record Action"/ and
> /"After Record Action"/ events ? I think no, because the form could will
> not display the new line to insert ...

You will need "Before Record Action". After the action the data will be
inserted.
You will also need AllowInserts = true. Without this you couldn't get
the cursor in a new row.
The macro should do something like this:

SUB InsertStop(oEvent AS OBJECT)
DIM oFormFeature AS OBJECT
DIM oFormOperations AS OBJECT
oFormFeature = com.sun.star.form.runtime.FormFeature
IF oEvent.Source.ImplementationName =
"org.openoffice.comp.svx.FormController" THEN
oFormOperations = oEvent.Source.FormOperations
YourInsertFunction()
oFormOperations.execute(oFormFeature.UndoRecordChanges)
REM oFormOperations.execute(oFormFeature.MoveToLast)
END SUB

The YourInsertFunction() does exist, or do I understand your mail the
wrong way?

Regards

Robert
-- 
Homepage: http://robert.familiegrosskopf.de
LibreOffice Community: http://robert.familiegrosskopf.de/map_3


-- 
To unsubscribe e-mail to: users+unsubscribe@global.libreoffice.org
Problems? https://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: https://wiki.documentfoundation.org/Netiquette
List archive: https://listarchives.libreoffice.org/global/users/
Privacy Policy: https://www.documentfoundation.org/privacy