[Libreoffice-bugs] [Bug 144745] New: Base, Text [VARCHAR] fields problems in tables, forms; Makro; Version: 7.1.6.2 (x64) bug, Version: 7.0.6.2 (x64) ok

[bugzilla-daemon at bugs.documentfoundation.org]

https://bugs.documentfoundation.org/show_bug.cgi?id=144745

            Bug ID: 144745
           Summary: Base, Text [VARCHAR] fields problems in tables, forms;
                    Makro; Version: 7.1.6.2 (x64) bug, Version: 7.0.6.2
                    (x64) ok
           Product: LibreOffice
           Version: 7.1.6.2 release
          Hardware: x86 (IA32)
                OS: Windows (All)
            Status: UNCONFIRMED
          Severity: normal
          Priority: medium
         Component: Base
          Assignee: libreoffice-bugs at lists.freedesktop.org
          Reporter: bugReportLOm at protonmail.com

Description:
Base 
HSQLDB odb, Java Version 8 Update 301
Windows 10.0 Build 19043

Text [VARCHAR] fields:

The Text [VARCHAR] fields show the following problems in:
Version: 7.1.6.2 (x64) / LibreOffice Community
Build ID: 0e133318fcee89abacd6a7d077e292f1145735c3
CPU threads: 6; OS: Windows 10.0 Build 19043; UI render: Skia/Raster; VCL: win
Locale: de-DE (de_DE); UI: de-DE
Calc: CL

but not in: 
Version: 7.0.6.2 (x64)
Build ID: 144abb84a525d8e30c9dbbefa69cbbf2d8d4ae3b
CPU threads: 6; OS: Windows 10.0 Build 19043; UI render: Skia/Raster; VCL: win
Locale: de-DE (de_DE); UI: de-DE
Calc: CL

If one copies and paste text into such a field, no new data set is saved. One
must add an empty space at the end to save the new data set. This occurs in
forms and tables.
If one moves the mouse over a field with changed format, the field is shown in
the standard format.

Makro:

Robert Grosskopf provided this helpful Makro to directly open an internet link
or LO file from a text field in a base form:

REM  *****  BASIC  *****

SUB Website_Aufruf(oEvent AS OBJECT)
        REM Aufruf einer Website oder des Mailprogramms mit einer vorgegebenen
Mailadresse
        DIM oFeld AS OBJECT
        DIM oShell AS OBJECT
        DIM stFeld AS STRING
        oFeld = oEvent.Source
        REM Den Text aus der Dateiauswahl auslesen
        stFeld = oFeld.Text
        IF stFeld = "" THEN
                EXIT SUB
        END IF
        IF InStr(stFeld,"@") THEN
                stFeld = "mailto:"+stFeld
        ELSEIF InStr(stFeld,"http://") OR InStr(stFeld,"https://") THEN
                stFeld = convertToUrl(stFeld)   'convertToUrl erkennt, dass mit
http:// bereits eine Verbindung vorgegeben ist. file:/// wird nicht gesetzt
        ELSE    
        END IF
        REM Start des Files mit der entsprechenden URL-Verbindung
        oShell = createUnoService("com.sun.star.system.SystemShellExecute")
        oShell.execute(stFeld,,0)
END SUB

This worked with:
Version: 7.0.6.2 (x64)
Build ID: 144abb84a525d8e30c9dbbefa69cbbf2d8d4ae3b
CPU threads: 6; OS: Windows 10.0 Build 19043; UI render: Skia/Raster; VCL: win
Locale: de-DE (de_DE); UI: de-DE
Calc: CL

With:
Version: 7.1.6.2 (x64) / LibreOffice Community
Build ID: 0e133318fcee89abacd6a7d077e292f1145735c3
CPU threads: 6; OS: Windows 10.0 Build 19043; UI render: Skia/Raster; VCL: win
Locale: de-DE (de_DE); UI: de-DE
Calc: CL

it does not work.
Error message:
BASIC run time error
argument not optional

this line is marked:
oFeld = oEvent.Source

The makro is started by clicking on the text field containing a link. In the
form Properties: Text box, events the makro is connected to "Mouse button
pressed".

The links to be opened by the makro are in fields with Text [VARCHAR].

Actual Results:
no new data set
makro did not run

Expected Results:
new data set
makro starts


Reproducible: Always


User Profile Reset: Yes



Additional Info:
makro Error message:
BASIC run time error
argument not optional

this line is marked:
oFeld = oEvent.Source

-- 
You are receiving this mail because:
You are the assignee for the bug.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.freedesktop.org/archives/libreoffice-bugs/attachments/20210927/7fdcf9f0/attachment-0001.htm>