Alpha Video Training
Results 1 to 4 of 4

Thread: Can I merge these two xdialogs into one?

  1. #1
    Member Graham Wickens's Avatar
    Real Name
    Graham Wickens
    Join Date
    Apr 2000
    Location
    Gloucestershire, UK
    Posts
    795

    Default Can I merge these two xdialogs into one?

    Please ignore, solved it myself :))
    Last edited by Graham Wickens; 10-19-2019 at 12:03 PM. Reason: Solved it Myself
    --
    Support your local Search and Rescue Unit, Get Lost!

    www.westrowops.co.uk

  2. #2
    Volunteer Moderator
    Real Name
    Alan Buchholz
    Join Date
    Oct 2000
    Location
    Delavan, Wisconsin
    Posts
    9,628

    Default Re: Can I merge these two xdialogs into one?

    Quote Originally Posted by Graham Wickens View Post
    Please ignore, solved it myself :))
    Please share!
    Al Buchholz
    Bookwood Systems, LTD
    Weekly QReportBuilder Webinars Thursday 1 pm CST

    Occam's Razor - KISS
    Normalize till it hurts - De-normalize till it works.
    Advice offered and questions asked in the spirit of learning how to fish is better than someone giving you a fish.
    When we triage a problem it is much easier to read sample systems than to read a mind.

  3. #3
    Member Graham Wickens's Avatar
    Real Name
    Graham Wickens
    Join Date
    Apr 2000
    Location
    Gloucestershire, UK
    Posts
    795

    Default Re: Can I merge these two xdialogs into one?

    My solution was to use the "Popupdone" event on the filename selection

    Code:
    dim shared vShow as l = .f.
    dim shared vLogFileName as c = filename_decode("[logPath]\*.log")
    vResult = ui_dlg_box("Enter Logging",<<%dlg%
    {Background=#204+153+255}
    {Font=Comic Sans MS,8}
    {region}
    [%p=ui_get_file("Input Log Filename","Log(*.Log)|Text (*.txt)",vLogFileName,"X");I=$a5_smart_file%.81vLogFilename!vLogFileNameEvent_*];
    {endregion};
    {condition=(vShow=.t.)}
    Log: [%mw%.40,20vLogFileText!vLogEditEvent_*];
    {endregion}
    {region}
    <15OK!OK><15Cancel!CANCEL>
    {endregion};
    %dlg%,<<%code%
    if left(a_dlg_button,18) = "vLogFileNameEvent_" then
    	if a_dlg_button = "vLogFileNameEvent_popupdone" then
    		vLogFileText = ""
    		fp = file.open(vLogFileName,FILE_RW_SHARED)
    		WHILE .not. fp.eof()
    			text = ut(fp.read_line())
    			vLogFileText = vLogFileText+text+crlf()
    		END WHILE
    		fp.close()
    		vShow = .t.
    		a_dlg_button = ""
    	end if
    	a_dlg_button = ""
    end if
    if left(a_dlg_button,14) = "vLogEditEvent_" then
    	if a_dlg_button = "vLogEditEvent_Killfocus" then
    		save_to_file(vLogFileText,vLogFileName)
    		a_dlg_button = ""
    	end if
    	a_dlg_button = ""
    end if
    %code%)
    --
    Support your local Search and Rescue Unit, Get Lost!

    www.westrowops.co.uk

  4. #4
    Volunteer Moderator
    Real Name
    Alan Buchholz
    Join Date
    Oct 2000
    Location
    Delavan, Wisconsin
    Posts
    9,628

    Default Re: Can I merge these two xdialogs into one?

    Thank you!
    Al Buchholz
    Bookwood Systems, LTD
    Weekly QReportBuilder Webinars Thursday 1 pm CST

    Occam's Razor - KISS
    Normalize till it hurts - De-normalize till it works.
    Advice offered and questions asked in the spirit of learning how to fish is better than someone giving you a fish.
    When we triage a problem it is much easier to read sample systems than to read a mind.

Similar Threads

  1. SQL and xDialogs
    By Ronald Anusiewicz in forum Windows Desktop Applications
    Replies: 1
    Last Post: 11-28-2015, 09:05 PM
  2. Problem with a merge begin and merge end
    By CharlesParker in forum Mobile & Browser Applications
    Replies: 7
    Last Post: 11-01-2015, 09:45 PM
  3. Embedded xDialogs
    By johnkoh in forum Alpha Five Version 9 - Desktop Applications
    Replies: 3
    Last Post: 07-20-2012, 02:27 PM
  4. xdialogs in V9
    By JH10 in forum Application Server Version 9 - Web/Browser Applications
    Replies: 2
    Last Post: 10-04-2009, 01:37 PM
  5. xdialogs and entry
    By DaveM in forum Alpha Five Version 7
    Replies: 5
    Last Post: 02-04-2008, 11:17 AM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •