Hello Jeff,

If you omit "App.Window.Close;" then End_Message stay on browser page and you 
can reload the page for a new connection.

I've updated Tutorial_03 with this exit procedure.

Regards, Pascal.
http://blady.pagesperso-orange.fr


> Le 16 avr. 2016 à 19:59, Jeffrey R. Carter <jrcar...@acm.org> a écrit :
> 
> On 04/16/2016 10:53 AM, Jeremiah Breeden wrote:
>> User_Data.Window.Close is just for child windows that are launched according
>> to the comments in the Gnoga code base.  Close_Connection does close the
>> connection, but it doesn't push the HTML_On_Close and you do still get some 
>> of
>> the swapping still (though only like 2 swaps now...not endless).  I haven't
>> found a very clean or reliable way to close a connection via user input in
>> multi-connect yet.  Maybe someone else knows a good way?
> I do something similar:
> 
>   procedure On_Quit (Object : in out Gnoga.Gui.Base.Base_Type'Class) is
> 
>      App : constant App_Ptr := App_Ptr (Object.Connection_Data);
> 
>      View : Gnoga.Gui.View.View_Type;
> 
>   begin -- On_Quit
> 
>      App.View.Remove;
> 
>      View.Create (Parent => App.Window.all);
> 
>      View.Put_Line (Message => End_Message);
> 
>      App.Window.Close;
> 
>      App.Window.Close_Connection;
> 
>   exception -- On_Quit
> 
>   when E : others =>
> 
>      Gnoga.Log (Message => "On_Quit: " & Ada.Exceptions.Exception_Information 
> (E) );
> 
>   end On_Quit;
> 
> where End_Message is also passed to HTML_On_Close. Seems to work OK.
> 
> -- 
> Jeff Carter
> "I soiled my armor, I was so scared."
> Monty Python & the Holy Grail
> 71


------------------------------------------------------------------------------
What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
patterns at an interface-level. Reveals which users, apps, and protocols are 
consuming the most bandwidth. Provides multi-vendor support for NetFlow, 
J-Flow, sFlow and other flows. Make informed decisions using capacity 
planning reports. https://ad.doubleclick.net/ddm/clk/305295220;132659582;e
_______________________________________________
Gnoga-list mailing list
Gnoga-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gnoga-list

Reply via email to