Search:

Not a bug in the Picture property.
The description says:
"Returns/sets the background picture. Requires comctl32.dll version 6.0 or higher."

So it is a limitation in the SysListView32 that your...

removed

Edit: Oops just noticed you have code for VBA 7. (LongPtr)

I just tested and noted this now out as well with a vanilla Host UserControl and vanilla Child UserControl and it bombs out with "Out of Memory".
However, this is something I cannot fix in the VBCCR...

I just made a vanilla UC host and the ReadProperties is fired before the Resize event.
Something in your code is out of order and will force an resize event before.

Option Explicit

Private Sub...

It's a very bad idea to make some code involving the child usercontrol in the host usercontrol inside the UserControl_Initialize() event. The UC Ambient.UserMode property is not meaningful at that...

UserControl_Initialize is the worst place ever. Use it only to set variables. Shift your code to UserControl_ReadProperties.

When you find a way of changing it without re-creation, please advise. However, I could have gone like the MS RichTextBox and throw out an error when attempting to change at runtime.

Changing the ScrollBars to vbVertical triggers internally a re-creation of the rich text box.
So try to put the code before you load the 6MB file for a quick fix.
However, I would like to test...

The real code is: (from an IntValue variable, -1 is just the default for the API)

PropTabMinWidth = IntValue

SendMessage TabStripHandle, TCM_SETMINTABWIDTH, 0, ByVal CLng(PropTabMinWidth)

True. BUT. How is the 0 Integer get extended to Long 0?
It needs to read 2 bytes off somewhere.
I experienced the problem in comctl32.dll that a "ByVal -1" got interpret as -2321345 (example value)...

Be carefull. "ByVal 0" is actually an Integer. If the API expects a Long then 2 bytes are off. It can cause "surprise errors".
To avoid this use "ByVal 0&".

The VBCCR.ListBoxW supports more than 32,767 items. It also can scroll beyond 65,535. (16-bit barrier)
...

Yes, as soon the edit looses focus (hWndEdit destroyed = 0) the .EditText returns a NullString.

Use the .EditText property. :-)
The .Text property is still original text while editing and will be updated once editing was validated.

You could add a resource file into the compiled exe. (e.g. ResourceHacker)

To avoid the "flash" catch the "EditSetupWindow" event and set the .ComboButtonValue to 'FlexComboButtonValueDisabled'.
This will avoid that the drop-down list will be shown initially. Then at the...

Use the .ComboButtonValue property and set to 'FlexComboButtonValueUnpressed' to collapse the drop-down list.
At best you place that line of code in the "EnterEdit" event.

Or XML text. Many public authorities, at least in Germany, do persist their records as XML. (e.g. resident registration for interchange between systems)

No. SysListView32 does not support it.

The fastest approach for VB6 is to compile the sqlite 3 library with __stdcall instead of __cdecl.

You may use the Documentation and Update/Compile Utility from MountainMan to upgrade all references in all Forms from VBCCR16 to VBCCR17.

Done. :)

The blue marked code was now inserted into the DataSource property.


If PropFixedRows > 0 Then
For iCol = 0 To (PropFixedCols - 1)
VBFlexGridColsInfo(iCol).Key =...

MSFlexGrid has no .ColKey/.ColIndex ...
So if VSFlexGrid behave as Test 3 then I will check this out soon and maybe implement your change into the "master" version.

When you use .ColIndex and did not assign .ColKey before then you get the error.
Your Test 2 is the correct approach.
Test 3 is also ok. But on each update you need to keep your changes in mind.

Thanks. Done

You use an outdated "Startup.bas".
Please download the complete VBFlexGridDemo and replace everything. (FlexInitIDEStopProtection does not exist anymore since a while)

Update related to yesterday's bugfix.

Included new flags RCPF_FORCETOPROWMASK and RCPF_FORCELEFTCOLMASK which is used in the internal SetRowColParams method.

Private Sub SetRowColParams(ByRef...

This is a bug. I see in the screen that you have the .ScrollBars property set to 'Vertical'.
In the normal MS(H)FlexGrid this will result that the LeftCol will not change upon mouse clicks and key...

VBCCR17 is planned to be last major release. People also have a desire for a constant stable release.
If any bugs appear they will be of course fixed.

So feel free to make another fork..

IMO any hooks should reside in an App and not in this package.

So you can use the CommandButtonW.ToolTipText property and use this Code to enable Unicode and multi-line. (See bottom post by...

The ToolTipText property of the main object itself (VBControlExtender, e.g. CommandButtonW1.ToolTipText etc.) are the intrinsic properties by VB6 and thus ANSI.

Only ToolTipText properties in...

If turning VisualStyles to False then you can define the BackColor property on the StatusBar control. No magic in this case.

The ItemSelect event is intended. The V6 MS.ListView behaves the same.
However, the V5 MS.ListView behaves different.

You can make the AutoSelectFirstItem property set to False (mimic V5 MS...

This is what I often use to signal attention.
It flashes as long until it gets clicked by the user.
(No timer needed as the FlashWindowEx has flags to let the OS time it)

Private Type FLASHWINFO...

Use the SetCapture API on your UserControl.hWnd. then you will get the MouseUp event. (MouseUp manual raise only when DragDetect is 0.)

But why raise MouseUp when the mouse is still down?

If DragDetect returns 1 then the mouse button is still down(?)

If DragDetect returns 0 then raise event 'MouseUp' manually within your UserControl. The message is already eaten by the API and it is ensured the mouse is up, so it is safe to raise the event...

A byte array passed to a Sub which has ByRef as Variant can have the VT_BYREF flag.

VBFlexGrid.HitTest is a Sub. The return values are stored as property .HitResult/.HitRow/.HitCol.

ComputeControlSize is also a Sub. The params are passed ByRef. So use variables.