or
<
telerik:RadSearchBox
runat
=
"server"
ID
=
"RadSearchBox1"
Width
=
"350"
DataTextField
=
"LocName"
OnClientSearch
=
"OnClientSearch"
DataSourceID
=
"SqlDataSource1"
DataKeyNames
=
"LocID" DataValueField="LocID"
>
<
DropDownSettings
Height
=
"400px"
>
<
ClientTemplate
>
<
h3
>#= Text #</
h3
>
<
div
class
=
"details"
>
<
span
class
=
"info"
>
<
p
>
<
b
> #= DataItem.Descr# </
b
>
<
b
> #= DataItem.Lang# </
b
>
<
b
> #= DataItem.Long# </
b
>
</
p
>
</
span
>
</
div
>
</
ClientTemplate
>
</
DropDownSettings
>
</
telerik:RadSearchBox
>
<
asp:SqlDataSource
ID
=
"SqlDataSource1"
runat
=
"server"
ConnectionString="<%$ ConnectionStrings:TDMTConnectionString %>" SelectCommand="SELECT * FROM [tdmt_Location]"></
asp:SqlDataSource
>
<
telerik:RadGrid
ID
=
"MyGrid"
runat
=
"server"
AllowPaging
=
"false"
AutoGenerateColumns
=
"false"
GridLines
=
"None"
ShowHeader
=
"True"
OnNeedDataSource
=
"MyGrid_NeedDataSource"
OnItemCommand
=
"MyGrid_ItemCommand"
OnItemDataBound
=
"MyGrid_ItemDataBound"
>
<
MasterTableView
AutoGenerateColumns
=
"false"
Width
=
"100%"
TableLayout
=
"Fixed"
>
<
Columns
>
<
telerik:GridBoundColumn
UniqueName
=
"Id"
DataField
=
"PlanId"
HeaderText
=
"Id"
Visible
=
"false"
/>
<
telerik:GridBoundColumn
UniqueName
=
"Name"
DataField
=
"Name"
HeaderText
=
"Name"
/>
<
telerik:GridTemplateColumn
>
<
ItemTemplate
>
<
table
cellpadding
=
"0"
cellspacing
=
"0"
border
=
"0"
>
<
tr
>
<
td
style
=
"border: none; width: 18px; padding: 0;"
>
<
asp:ImageButton
ID
=
"DeleteImageButton"
runat
=
"server"
ToolTip
=
"Delete"
ImageUrl
=
"App_Themes/PlanAdvisor/Grid/Delete.png"
CommandName
=
"DeleteItem"
/>
</
td
>
</
tr
>
</
table
>
</
ItemTemplate
>
<
HeaderStyle
HorizontalAlign
=
"Right"
Width
=
"55px"
></
HeaderStyle
>
<
ItemStyle
HorizontalAlign
=
"Right"
></
ItemStyle
>
</
telerik:GridTemplateColumn
>
</
Columns
>
</
MasterTableView
>
</
telerik:RadGrid
>
Protected
Sub
MyGrid_ItemCommand(
ByVal
sender
As
Object
,
ByVal
e
As
GridCommandEventArgs)
Handles
MyGrid.ItemCommand
If
e.Item.ItemType = GridItemType.Item
OrElse
e.Item.ItemType = GridItemType.AlternatingItem
Then
Dim
item
As
GridDataItem =
CType
(e.Item, GridDataItem)
If
e.CommandName =
"DeleteItem"
Then
DeleteItem(
CInt
(item(
"Id"
).Text))
MyGrid.Rebind()
End
If
End
If
End
Sub