Approximatrix Forums — dlgrequesttext problem

Re: dlgrequesttext problem

2016-03-22T18:51:55Z

Just wanted to post an update - I have dlgrequesttext working again under XP. It seemed to be related to issues with AppGraphics' embedded Win32 resources conflicting with the default icon/manifest resources that Simply Fortran was adding to the compiled program. I'm not sure why the conflict only seemed to be occurring on XP, but everything is working now. The fix will appear in version 2.27, scheduled to be released in the next few weeks.

Re: dlgrequesttext problem

2016-03-09T14:41:14Z

Good deal. Cannot stay with XP forever but I will long as possible.

Re: dlgrequesttext problem

2016-03-05T17:51:32Z

The dlgrequesttext function does indeed fail on XP. I'll have to do some digging, but I've at least been able to replicate the issue.

Re: dlgrequesttext problem

2016-03-04T17:11:06Z

Ran clean for me on Win 10 64bit Bob

Re: dlgrequesttext problem

2016-03-01T03:24:05Z

XP, 32 bit

Re: dlgrequesttext problem

2016-03-01T01:24:20Z

There are no settings. What version of Windows are you using, and is it 32- or 64-bit? I'll try to replicate the issue.

The text request dialog, like a few of the others, are not "native, pre-packaged Windows dialogs." There is a resource file compiled into AppGraphics that implements these dialogs. They are substantially more complicated than, for example, a simple message box.

Re: dlgrequesttext problem

2016-02-29T22:02:54Z

Jeff,

i ran your routine in a project ( all by itself) and it did same as my code been doing. That is : it flies thru the call to dlgrequesttext without pausing and displaying the dialog/request. No execution error. Seems to just ignore - on my machine (2.26 installed couple days back). Wonder if there's a setting ....???

Re: dlgrequesttext problem

2016-02-29T15:40:10Z

Do you have any more context for this code? I just tried a trivial example, and it seems to work:

program request
use appgraphics
implicit none

    character(50)::text

    text = " "

    if(dlgrequesttext(text, "Request", "Enter Text")) then
        Print *, text
    else
        Print *, "Cancelled"
    end if

end program request

dlgrequesttext problem

2016-02-28T18:31:14Z

used this fn reference per document

rtn = dlgrequesttext(dr_inp, ttl, lbl)
rtn - logical
dr_- inp, ttl, lbl character(len=1024)

nothing happening for me. Most of the other dlg's did work for me