PHP WinBinder: Tab Control 3

UniServer 5-Nano PHP WinBinder.

Tab Control 3

On the previous page we finished with a template script this page covers converting that script into a windows project script.

This means the script is specifically targeting a real application.

Specification

The following modifications and functionality are required to script test_5.phpw

• Static wire boxes for cosmetics
• Only a single instance of the application allowed
• Add a logo-icon to the application window and system tray icon.
• Application minimize to notification area (system tray) and not the Task Bar
• Tab change detection required.

Top

Frame - Static wire boxes

A single control Frame produces a transparent framed box.

Adding a caption produces text top-left on upper edge.

If a caption is not provided the frame is completely closed.

For example:

wb_create_control($tab, Frame, "Change",  185, 14,  92, 110, 0, 0, 0);  // create frame
wb_create_control($tab, Frame, "",          0,  0, 295, 173, 0, 0, 0);  // create frame

The above code will add two frames to tab index 0 (first page)

Top

Single application instance

A single instance application can use this function:

bool wb_get_instance (string caption [, bool bringtofront])

Each main window of all WinBinder applications stores a 32-bit identifier that is calculated according to the initial window caption and is unique to that caption.

wb_get_instance() will try to find, among all current top-level windows, a WinBinder window that was created with the same caption.

The function returns TRUE if it finds the existing window or FALSE if it is does not.

For example this code was added to test 6

//=== 1) Create main window ---------------------------------------------------
define("CAPTION", "Test 6");            // Set caption to match application
if(wb_get_instance(CAPTION, TRUE))      // Is there an existing instance?
    die;                                // Yes: bring it to the front and quit

Top

Add a logo-icon

You can added a image top left of application using the function wb_set_image(parent,path to image)

For example this coded was added to test 6

//=== 3) Assign handler function to the main window  --------------------------
wb_set_handler($mainwin, "process_main");
  wb_set_image($mainwin, "./" . "uslogo.ico");       // Add logo

Top

Application minimize to system tray

To create a window that minimizes itself as an icon in the TaskBar status area, include the WBC_TASKBAR style flag in the style parameter of the wb_create_window function. All operations will be handled automatically.

For example the original line was:

$mainwin = wb_create_window(NULL, AppWindow, "Test 6", 320, 240);

Change to this:

$mainwin = wb_create_window(NULL, AppWindow, "Test 6", WBC_CENTER, WBC_CENTER, 320, 240, WBC_TASKBAR);

Top

Tab change detection

Reason for detecting a tab change is to call a function and update any data on that page that may be out of date.

Tab detection requires additional messages to be passed back to the handler function. These are not enabled by default changes are required to both the window and handler functions.

Create Window Changes

A windows application is instructed to pass additional message using WBC_NOTIFY type of message defined by WBC_HEADERSEL

The following was changed:

$mainwin = wb_create_window(NULL, AppWindow, "Test 6", WBC_CENTER, WBC_CENTER, 320, 240, WBC_TASKBAR);

To this:

$mainwin = wb_create_window(NULL, AppWindow, "Test 6", WBC_CENTER, WBC_CENTER, 320, 240, WBC_NOTIFY| WBC_TASKBAR , WBC_HEADERSEL );

• When a tab is clicked the main tab ID is sent back to the handler function
• In addition the tab index is set to $lparm2

Change Handler function parameters

The handler function requires changing to allow extra parmeter parsing.

This line:

function process_main($window, $id)

Changes to this:

function process_main($window, $id, $ctrl=0, $lparam1=0, $lparam2=0)

Top

Test Code

// TAB Change - Test case 9000; // ID of main TAB $text="ID = $id \n CTRL = $ctrl \n PARAM1 = $lparam1 \n PARAM2 = $lparam2 "; wb_message_box($window, $text,"TAB Pressed.", WBC_INFO); switch($lparam2) { case 0: // Tab index 0 or page 1 wb_message_box($window, "Case 0","TAB 0 Page 1", WBC_OK); // Call init 1 break; case 1: // Tab index 1 or page 2 wb_message_box($window, "Case 1","TAB 1 Page 2", WBC_OKCANCEL); // Call init 2 break; case 2: // Tab index 2 or page 3 wb_message_box($window, "Case 2","TAB 2 Page 3", WBC_WARNING); // Call init 3 break; } break; // END TAB Change - Test

Test code With the above modifications main tab now generates its ID, in this case 9000 on any tab change. For reference a wb_message_box display all parameters passed to the handler function. We are interested in which tab caused the change, its index can be found in $lparam2 hence this is used in a switch. Each tab is resolved using a case statement (resolves tab indexes 0 to 2) In a real application the message box would be replaced with a call to an initialisation function if required for that tab.

Top

Test 6 Script

<?php Include "../php/include/winbinder.php"; // Location Of Winbinder Library //-- Constants ---------------------------------------------------------------- //ID's Page 1 define("ID_L1101", 1101); //Label define("ID_L1102", 1102); define("ID_E1301", 1301); // Edit box define("ID_PB1201", 1201); // Push button define("ID_PB1202", 1202); // Push button define("ID_PB1203", 1203); // Push button //ID's Page 2 define("ID_L2101", 2101); //Label define("ID_L2102", 2102); define("ID_E2301", 2301); // Edit box define("ID_PB2201", 2201); // Push button define("ID_PB2202", 2202); // Push button define("ID_PB2203", 2203); // Push button //ID's Page 3 define("ID_L3101", 3101); //Label define("ID_L3102", 3102); define("ID_E3301", 3301); // Edit box define("ID_PB3201", 3201); // Push button define("ID_PB3202", 3202); // Push button define("ID_PB3203", 3203); // Push button //=== 1) Create main window --------------------------------------------------- define("CAPTION", "Test 6"); // Set caption to match application if(wb_get_instance(CAPTION, TRUE)) // Is there an existing instance? die; // Yes: bring it to the front and quit $mainwin = wb_create_window(NULL, AppWindow, "Test 6", WBC_CENTER, WBC_CENTER, 320, 240, WBC_NOTIFY| WBC_TASKBAR , WBC_HEADERSEL ); //=== 2) Create controls for the main window ---------------------------------- //Create main tab area $tab = wb_create_control($mainwin, TabControl, 0, 5, 5, 305, 200, 9000); //Create Tab 0 - Page 1 wb_create_items($tab, "Page1"); wb_create_control($tab, Label, "Test label A", 10, 14, 112, 20, ID_L1101, 0, 0, 0); wb_create_control($tab, Label, "Test label B", 10, 34, 112, 20, ID_L1102, 0, 0, 0); wb_create_control($tab, EditBox, "", 10, 54, 112, 20, ID_E1301, 0, 0, 0); wb_create_control($tab, PushButton, "Button A", 10, 90, 80, 22, ID_PB1201, 0, 0, 0); wb_create_control($tab, PushButton, "Button B", 100, 90, 80, 22, ID_PB1202, 0, 0, 0); wb_create_control($tab, PushButton, "Button C", 190, 90, 80, 22, ID_PB1203, 0, 0, 0); wb_create_control($tab, Frame, "Change", 185, 14, 92, 110, 0, 0, 0); // create frame wb_create_control($tab, Frame, "", 0, 0, 295, 173, 0, 0, 0); // create frame //Create Tab 1 - Page 2 wb_create_items($tab, "Page2"); wb_create_control($tab, Label, "Test label C", 10, 14, 112, 20, ID_L2101, 0, 0, 1); wb_create_control($tab, Label, "Test label D", 10, 34, 112, 20, ID_L2102, 0, 0, 1); wb_create_control($tab, EditBox, "", 10, 54, 112, 20, ID_E2301, 0, 0, 1); wb_create_control($tab, PushButton, "Button D", 10, 90, 80, 22, ID_PB2201, 0, 0, 1); wb_create_control($tab, PushButton, "Button E", 100, 90, 80, 22, ID_PB2202, 0, 0, 1); wb_create_control($tab, PushButton, "Button F", 190, 90, 80, 22, ID_PB2203, 0, 0, 1); //Create Tab 2 - Page 3 wb_create_items($tab, "Page3"); wb_create_control($tab, Label, "Test label E", 10, 14, 112, 20, ID_L3101, 0, 0, 2); wb_create_control($tab, Label, "Test label F", 10, 34, 112, 20, ID_L3102, 0, 0, 2); wb_create_control($tab, EditBox, "", 10, 54, 112, 20, ID_E3301, 0, 0, 2); wb_create_control($tab, PushButton, "Button G", 10, 90, 80, 22, ID_PB3201, 0, 0, 2); wb_create_control($tab, PushButton, "Button H", 100, 90, 80, 22, ID_PB3202, 0, 0, 2); wb_create_control($tab, PushButton, "Button I", 190, 90, 80, 22, ID_PB3203, 0, 0, 2); //=== 3) Assign handler function to the main window -------------------------- wb_set_handler($mainwin, "process_main"); wb_set_image($mainwin, "./" . "uslogo.ico"); // Add logo //=== 5) Enter application loop ----------------------------------------------- wb_main_loop(); //=== 4) Handler Function ----------------------------------------------------- function process_main($window, $id, $ctrl=0, $lparam1=0, $lparam2=0) { switch($id) { // TAB Change - Test case 9000; // ID of main TAB $text="ID = $id \n CTRL = $ctrl \n PARAM1 = $lparam1 \n PARAM2 = $lparam2 "; wb_message_box($window, $text,"TAB Pressed.", WBC_INFO); switch($lparam2) { case 0: // Tab index 0 or page 1 wb_message_box($window, "Case 0","TAB 0 Page 1", WBC_OK); // Call init 1 break; case 1: // Tab index 1 or page 2 wb_message_box($window, "Case 1","TAB 1 Page 2", WBC_OKCANCEL); // Call init 2 break; case 2: // Tab index 2 or page 3 wb_message_box($window, "Case 2","TAB 2 Page 3", WBC_WARNING); // Call init 3 break; } break; // END TAB Change - Test //== Page 1 case ID_PB1201: // Button A wb_set_text(wb_get_control($window, ID_L1101),"12345"); wb_set_text(wb_get_control($window, ID_L1102),"67890"); break; case ID_PB1202: // Button B wb_set_text(wb_get_control($window, ID_L1101),"67890"); wb_set_text(wb_get_control($window, ID_L1102),"12345"); break; case ID_PB1203: // Button C $text1 = wb_get_text(wb_get_control($window, ID_E1301)); wb_set_text(wb_get_control($window, ID_L1101),"Page 1 ".$text1); wb_set_text(wb_get_control($window, ID_L1102),"Page 1 ".$text1); break; //== Page 2 case ID_PB2201: // Button D button_D($window); break; case ID_PB2202: // Button E button_E($window); break; case ID_PB2203: // Button F button_F($window); break; //== Page 3 case ID_PB3201: // Button G wb_message_box($window, "Page 3.","BUTTON G", WBC_INFO); break; case ID_PB3202: // Button H wb_message_box($window, "Page 3.","BUTTON H", WBC_QUESTION); break; case ID_PB3203: // Button I wb_message_box($window, "Page 3.","BUTTON I", WBC_YESNO); break; case IDCLOSE: // Constant IDCLOSE (8) predefined wb_destroy_window($window); // Destroy the window break; } } function button_D($window){ wb_set_text(wb_get_control($window, ID_L2101),"xxxx"); wb_set_text(wb_get_control($window, ID_L2102),"yyyy"); } function button_E($window){ wb_set_text(wb_get_control($window, ID_L2101),"yyyy"); wb_set_text(wb_get_control($window, ID_L2102),"xxxx"); } function button_F($window){ $text1 = wb_get_text(wb_get_control($window, ID_E2301)); wb_set_text(wb_get_control($window, ID_L2101),"Page 2 ".$text1); wb_set_text(wb_get_control($window, ID_L2102),"Page 2 ".$text1); } ?>

Script:

test_6.phpw

Run:

Navigate to folder

UniServer\plugins\winbinder\examples

Double click on test_6.bat

Top

Summary

The above script (test_6.phpw) makes a good starting point for a Windows application. Use it as a template, make changes as required alternatively use it as a guide and cut and paste the bits you need.

That completes a basic introduction to windows controls it covers enough material to get started including some cosmetics that are not essential but will make a completed application more pleasing.

The next two pages covers a stand-alone project. It’s written from a scripting point of view and avoids compiling.

Top

---