topic-30072

Posts: 933

Joined: Sun Oct 09, 2005 01:05 PM

Close all dialogs
Posted: Fri Jan 30, 2015 12:44 AM

Is there any way to close all open dialogs (without knowing which ones are open) ?
Or is there a way to get a list of all open dialogs ?

Thanks,

Jeff Barnes

(FWH 16.11, xHarbour 1.2.3, Bcc730)

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Close all dialogs
Posted: Fri Jan 30, 2015 08:07 AM

To close all open dialogs:

AEval( GetAllWin(), { |o| If( o:ClassName() == "TDIALOG", o:End(), nil ) } )

Array of all open dialogs:

   local aDlg := {}
   AEval( GetAllWin(), { |o| If( o:ClassName() == "TDIALOG", AAdd( aDlg, o ), nil ) } )

Regards

G. N. Rao.

Hyderabad, India

Posts: 933

Joined: Sun Oct 09, 2005 01:05 PM

Re: Close all dialogs
Posted: Mon Feb 02, 2015 05:41 PM

Excellent. thank you.

Thanks,

Jeff Barnes

(FWH 16.11, xHarbour 1.2.3, Bcc730)

FiveTech Support Forums