Idemsoft-Alfonso Zafón
There is other way.
_At form event "on load" :_
WP_Info_Tex:=New object("IsNewDocument";True)
WP_Info_Tex.DocumentInfo:=New
object("FilePath";"";"Modification";False)
_inside the area:_
if ((form event=On data change) &
(not(WP_Info_Tex.DocumentInfo.Modification)))
WP_Info_Tex.DocumentInfo.Modification:=True
end if
When you want to know if it has been changed:
if (WP_Info_Tex.DocumentInfo.Modification)
....
end if
regards.
idem
Alfonso Zafón
Tel: +34 963 455 103
Email: [email protected] <mailto:[email protected]>
Web: www.idemsoft.com <http://www.idemsoft.com>
Idemsoft, S.L.
Pza. Tetuán, 11
46003Valencia- España
Gestión - Hoteles -Inmobiliarias - Abogados
WEB - Tienda Online - Enlace Web
El 02/08/2019 a las 21:16, Tom Benedict via 4D_Tech escribió:
Thanks for the confirmation David.
Tom
On Aug 2, 2019, at 12:13, David Ringsmuth <[email protected]> wrote:
Tom,
You’ll need to get the content of the 4D Write document and compare the old to the new to know if it has been changed.
David Ringsmuth
From: Tom Benedict via 4D_Tech <mailto:[email protected]>
Sent: Friday, August 2, 2019 10:27 AM
To: 4D iNug Technical <mailto:[email protected]>
Cc: Tom Benedict <mailto:[email protected]>
Subject: 4D Write Pro Equivalent of wr modified?
I want to know if a 4D Write Pro document has been modified. In 4D Write Classic the command is WR GET AREA PROPERTY(WriteArea;wr modified;$isModified) which does just that. Is there a similar 4D Write Pro attribute which can tell me this?
I’ve dug around in the documentation but haven’t found anything yet. I know I can get the modification date time from the document using OB Get(WriteObject;"dateModified”), but that’s doesn’t tell me whether the document is ‘dirty’ (has any unsaved changes). I guess I could store that value when the document is opened, then compare it later. I’m hoping there is something built in.
Tom Benedict
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive: http://lists.4d.com/archives.html <http://lists.4d.com/archives.html>
Options: https://lists.4d.com/mailman/options/4d_tech
<https://lists.4d.com/mailman/options/4d_tech>
Unsub: mailto:[email protected]
<mailto:[email protected]>
**********************************************************************
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive: http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:[email protected]
**********************************************************************
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive: http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:[email protected]
**********************************************************************
