[InForm] Windows 7's run dialog clone

[Ashish]

This is very impressive work! :D

[FellippeHeitor]

That'll require a merge of TextBox controls and DropdownLists, but once the new type of control exists, it should be easy enough to add. Thanks for trying it!

[Pete]

You're filling up Fell with a lot of work, but strangely enough, it's probably less work than convincing those idiots at Microsoft that Win7 is a far better system then 10, although arguably not as tough as 10. Well, Maybe that's not a fair comparison. My 7 just has to put up with keyboard tapping while my 10 spends it day adding up frequent flyer miles and bouncing off walls.

Pete

[cr0sh]

Whatever happens in regards to Inform - my plea would be to remember to not exclude the other two major operating systems; it seems that so often, a project will start out as being "cross-platform", garnering a lot of support, only later to find itself shutting out everything except Windows (as an original kickstarter supporter for Oculus, their dropping support for Linux really ticked me off, as it was one of the main things that caused me to invest).

Now - I know this dialog is just a clone, and is likely (?) cross compatible and isn't specific to Windows - I'm just putting out a plea and reminder, that there are others out there who use other operating systems besides Windows (and QB64 always being cross-platform in this regard has been a breath of fresh air for so long).

[bplus]

Hi Fellippe,

Does the browse button still work for you with this?

I've tried with 3 versions of QB64 and nothing happens when I click browse. I am wondering if a Windows update changed something.

[FellippeHeitor]

I haven’t checked in a while. I’ll let you know. Are you on Windows 10?

Update: I wrote this sample in a 32bit version of QB64, and it calls a 32bit library, which I assume won't work when we compile with QB64 64bit:

Code: QB64: [Select]

1. DECLARE DYNAMIC LIBRARY "comdlg32" ' Library declarations using _OFFSET types
2.     FUNCTION GetOpenFileNameA& (DIALOGPARAMS AS FILEDIALOGTYPE) ' The Open file dialog
3.     FUNCTION GetSaveFileNameA& (DIALOGPARAMS AS FILEDIALOGTYPE) ' The Save file dialog
4. END DECLARE

[bplus]

I haven’t checked in a while. I’ll let you know. Are you on Windows 10?

Update: I wrote this sample in a 32bit version of QB64, and it calls a 32bit library, which I assume won't work when we compile with QB64 64bit:

Code: QB64: [Select]

1. DECLARE DYNAMIC LIBRARY "comdlg32" ' Library declarations using _OFFSET types
2.     FUNCTION GetOpenFileNameA& (DIALOGPARAMS AS FILEDIALOGTYPE) ' The Open file dialog
3.     FUNCTION GetSaveFileNameA& (DIALOGPARAMS AS FILEDIALOGTYPE) ' The Save file dialog
4. END DECLARE

OK that was in there already. Oh this is Windows only, dang, what a great Browse it was.

[bplus]

@FellippeHeitor So is the Browse button still working for you?

[FellippeHeitor]

I don't have QB64 32bit on this machine and download has been forbidden (corporate network), I'll try it at home tonight and let you know.

[bplus]

Oh! If this requires 32 bit version never mind, but would be interested in this for v1.4, if possible.

[FellippeHeitor]

Does anyone know about comdlg for 64bit systems?

[visionmercer]

I have a program that stays 32 bit because of this problem.I have seen how to do it with VBA here: https://social.msdn.microsoft.com/Forums/en-US/1db77ef4-f363-4e60-b680-6cf1c44e22bd/office-32bit-vs-64bit-comdlg32dll?forum=accessdev
But how to Declare PtrSafe Function in qb64 I do not know.