diff options
| author | Behrend Cornelius <bc@openoffice.org> | 2002-10-16 09:34:10 +0000 |
|---|---|---|
| committer | Behrend Cornelius <bc@openoffice.org> | 2002-10-16 09:34:10 +0000 |
| commit | 815de4b23e5b9beffa0cb7e85ffb34555497d55d (patch) | |
| tree | eb6c47f6f2d4350ebcfdadfcd47d4eaadb871a2f /wizards/source/tools/Strings.xba | |
| parent | f13b1b61efdee23824fce005e5a195a4401000cd (diff) | |
#104114# New Function 'CreateNewDocument' added
Diffstat (limited to 'wizards/source/tools/Strings.xba')
| -rw-r--r-- | wizards/source/tools/Strings.xba | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/wizards/source/tools/Strings.xba b/wizards/source/tools/Strings.xba index 29427f286018..7a5e8872cac8 100644 --- a/wizards/source/tools/Strings.xba +++ b/wizards/source/tools/Strings.xba @@ -43,8 +43,6 @@ Dim BigLen%, PreLen%, PostLen% BigLen = Len(BigString) PostLen = Len(PostString) FindPartString = Mid(BigString,StartPos + PreLen, EndPos - (StartPos + PreLen)) - ' Da diese Funktion dafür programmiert wurde, in einer Schleife abgearbeitet zu werden - ' muss die initiale Suchposition hinter die Position des gefundenen Teilstrings gesetzt werden. SearchPos = EndPos + PostLen Else Msgbox("No final tag for '" & PreString & "' existing", 16, GetProductName()) |