CitrixGetWindowStyle Function

Action

Returns the style and the extended style of the specified window.

Include file

CitrixAPI.bdh

Syntax

CitrixGetWindowStyle( in  nWindow   : number,
                      out nStyle    : number allownull,
                      out nExtStyle : number optional ): boolean;

Return value

  • true if the function succeeds

  • false otherwise

Parameter Description
nWindow Window handle returned by a call to CitrixWaitForWindowCreation or the SearchWindow functions.
nStyle Retrieves the style of the specified window. When only the extended style is of interest, null may be specified.
nExtStyle Retrieves the extended style of the specified window (optional).

Example:

  transaction TMain
  var
    nWindowHandle  : number;
    i              : number;
    iStyle         : number;
    iExtStyle      : number;
  begin
    CitrixInit(640, 480);
    CitrixConnect("myserver", "myusername", "mypass", "mydomain", COLOR_16bit);
    CitrixWaitForLogon();
    hWnd6 := CitrixWaitForWindowCreation("ICA Seamless Host Agent", MATCH_Exact, 0x94C800C4, 0, 0, 390, 223);
    CitrixWaitForWindow(hWnd6, EVENT_Activate);
    CitrixWaitForWindowCreation("Program Manager");
    CitrixMouseClick(182, 195, hWnd6, MOUSE_ButtonLeft);
    CitrixWaitForWindow(hWnd6, EVENT_Destroy);
    ThinkTime(2.78);
    CitrixMouseDblClick(38, 22, DESKTOP, MOUSE_ButtonLeft);
    hWnd8 := CitrixWaitForWindowCreation("My Documents", MATCH_Exact, 0x16CF0000, 285, 31, 268, 205);
    CitrixWaitForWindow(hWnd8, EVENT_Activate);
    i := 0;
    nWindowHandle := CitrixGetWindow(i);
    while (nWindowHandle > 0) do
      CitrixGetWindowStyle(nWIndowHandle, iStyle, iExtStyle);
      print("window " + string(nWindowHandle)
                      + "; style: " + string(iStyle)
                      + "; ext style: " + string(iExtStyle));
      i := i + 1;
      nWindowHandle := CitrixGetWindow(i);
    end;
    CitrixMouseClick(258, 13, hWnd8, MOUSE_ButtonLeft);
    CitrixWaitForWindow(hWnd8, EVENT_Destroy);
    CitrixDisconnect();
  end TMain;