Skip to content

Commit

Permalink
Merge pull request #20 from mlipok/Split-MoveUDF
Browse files Browse the repository at this point in the history
Split-Move UDF
  • Loading branch information
mlipok authored Sep 27, 2023
2 parents 14350bf + 02b621b commit 84c1244
Show file tree
Hide file tree
Showing 11 changed files with 13,441 additions and 13,389 deletions.
13,636 changes: 363 additions & 13,273 deletions LibreOfficeWriter.au3

Large diffs are not rendered by default.

2 changes: 0 additions & 2 deletions LibreOfficeWriter_Char.au3
Original file line number Diff line number Diff line change
Expand Up @@ -49,8 +49,6 @@
;_LOWriter_CharStyleSpacing
;_LOWriter_CharStyleStrikeOut
;_LOWriter_CharStyleUnderLine
;_LOWriter_FontExists
;_LOWriter_FontsList
; ===============================================================================================================================

; #FUNCTION# ====================================================================================================================
Expand Down
3,540 changes: 3,540 additions & 0 deletions LibreOfficeWriter_DirectFormating.au3

Large diffs are not rendered by default.

6 changes: 0 additions & 6 deletions LibreOfficeWriter_Doc.au3
Original file line number Diff line number Diff line change
Expand Up @@ -97,7 +97,6 @@
;_LOWriter_DocZoom
; ===============================================================================================================================


; #FUNCTION# ====================================================================================================================
; Name ..........: _LOWriter_DocBookmarkDelete
; Description ...: Selete a Bookmark.
Expand Down Expand Up @@ -466,8 +465,6 @@ Func _LOWriter_DocClose(ByRef $oDoc, $bSaveChanges = True, $sSaveName = "", $bDe
If Not IsString($sSaveName) Then Return SetError($__LOW_STATUS_INPUT_ERROR, 3, 0)
If Not IsBool($bDeliverOwnership) Then Return SetError($__LOW_STATUS_INPUT_ERROR, 4, 0)



If Not $oDoc.hasLocation() And ($bSaveChanges = True) Then
$sSavePath = @DesktopDir & "\"
If ($sSaveName = "") Or ($sSaveName = " ") Then
Expand Down Expand Up @@ -577,7 +574,6 @@ Func _LOWriter_DocConnect($sFile, $bConnectCurrent = False, $bConnectAll = False
$oDesktop = $oServiceManager.createInstance("com.sun.star.frame.Desktop")
If Not IsObj($oDesktop) Then Return SetError($__LOW_STATUS_INIT_ERROR, 2, 0)


If Not $oDesktop.getComponents.hasElements() Then Return SetError($__LOW_STATUS_DOC_ERROR, 3, 0) ; no L.O open
$oEnumDoc = $oDesktop.getComponents.createEnumeration()
If Not IsObj($oEnumDoc) Then Return SetError($__LOW_STATUS_INIT_ERROR, 3, 0)
Expand Down Expand Up @@ -1046,7 +1042,6 @@ Func _LOWriter_DocCreateTextCursor(ByRef $oDoc, $bCreateAtEnd = True, $bCreateAt

If Not IsObj($oCursor) Then Return SetError($__LOW_STATUS_INIT_ERROR, 3, 0)


Return SetError($__LOW_STATUS_SUCCESS, $iCursorType, $oCursor)
EndFunc ;==>_LOWriter_DocCreateTextCursor

Expand Down Expand Up @@ -1737,7 +1732,6 @@ Func _LOWriter_DocFindNext(ByRef $oDoc, ByRef $oSrchDescript, $sSearchString, By

If ($oRange.IsCollapsed()) Then Return SetError($__LOW_STATUS_INPUT_ERROR, 8, 0)


If ($oLastFind = Null) Then ;If Last find is not set, then set FindRange to Range beginnign or end, depending on SearchBackwards value.
$oFindRange = ($oSrchDescript.SearchBackwards() = False) ? $oRange.Start() : $oRange.End()
Else ;If Last find is set, set search start for beginning or end of last result, depending SearchBackwards value.
Expand Down
7,159 changes: 7,159 additions & 0 deletions LibreOfficeWriter_Field.au3

Large diffs are not rendered by default.

2,479 changes: 2,376 additions & 103 deletions LibreOfficeWriter_Helper.au3

Large diffs are not rendered by default.

1 change: 0 additions & 1 deletion LibreOfficeWriter_Internal.au3
Original file line number Diff line number Diff line change
Expand Up @@ -1861,7 +1861,6 @@ Func __LOWriter_FieldCountType($vInput)

If IsObj($vInput) Then


For $i = 0 To UBound($asFieldTypes) - 1
If $vInput.supportsService($asFieldTypes[$i]) Then Return SetError($__LOW_STATUS_SUCCESS, 0, $i)
Sleep((IsInt($i / $__LOWCONST_SLEEP_DIV)) ? 10 : 0)
Expand Down
File renamed without changes.
File renamed without changes.
5 changes: 2 additions & 3 deletions LibreOfficeWriter_Par.au3
Original file line number Diff line number Diff line change
Expand Up @@ -7,8 +7,8 @@

#include "LibreOfficeWriter_Doc.au3"
#include "LibreOfficeWriter_Cursor.au3"
#include "LibreOfficeWriter_NumStyle.au3"
#include "LibreOfficeWriter_PageStyle.au3"
#include "LibreOfficeWriter_Num.au3"
#include "LibreOfficeWriter_Page.au3"

; #INDEX# =======================================================================================================================
; Title .........: Libre Office Writer (LOWriter)
Expand Down Expand Up @@ -73,7 +73,6 @@
;_LOWriter_ParStyleUnderLine
; ===============================================================================================================================


; #FUNCTION# ====================================================================================================================
; Name ..........: _LOWriter_ParObjCopy
; Description ...: "Copies" data selected by the ViewCursor, returning an Object for use in inserting later.
Expand Down
2 changes: 1 addition & 1 deletion LibreOfficeWriter_Table.au3
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@
#include "LibreOfficeWriter_Helper.au3"
#include "LibreOfficeWriter_Internal.au3"

#include "LibreOfficeWriter_PageStyle.au3"
#include "LibreOfficeWriter_Page.au3"

; #INDEX# =======================================================================================================================
; Title .........: Libre Office Writer (LOWriter)
Expand Down

0 comments on commit 84c1244

Please sign in to comment.