You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdewebdev/kommander/examples/current/tableselect.kmdr

503 lines
20 KiB

<!DOCTYPE UI><UI version="3.0" stdsetdef="1">
<class>Form1</class>
<widget class="Dialog">
<property name="name">
<cstring>Form1</cstring>
</property>
<property name="geometry">
<rect>
<x>0</x>
<y>0</y>
<width>838</width>
<height>561</height>
</rect>
</property>
<property name="caption">
<string>Table new feature demo</string>
</property>
<property name="associations" stdset="0">
<stringlist>
<string></string>
<string>for i = 0 to 6 do
for j = 0 to 6 do
Table1.setCellText(i, j, str_upper(i) + str_lower(j))
end
end
PopupMenu1.insertMenuItem("Copy", "ExecButton85", 1)
PopupMenu1.insertMenuItem("Paste", "ExecButton87", 2)
PopupMenu1.insertMenuItem("About", "PopupMenu1", 3)
AboutDialog9.initialize("Table Selection Demo", "help.png", "0.1", "(c) 2008")
AboutDialog9.setDescription("This demonstrated using the new multi-select ability
of the table. The spinboxes offer how it might have
been done before. Now block copy and paste can be done.")
AboutDialog9.addAuthor("Eric Laffoon", "Stop sleeping", "eric@tdewebdev.org", "http://kittyhooch.com")
AboutDialog9.addAuthor("Andras Mantia", "Make Eric stop asking for it to make coffee", "amantia@tdewebdev.org", "http://tdewebdev.org")
AboutDialog9.setLicense("GPL_V2")
AboutDialog9.setBugAddress("eric@tdewebdev.org")</string>
<string></string>
</stringlist>
</property>
<property name="useInternalParser">
<bool>true</bool>
</property>
<grid>
<property name="name">
<cstring>unnamed</cstring>
</property>
<property name="margin">
<number>11</number>
</property>
<property name="spacing">
<number>6</number>
</property>
<widget class=TQLAYOUTWIDGET_OBJECT_NAME_STRING row="1" column="3" rowspan="1" colspan="2">
<property name="name">
<cstring>Layout2</cstring>
</property>
<grid>
<property name="name">
<cstring>unnamed</cstring>
</property>
<property name="margin">
<number>0</number>
</property>
<property name="spacing">
<number>6</number>
</property>
<widget class="SpinBoxInt" row="0" column="3">
<property name="name">
<cstring>SpinBoxInt4</cstring>
</property>
<property name="maxValue">
<number>6</number>
</property>
</widget>
<widget class="Label" row="0" column="2">
<property name="name">
<cstring>Label4</cstring>
</property>
<property name="text">
<string>End row:</string>
</property>
</widget>
<widget class="SpinBoxInt" row="0" column="1">
<property name="name">
<cstring>SpinBoxInt3</cstring>
</property>
<property name="maxValue">
<number>6</number>
</property>
</widget>
<widget class="Label" row="0" column="0">
<property name="name">
<cstring>Label3</cstring>
</property>
<property name="text">
<string>End col:</string>
</property>
</widget>
</grid>
</widget>
<widget class=TQLAYOUTWIDGET_OBJECT_NAME_STRING row="1" column="0" rowspan="1" colspan="2">
<property name="name">
<cstring>Layout1</cstring>
</property>
<grid>
<property name="name">
<cstring>unnamed</cstring>
</property>
<property name="margin">
<number>0</number>
</property>
<property name="spacing">
<number>6</number>
</property>
<widget class="Label" row="0" column="2">
<property name="name">
<cstring>Label2</cstring>
</property>
<property name="text">
<string>Start row:</string>
</property>
</widget>
<widget class="SpinBoxInt" row="0" column="3">
<property name="name">
<cstring>SpinBoxInt2</cstring>
</property>
<property name="maxValue">
<number>6</number>
</property>
</widget>
<widget class="SpinBoxInt" row="0" column="1">
<property name="name">
<cstring>SpinBoxInt1</cstring>
</property>
<property name="maxValue">
<number>6</number>
</property>
</widget>
<widget class="Label" row="0" column="0">
<property name="name">
<cstring>Label1</cstring>
</property>
<property name="text">
<string>Start col:</string>
</property>
</widget>
</grid>
</widget>
<widget class="ScriptObject" row="1" column="2">
<property name="name">
<cstring>ScriptObject88</cstring>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>selection = Table1.selection
topRow = str_section(selection, ",", 0)
leftCol = str_section(selection, ",", 1)
bottomRow = str_section(selection, ",", 2)
rightCol = str_section(selection, ",", 3)
result = 0
for i = topRow to bottomRow do
for j = leftCol to rightCol do
result = result + str_todouble(Table1.cellText(i, j))
end
end
StatusBar7.setText("Selection total: "+result)</string>
</stringlist>
</property>
</widget>
<widget class="TextBrowser" row="2" column="0" rowspan="1" colspan="3">
<property name="name">
<cstring>TextBrowser1</cstring>
</property>
</widget>
<widget class="ExecButton" row="3" column="0">
<property name="name">
<cstring>ExecButton1</cstring>
</property>
<property name="text">
<string>&amp;Get range</string>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>TextBrowser1.clear
for i = SpinBoxInt2.text to SpinBoxInt4.text do
for j = SpinBoxInt1.text to SpinBoxInt3.text do
result = result + "Cell value(" + i + ", " + j +") = " +Table1.cellText(i, j) + "\n"
end
end
TextBrowser1.setText(result)
</string>
</stringlist>
</property>
</widget>
<widget class="ExecButton" row="3" column="1" rowspan="1" colspan="2">
<property name="name">
<cstring>ExecButton2</cstring>
</property>
<property name="text">
<string>Get range &amp;from selection</string>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>selection = Table1.selection
topRow = str_section(selection, ",", 0)
leftCol = str_section(selection, ",", 1)
bottomRow = str_section(selection, ",", 2)
rightCol = str_section(selection, ",", 3)
TextBrowser1.clear
for i = topRow to bottomRow do
for j = leftCol to rightCol do
result = result + "Cell value(" + i + ", " + j +") = " +Table1.cellText(i, j) + "\n"
end
end
TextBrowser1.setText(result)
</string>
</stringlist>
</property>
</widget>
<widget class="StatusBar" row="4" column="0" rowspan="1" colspan="7">
<property name="name">
<cstring>StatusBar7</cstring>
</property>
</widget>
<widget class="Table" row="0" column="0" rowspan="1" colspan="7">
<column>
<property name="text">
<string>0</string>
</property>
</column>
<column>
<property name="text">
<string>1</string>
</property>
</column>
<column>
<property name="text">
<string>2</string>
</property>
</column>
<column>
<property name="text">
<string>3</string>
</property>
</column>
<column>
<property name="text">
<string>4</string>
</property>
</column>
<column>
<property name="text">
<string>5</string>
</property>
</column>
<column>
<property name="text">
<string>6</string>
</property>
</column>
<row>
<property name="text">
<string>0</string>
</property>
</row>
<row>
<property name="text">
<string>1</string>
</property>
</row>
<row>
<property name="text">
<string>2</string>
</property>
</row>
<row>
<property name="text">
<string>3</string>
</property>
</row>
<row>
<property name="text">
<string>4</string>
</property>
</row>
<row>
<property name="text">
<string>5</string>
</property>
</row>
<row>
<property name="text">
<string>6</string>
</property>
</row>
<row>
<property name="text">
<string>7</string>
</property>
</row>
<row>
<property name="text">
<string>8</string>
</property>
</row>
<row>
<property name="text">
<string>9</string>
</property>
</row>
<row>
<property name="text">
<string>10</string>
</property>
</row>
<property name="name">
<cstring>Table1</cstring>
</property>
<property name="numRows">
<number>11</number>
</property>
<property name="numCols">
<number>7</number>
</property>
<property name="selectionMode">
<enum>Single</enum>
</property>
<property name="populationText">
<string></string>
</property>
<property name="associations" stdset="0">
<stringlist>
<string></string>
</stringlist>
</property>
</widget>
<widget class="ExecButton" row="1" column="5">
<property name="name">
<cstring>ExecButton85</cstring>
</property>
<property name="sizePolicy">
<sizepolicy>
<hsizetype>4</hsizetype>
<vsizetype>4</vsizetype>
<horstretch>0</horstretch>
<verstretch>0</verstretch>
</sizepolicy>
</property>
<property name="minimumSize">
<size>
<width>24</width>
<height>24</height>
</size>
</property>
<property name="text">
<string></string>
</property>
<property name="pixmap">
<pixmap>image0</pixmap>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>//_CPrange = rows cols
//_CPdata = a[0] = R0C0 - R0Cx for each row
range = Table1.selection
startrow = str_section(range, ",", 0)
startcol = str_section(range, ",", 1)
endrow = str_section(range, ",", 2)
endcol = str_section(range, ",", 3)
array_clear("_CPdata")
_CPrange[0] = str_toint(endrow)-str_toint(startrow)
_CPrange[1] = str_toint(endcol)-str_toint(startcol)
//debug("range size: "+_CPrange[0]+" - "+_CPrange[1])
c = 0
for i=startrow to endrow do
row = ""
for k = startcol to endcol do
if k &gt; startcol then
row = row + "\t"
endif
row = row + Table1.cellText(i, k)
end
_CPdata[c] = row
c = c + 1
//debug("i="+i+" k="+k+" c="+c+" row="+row)
end
//debug("end copy")
</string>
</stringlist>
</property>
<property name="toolTip" stdset="0">
<string>copy range</string>
</property>
</widget>
<widget class="ExecButton" row="1" column="6">
<property name="name">
<cstring>ExecButton87</cstring>
</property>
<property name="sizePolicy">
<sizepolicy>
<hsizetype>4</hsizetype>
<vsizetype>4</vsizetype>
<horstretch>0</horstretch>
<verstretch>0</verstretch>
</sizepolicy>
</property>
<property name="minimumSize">
<size>
<width>24</width>
<height>24</height>
</size>
</property>
<property name="text">
<string></string>
</property>
<property name="pixmap">
<pixmap>image1</pixmap>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>//_CPrange = "rows cols"
//_CPdata = a[0] = R0C0 - R0Cx for each row
range = Table1.selection
startrow = str_section(range, ",", 0)
startcol = str_section(range, ",", 1)
endrow = str_section(range, ",", 2)
endcol = str_section(range, ",", 3)
if startrow == endrow &amp;&amp; startcol == endcol then
endrow = str_toint(startrow) + str_toint(_CPrange[0])
endcol = str_toint(startcol) + str_toint(_CPrange[1])
endif
//debug("endrow="+endrow+" endcol="+endcol)
c = 0
r = 0
for i=startrow to endrow do
//debug(i+"-"+_CPdata[c])
for k = startcol to endcol do
if _CPrange[0] == 0 &amp;&amp; _CPrange[1] == 0 then
val = _CPdata[0]
else
val = str_section(_CPdata[c], "\t", r)
endif
Table1.setCellText(i, k, val)
r = r + 1
//debug("r="+r)
end
c = c + 1
r = 0
end
//debug("end paste")
</string>
</stringlist>
</property>
<property name="toolTip" stdset="0">
<string>paste range</string>
</property>
</widget>
<widget class="PopupMenu" row="3" column="4">
<property name="name">
<cstring>PopupMenu1</cstring>
</property>
<property name="associations" stdset="0">
<stringlist>
<string>AboutDialog9.execute</string>
</stringlist>
</property>
</widget>
<widget class="AboutDialog" row="3" column="3">
<property name="name">
<cstring>AboutDialog9</cstring>
</property>
</widget>
</grid>
</widget>
<images>
<image name="image0">
<data format="XPM.GZ" length="1202">789c6dd24b4fc2401405e03dbfa2a13b62005b041be3c2172a46e3d2c4b89867799487501030fe77ef3d9d2134740e0bbe9cd09c696835828ff7d7a0d1aaad72918f54a086621934f47a3add7d7e5dffd6ea5114d0274e82f3fa59adde0c54f0369f19fe2ee87b28628a65ce98ca28a3bbcc1553b72997cc2518510433043b14c57c00bb147004f6289a790f263a31d83005a596059f0e8c99dfa0d1c674988fa0d5d65c30fb4cd3a660e4331851307203c6948439003b146c7e01bb148cdc8297143003130a36af4141c1bbba012505efca80f4b26c9bb90769b4c58d2c48c746cc05d3b629b8d1183ca7e0463b30a2e0461330a6f49873b043c10573f08282f616ec52d06ab04791cc1f30a180435050705f054a0aee7b072a0aee9b8286c394200efe45a13ba279748a464aa9b4b1a5ead0a4436bc391a86ad4d80a3a55cdc466d3594523d3f9e27bb9aa6c725bda78b46dbd296df44dfab3c8b6a58dbe51bbc5fea6b4d135e9ed646cf7a58daeb9cb7d73d8e81a9d4fe8717ee3fd437868f2f9cefd8637f61f9f7c93e6fe69d8b879eebb46b8e3376e071bd7f8e337662fa74db171bd1d9c34c5c6aaa6d8989d366ee3e96fc4d169d6ffae6aff9c383860</data>
</image>
<image name="image1">
<data format="XPM.GZ" length="2942">789c75964953dc481085effc8a0ee78d9848b754da2a26e680590c66c766194fcca1548b019bc5d080c131ff7db2f3154d771bf37cf9a4575999a527b5df2e0e4ef6b6078b6f176e476e74e607fed4dd0c16c3ddc5c5e33ffffef573e14d590ee45f51d483f2cd1f0b6ff647033fd8b9ba8c63a023016afbca9695f2c709d763e6a41cda605be55e39b6d176ca4b63eeaace7443e527e55aae14ca4e59fe1c98946d6733df2bbbaee950ff56b9efda0ef52f33f74e9be7af1346bfc763b6c3ba29757fda532e6a5b1ae5adcc0ef3d09a72d914a5557eca5c955ef9bbb269ea12e77396b93598af53ae9acea09f42b96e9cd17e382ab7b6755a8fbdb20cec82f295b26d6383f9ce955d9b1aed87d1afb7be6f94ff560e6d61c0fa7c5cdb3a83f5db63ee8bce985e7943b9ef82c17ee3874dbef25540ffebca8d1d1af4b792b9a9705fcfc777deb449b95596868253be56f69d2dc1cb605b19f08fcc2dead329d8fba0fdd117e5e863407f9b630e4391ee475a3f94a18ce8e744d90413352fa4e717ea50479cb7d60b8d2d4accdf284b6023f2abfb076917f7e9111cba88f3d4e71bac35f9bee63db8e0a2e691749ed0873eea79d383b20f3e223f9f9463e70be46d151c62443dcd771c8a701e3a6f2c4498ff4ed988506f57b912217f87cab52d0accbf0216e1f9d4ca4d6c12f2bfaf2cf92b500ff5e585c57dd6fea5dda6417ebf4f18fd7e00c72e613fcd57b436e0fd62d4b7d1265d4f9ab7e8a24b98ffbd72ef4c897c1e80639ff0bebe53f6ce96e8ff181c7dbeafdf9318fa26e7fd021c439e4ff31cc7dbe1f9dc82fb9c3f8ae01813def71be5e4db0a791982634a5a9fb47e1af6b541febe657615e65f078bb09f7e7f52e1e595523ecf1c2b3ccf0a2c425ef47b99cabeafb09fcb1c2ad423b02f2af4cf99fb0afd04b008df07ab6c4255e3bc2ec122dc2f95abe06abcdf37e0683ae461072cc2fb8a796b11bebf7b13c6facfca4d480df65b068b30afe63f75b16ee03f028b34bf8cfd6cec5b9cff2e58847c6b3e9213210f9abfd4a7618b7a9affe445b8aff94a21a616f557c1493ec8ca2673c87ecd9b3c6e8bf9f931b3ef90779f39663fce5bfff063f92ca689dccbd5694dfbb967cf212b72fa9d9fbff0299ff1397f15dfb7ac0bbee42bb97afa8aff9abff30ddff288efa634e27bb9fac0d7bff87ff0a3e8491cb35a92abef78f917ff0aaf8ad664c5acd6e4ea7b5effc5bfc11fe6b439a7ad19ff36efcc69339fd22eeff13e1fbcacc0ef1d7f9ad3b3ff908ff858fd275881df4bfe3ca717ff2e0fc5bf05657fc1e59c9efd46fc95f86b6eb89df83bb663490c881cf5d43ffbc9f321058a94e80b9d3efbe98ccee92b7da38b674dea4b4774c9077445d79819ffffa01bbaa5d18be097ea723e7447f7f4403fe871e27fa2257a37adb15fdc869629724d2bb262951e26fe357a3fabdccf2ead4bef1bf441566cd2fdc4bf45dbb352bfa11d391b394dda903d76a7fc7bb43f2bede74026cd7e99417698f83fd2273a9c96d6df1bfb734733fefd111dd1f1b4b4fea59cfcbad43fd67e66fcf312bf9cfbeffa79c5bff5bac4ffdf9f0bff0341cdbcc7</data>
</image>
</images>
<connections>
<connection>
<sender>Table1</sender>
<signal>selectionChanged()</signal>
<receiver>ScriptObject88</receiver>
<slot>execute()</slot>
</connection>
<connection>
<sender>Table1</sender>
<signal>contextMenuRequested(int,int)</signal>
<receiver>PopupMenu1</receiver>
<slot>popup(int,int)</slot>
</connection>
</connections>
<layoutdefaults spacing="6" margin="11"/>
</UI>