Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
1
Programming / Re: Drag and Drop
« on: January 26, 2023, 03:46:23 AM »
Mike
Thank you. I'll take a look at it.
Thank you. I'll take a look at it.
2
Programming / Re: Drag and Drop
« on: January 25, 2023, 01:34:04 AM »
Devon,
I want to drag files from a PxPlus listbox and drop it on a control of an external application.
I want to drag files from a PxPlus listbox and drop it on a control of an external application.
3
Programming / Drag and Drop
« on: January 24, 2023, 01:28:48 AM »
I have a listbox containing filenames and want to drag a file from it to another non-PxPlus-application. How can I do that?
4
Nomads / Re: cell editing
« on: July 29, 2022, 04:02:54 AM »
I wasn't aware of 'GridMLVersion'.
That comes close, yes. I hope they accept it.
Thank you.
That comes close, yes. I hope they accept it.
Thank you.
5
Nomads / cell editing
« on: July 28, 2022, 03:09:00 AM »
A customer wants to end cell editing with <ENTER> and move to the next editable cell according to the tabmode.
I tried:
I tried:
Code: [Select]
preinput [next] $09$ ---> does nothing
preinput [next] -1015 ---> moves to next control
How can I achieve this?
6
Programming / Re: ERR option ignored
« on: July 25, 2022, 01:21:13 AM »
Mike
The error is thrown by the NEW() function. The constructor as already been left, so I cannot check anything inside the object any more.
The error is thrown by the NEW() function. The constructor as already been left, so I cannot check anything inside the object any more.
7
Programming / ERR option ignored
« on: July 20, 2022, 10:42:32 AM »
For a few weeks we encounter a strange error 65 every now and then, when our programs create a COM object.
According to Eric we should check for the object reference > 0. But I wonder why the err option is ignored in these cases.
Code: [Select]
ON_CREATE:
def object outlook, "[LCL]Outlook.Application", err = *next
if not(tcb(2)) then nameSpace = outlook'getNameSpace("MAPI")
returnThis has been a save way ever since. On the WindX side MSG(-1) returns "Exception occured (err/ret=2/0)"According to Eric we should check for the object reference > 0. But I wonder why the err option is ignored in these cases.
8
Wish List / Re: query version of ODBC-driver
« on: March 07, 2022, 07:29:26 AM »
Stéphane
That works pretty good. Thank you.
That works pretty good. Thank you.
9
Wish List / Re: query version of ODBC-driver
« on: March 04, 2022, 02:00:38 AM »
I want to retrieve this information at runtime. SQLGetInfo sounds promising. Can you please post a sample? I can't find anything in the docs.
10
Wish List / query version of ODBC-driver
« on: March 03, 2022, 09:11:40 AM »
I would like to query the version of the local ODBC-driver and the SQL-server.
11
Nomads / Re: redefining keys
« on: February 25, 2022, 02:09:13 AM »
I did so and the DD shows no names any more. But fin(1,"FILE_CREATE") still returns the old names.
12
Nomads / redefining keys
« on: February 24, 2022, 07:25:45 AM »
I removed kno #2 and #3 from a file and added a new kno #2. After a click on "Update File" that kno has the name of the old kno #2.
The segment notation is correct but the name is wrong. How can I get rid of it?
The segment notation is correct but the name is wrong. How can I get rid of it?
15
Programming / Re: pass composite string to an extended command
« on: December 23, 2021, 02:18:02 AM »
Mike,
Two ENTERs? Nice! I never thought of that.
Here is what I use finally:
Two ENTERs? Nice! I never thought of that.
Here is what I use finally:
Code: [Select]
ENTER
LOCAL param$,cmd$,var$
ENTER param$
LET param$=STP(param$,2)
LET cmd$="dim var$:iol("+param$+")"
EXECUTE cmd$
LET var$=VIS(param$)
PRINT LST(IOL(var$))
PRINT SUB(var$,SEP,"~")
END