Re: hypertext documentation

From: [at]} <robert.d.campbell{>
Date: Tue, 11 Dec 2001 09:11:35 +0000 (GMT)

This is how I solve the Open in Browser problem;
surely there is an easier way!


Regards


Robert Campbell



MODULE LibMisc2

PROCEDURE SetToTop* (title : Views.Title) : BOOLEAN;
  VAR
    win : Windows.Window;
    wTitle : Views.Title;
    wnd : USER32.Handle;
    ret : INTEGER;
  BEGIN
    win := Windows.stdDir.First ();
    WHILE win # NIL DO
      win.GetTitle (wTitle);
      IF wTitle = title THEN
        wnd := win(HostWindows.Window).wnd;
        ret := USER32.BringWindowToTop (wnd);
        ret := USER32.ShowWindow (wnd, USER32.SWShowNormal);
        RETURN TRUE
      END;
      win := Windows.stdDir.Next (win)
    END;
    RETURN FALSE
  END SetToTop;

END LibMisc2






    ok := LibMisc2.SetToTop (title$);
    IF ~ok THEN StdApi.OpenBrowser (path, title, v) END;



> Hello Blackbox users,
>
> I am writing some hypertext documentation for an application. I use
> StdCmds.OpenBrowser in the hypertext links to open new documents. What I
> would really like to do is bring the document to the front of the window
> stack if it is already open instead of opening a second copy of it. Does
> anyone know how to do this?
>
> Thanks
>
> Andrew
> --------------------------------------------

--------------------------------------------

To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
   blackbox-request{([at]})nowhere.xy

To get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.

Send any problem reports or questions related to this email list to the list owner at
   owner-blackbox{([at]})nowhere.xy
Received on Tue Dec 11 2001 - 09:11:35 UTC