Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Bug fix on forced data type #108

Merged
merged 3 commits into from
Jul 22, 2024
Merged

Bug fix on forced data type #108

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
290f6d9
Bug fix on forced data type
6DiegoDiego9 Jul 22, 2024
d93237d
Update changelog.md
sancarn Jul 22, 2024
b462ded
Merge branch 'master' into patch-4
sancarn Jul 22, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions changelog.md
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -313,3 +313,4 @@ Before `08/07/2021` a change log was not kept. We have retrospectively gone back
- 2024-07-14 `stdWindow` FEATURE - Add `PGUP` and `PGDOWN` alias for `SendKeys`
- 2024-07-22 `stdWindow` FIX - Remove unused variable `minStackSize`.
- 2024-07-22 `stdAcc` FIX - Remove unused variable `minStackSize`.
- 2024-07-22 `stdWindow` FIX - Remove enforced `LongLong` in `stdWindow::Create`.
2 changes: 1 addition & 1 deletion src/stdWindow.cls
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -579,7 +579,7 @@ Private This as TThis
'wnd.visible = true
'```
#If VBA7 Then
Public Function Create(ByVal sClassName As String, ByVal x As Long, ByVal y As Long, ByVal width As Long, ByVal height As Long, Optional ByVal sCaption As String = vbNullString, Optional ByVal dwStyle As Long = WS_POPUP, Optional ByVal dwStyleEx As Long = 0, Optional ByVal hWndParent As LongPtr = 0^, Optional ByVal hMenu As LongPtr = 0^, Optional ByVal hInstance As LongPtr = 0^, Optional ByVal lpParam As Long = 0) As stdWindow
Public Function Create(ByVal sClassName As String, ByVal x As Long, ByVal y As Long, ByVal width As Long, ByVal height As Long, Optional ByVal sCaption As String = vbNullString, Optional ByVal dwStyle As Long = WS_POPUP, Optional ByVal dwStyleEx As Long = 0, Optional ByVal hWndParent As LongPtr = 0, Optional ByVal hMenu As LongPtr = 0, Optional ByVal hInstance As LongPtr = 0, Optional ByVal lpParam As Long = 0) As stdWindow
#Else
Public Function Create(ByVal sClassName As String, ByVal x As Long, ByVal y As Long, ByVal width As Long, ByVal height As Long, Optional ByVal sCaption As String = vbNullString, Optional ByVal dwStyle As Long = WS_POPUP, Optional ByVal dwStyleEx As Long = 0, Optional ByVal hWndParent As Long = 0, Optional ByVal hMenu As Long = 0, Optional ByVal hInstance As Long = 0, Optional ByVal lpParam As Long = 0) As stdWindow
#End If
Expand Down
Loading