Update active controls.

6 files changed, 165 insertions, 0 deletions

diff --git a/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.page b/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.page
new file mode 100644
index 00000000..8b8962a8
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.page
@@ -0,0 +1,26 @@
+<com:TForm ID="form1">
+	<h1>Active Drop Down List Test Case</h1>
+	
+	<com:TActiveDropDownList ID="list1" AutoPostBack="true" OnSelectedIndexChanged="list1_changed">
+		<com:TListItem Value="value 1" Text="item 1" />
+		<com:TListItem Value="value 2" Text="item 2" />
+		<com:TListItem Value="value 3" Text="item 3" />
+		<com:TListItem Value="value 4" Text="item 4" />
+	</com:TActiveDropDownList>
+
+	<com:TActiveDropDownList ID="list2" 
+		Enabled="false"
+		AutoPostBack="true" OnSelectedIndexChanged="list2_changed" />
+
+	<div style="margin:1em; padding:1em; border:1px solid #ccc; text-align:center;">
+	<com:TActiveLabel ID="label1" Text="Label 1" />
+	</div>
+	<div style="margin:1em; padding:0.5em; text-align:center; border:1px solid #ccc;">
+		<com:TActiveButton ID="button1" Text="Select Index 3" OnClick="select_index_3" />
+		<com:TActiveButton ID="button2" Text="Clear selection" OnClick="clear_selections" />
+		<com:TActiveButton ID="button3" Text="Select Value 'value 2'" OnClick="select_value_2" />
+	</div>
+	
+	<com:TJavascriptLogger />
+	
+</com:TForm>
\ No newline at end of file
diff --git a/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.php b/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.php
new file mode 100644
index 00000000..7060d84b
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/ActiveDropDownList.php
@@ -0,0 +1,39 @@
+<?php
+
+class ActiveDropDownList extends TPage
+{
+	function list1_changed($sender)
+	{
+		$this->label1->setText("Selection 1: ".$sender->getSelectedValue());		
+		$this->addOptionsToList2($sender->getSelectedValue());
+	}
+
+	function addOptionsToList2($parent)
+	{
+		for($i = 0; $i < 5; $i++)
+			$this->list2->Items[$i] = $parent.' - item '.($i+1);
+		$this->list2->setEnabled(true);
+	}
+
+	function list2_changed($sender)
+	{
+		$this->label1->setText("Selection 2: ".$sender->getSelectedValue());
+	}
+	
+	function select_index_3()
+	{
+		$this->list1->setSelectedIndex(3);
+	}
+	
+	function clear_selections()
+	{
+		$this->list1->clearSelection();
+	}
+	
+	function select_value_2()
+	{
+		$this->list1->setSelectedValue("value 2");
+	}
+}
+
+?>
\ No newline at end of file
diff --git a/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.page b/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.page
new file mode 100644
index 00000000..59098052
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.page
@@ -0,0 +1,13 @@
+<com:TForm ID="form1">
+	<h1>Active HyperLink Test Case</h1>
+	
+	<div style="margin:1em; padding:1em; border:1px solid #ccc; text-align:center;">
+	<com:TActiveHyperLink ID="link1" Text="Link 1" NavigateUrl="http://www.pradosoft.com" />
+	</div>
+	<com:TActiveButton ID="button1" Text="Change Text" OnClick="change_text" />
+	<com:TActiveButton ID="button2" Text="Change Image" OnClick="change_image" />
+	<com:TActiveButton ID="button3" Text="Change Target" OnClick="change_target" />
+	<com:TActiveButton ID="button4" Text="Change URL" OnClick="change_url" />
+	
+	<com:TJavascriptLogger />
+</com:TForm>
\ No newline at end of file
diff --git a/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.php b/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.php
new file mode 100644
index 00000000..cd4880d2
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/ActiveHyperLinkTest.php
@@ -0,0 +1,26 @@
+<?php
+
+class ActiveHyperLinkTest extends TPage
+{
+	function change_text()
+	{
+		$this->link1->Text = "Pradosoft.com";
+	}
+	
+	function change_image()
+	{
+		$this->link1->ImageUrl = "...";
+	}
+	
+	function change_target()
+	{
+		$this->link1->Target = "_top";
+	}
+	
+	function change_url()
+	{
+		$this->link1->NavigateUrl = "http://www.xlab6.com";
+	}
+}
+
+?>
\ No newline at end of file
diff --git a/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.page b/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.page
new file mode 100644
index 00000000..b30ced69
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.page
@@ -0,0 +1,24 @@
+<com:TForm ID="form1">
+	<h1>TActiveCheckBoxList Test Case</h1>
+	
+	<com:TActiveCheckBoxList ID="list1" OnCallback="list1_callback">
+		<com:TListItem Value="value 1" Text="item 1" />
+		<com:TListItem Value="value 2" Text="item 2" />	
+		<com:TListItem Value="value 3" Text="item 3" />	
+		<com:TListItem Value="value 4" Text="item 4" />	
+		<com:TListItem Value="value 5" Text="item 5" />	
+	</com:TActiveCheckBoxList>
+	<div style="margin:1em; padding:1em; border:1px solid #ccc; text-align:center;">
+	<com:TActiveLabel ID="label1" Text="Label 1" />
+	</div>
+	<div style="margin:1em; padding:0.5em; text-align:center; border:1px solid #ccc;">
+		<com:TActiveButton ID="button1" Text="Select Index 1 2 3" OnClick="select_index_123" />
+		<com:TActiveButton ID="button2" Text="Clear selection" OnClick="clear_selections" />
+		<com:TActiveButton ID="button3" Text="Select Value 'value 1'" OnClick="select_value_1" />
+		<com:TActiveButton ID="button4" Text="Select Index 4" OnClick="select_index_4" />
+		<com:TActiveButton ID="button5" Text="Select Values 'value 2', 'value 5'" OnClick="select_values_25" />
+	</div>
+	
+	<com:TJavascriptLogger />
+		
+</com:TForm>
\ No newline at end of file
diff --git a/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.php b/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.php
new file mode 100644
index 00000000..66bfe83d
--- /dev/null
+++ b/tests/FunctionalTests/active-controls/protected/pages/TActiveCheckBoxListTest.php
@@ -0,0 +1,37 @@
+<?php
+
+class TActiveCheckBoxListTest extends TPage
+{
+	function list1_callback($sender, $param)
+	{
+		$values = $sender->getSelectedValues();
+		$this->label1->setText("Selection: ".implode(', ', $values));
+	}
+	
+	function select_index_123()
+	{
+		$this->list1->setSelectedIndices(array(1,2,3));
+	}
+	
+	function select_index_4()
+	{
+		$this->list1->setSelectedIndex(4);
+	}
+	
+	function clear_selections()
+	{
+		$this->list1->clearSelection();
+	}
+	
+	function select_value_1()
+	{
+		$this->list1->setSelectedValue("value 1");
+	}
+	
+	function select_values_25()
+	{
+		$this->list1->setSelectedValues(array('value 2', 'value 5'));
+	}
+}
+
+?>
\ No newline at end of file