Combo Box Inside GridView with Image

2 posts, 0 answers
  1. smith
    smith avatar
    54 posts
    Member since:
    Mar 2009

    Posted 04 Nov 2009 Link to this post

    Hi

     I have Rad Combo box in this combox i have to dispaly the grid View With Image .

    where we set the Image for the  Inage in Grid View, if i select the row in the grid it should display the selected row with image, can u send me one sample project.


    regards
    smith
  2. JigneshGN
    JigneshGN avatar
    10 posts
    Member since:
    May 2009

    Posted 25 Jan 2010 Link to this post

    Hi,

    I want same functionality.

    Private Sub GenereateGridStructure() 
     
            ' Start added by jignesh patel dtd 2010.01.22  Created objects for needed columns 
            grdColStatus = New Telerik.WinControls.UI.GridViewComboBoxColumn 
            grdColFavoriteMedicineID = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColStartDate = New Telerik.WinControls.UI.GridViewDateTimeColumn 
            grdColDate = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColReNewal = New Telerik.WinControls.UI.GridViewDateTimeColumn 
            grdColStopDate = New Telerik.WinControls.UI.GridViewDateTimeColumn 
            grdColMedicine = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColTimes = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColQty = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColRefill = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColRemarks = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColCareGiver = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColUpdatedBy = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColUpdatedOn = New Telerik.WinControls.UI.GridViewTextBoxColumn 
            grdColRxOTC = New Telerik.WinControls.UI.GridViewComboBoxColumn 
            grdColSource = New Telerik.WinControls.UI.GridViewComboBoxColumn 
            ' End added by jignesh patel dtd 2010.01.22  Created objects for needed columns 
     
            'Start added by jignesh patel dtd 2010.01.22  added columns in grid 
            Me.grdMedication.Columns.Add(grdColStatus) 
            Me.grdMedication.Columns.Add(grdColFavoriteMedicineID) 
            Me.grdMedication.Columns.Add(grdColStartDate) 
            Me.grdMedication.Columns.Add(grdColDate) 
            Me.grdMedication.Columns.Add(grdColReNewal) 
            Me.grdMedication.Columns.Add(grdColStopDate) 
            Me.grdMedication.Columns.Add(grdColMedicine) 
            Me.grdMedication.Columns.Add(grdColTimes) 
            Me.grdMedication.Columns.Add(grdColQty) 
            Me.grdMedication.Columns.Add(grdColRefill) 
            Me.grdMedication.Columns.Add(grdColRemarks) 
            Me.grdMedication.Columns.Add(grdColCareGiver) 
            Me.grdMedication.Columns.Add(grdColUpdatedBy) 
            Me.grdMedication.Columns.Add(grdColUpdatedOn) 
            Me.grdMedication.Columns.Add(grdColRxOTC) 
            Me.grdMedication.Columns.Add(grdColSource) 
            'End added by jignesh patel dtd 2010.01.22  added columns in grid 
     
            'Start added by jignesh patel dtd 2010.01.22  Initializing properties for columns 
            grdColStatus.DisplayMember = "Name" 
            grdColStatus.FieldAlias = "Status" 
            grdColStatus.FieldName = "Status" 
            grdColStatus.HeaderText = "Status" 
            grdColStatus.UniqueName = "grdColStatus" 
            grdColStatus.ValueMember = "Name" 
            grdColStatus.Width = 80 
            grdColStatus.TextImageRelation = TextImageRelation.ImageBeforeText 
     
            grdColFavoriteMedicineID.FieldAlias = "ID" 
            grdColFavoriteMedicineID.FieldName = "ID" 
            grdColFavoriteMedicineID.HeaderText = "grdColFavoriteMedicineID" 
            grdColFavoriteMedicineID.IsVisible = False 
            grdColFavoriteMedicineID.ReadOnly = True 
            grdColFavoriteMedicineID.UniqueName = "grdColFavoriteMedicineID" 
     
            grdColStartDate.DataType = GetType(Date
            grdColStartDate.FieldAlias = "StartDate" 
            grdColStartDate.FieldName = "StartDate" 
            grdColStartDate.FormatString = "{0: MM/dd/yyyy}" 
            grdColStartDate.HeaderText = "Start" 
            grdColStartDate.DataEditFormatString = "MM/dd/yyyy" 
     
            grdColStartDate.UniqueName = "grdColStartDate" 
            grdColStartDate.Width = 70 
     
            grdColDate.FieldAlias = "MedicineDate" 
            grdColDate.FieldName = "MedicineDate" 
            grdColDate.FormatString = "{0:MM/dd/yyyy}" 
            grdColDate.DataEditFormatString = "MM/dd/yyyy" 
            grdColDate.HeaderText = "Modified" 
            grdColDate.UniqueName = "grdColDate" 
            grdColDate.Width = 70 
     
            grdColReNewal.DataType = GetType(Date
            grdColReNewal.FieldAlias = "Renewal" 
            grdColReNewal.FieldName = "Renewal" 
            grdColReNewal.FormatString = "{0: MM/dd/yyyy}" 
            grdColReNewal.DataEditFormatString = "MM/dd/yyyy" 
            grdColReNewal.HeaderText = "Renewal" 
            grdColReNewal.UniqueName = "grdColReNewal" 
            grdColReNewal.Width = 70 
     
            grdColStopDate.DataType = GetType(Date
            grdColStopDate.FieldAlias = "StopDate" 
            grdColStopDate.FieldName = "StopDate" 
            grdColStopDate.FormatString = "{0: MM/dd/yyyy}" 
            grdColStopDate.DataEditFormatString = "MM/dd/yyyy" 
            grdColStopDate.HeaderText = "End" 
            grdColStopDate.UniqueName = "grdColStopDate" 
            grdColStopDate.Width = 70 
     
            grdColMedicine.FieldAlias = "MedicineName" 
            grdColMedicine.FieldName = "MedicineName" 
            grdColMedicine.HeaderText = "Medicine" 
            grdColMedicine.UniqueName = "grdColMedicine" 
            grdColMedicine.ReadOnly = True 
            grdColMedicine.Width = 190 
     
            grdColTimes.FieldAlias = "Times" 
            grdColTimes.FieldName = "Times" 
            grdColTimes.HeaderText = "Directions (SIG.)" 
            grdColTimes.UniqueName = "grdColTimes" 
            grdColTimes.Width = 120 
     
            grdColQty.FieldAlias = "Qty" 
            grdColQty.FieldName = "Qty" 
            grdColQty.HeaderText = "Quantity" 
            grdColQty.UniqueName = "grdColQty" 
            grdColQty.Width = 60 
     
            grdColRefill.FieldAlias = "Refill" 
            grdColRefill.FieldName = "Refill" 
            grdColRefill.HeaderText = "Refills" 
            grdColRefill.UniqueName = "grdColRefill" 
            grdColRefill.Width = 45 
     
            grdColRemarks.FieldAlias = "Remarks" 
            grdColRemarks.FieldName = "Remarks" 
            grdColRemarks.HeaderText = "Remarks" 
            grdColRemarks.UniqueName = "grdColRemarks" 
            grdColRemarks.Width = 150 
            grdColRemarks.TextAlignment = ContentAlignment.MiddleLeft 
     
            grdColCareGiver.FieldAlias = "CareGiver" 
            grdColCareGiver.FieldName = "CareGiver" 
            grdColCareGiver.HeaderText = "Care Giver" 
            grdColCareGiver.UniqueName = "CareGiver" 
            grdColCareGiver.Width = 125 
     
            grdColUpdatedBy.FieldAlias = "UpdatedBy" 
            grdColUpdatedBy.FieldName = "UpdatedBy" 
            grdColUpdatedBy.HeaderText = "Updated By" 
            grdColUpdatedBy.ReadOnly = True 
            grdColUpdatedBy.UniqueName = "grdColUpdatedBy" 
            grdColUpdatedBy.Width = 70 
     
            grdColUpdatedOn.FieldAlias = "UpdatedOn" 
            grdColUpdatedOn.FieldName = "UpdatedOn" 
            grdColUpdatedOn.HeaderText = "Updated On" 
            grdColUpdatedOn.UniqueName = "grdColUpdatedOn" 
            grdColUpdatedOn.ReadOnly = True 
            grdColUpdatedOn.FormatString = "{0:MM/dd/yyyy}" 
            grdColUpdatedOn.Width = 73 
     
            grdColRxOTC.FieldAlias = "RxOTC" 
            grdColRxOTC.FieldName = "RxOTC" 
            grdColRxOTC.HeaderText = "Rx/OTC" 
            grdColRxOTC.UniqueName = "grdColRxOTC" 
            grdColRxOTC.Width = 50 
            grdColRxOTC.DisplayMember = "Text" 
            grdColRxOTC.ValueMember = "Text" 
            grdColRxOTC.ImageLayout = ImageLayout.Tile 
            grdColRxOTC.TextImageRelation = TextImageRelation.ImageBeforeText 
            Dim objRxOTCSource As New List(Of Telerik.WinControls.UI.RadComboBoxItem) 
            Dim objcmbitem As New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "Rx" 
            objcmbitem.Image = imgListRxOTC.Images("Rx"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objRxOTCSource.Add(objcmbitem) 
            objcmbitem = New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "OTC" 
            objcmbitem.Image = imgListRxOTC.Images("OTC"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objRxOTCSource.Add(objcmbitem) 
            grdColRxOTC.DataSource = objRxOTCSource 
     
            grdColSource.FieldName = "Source" 
            grdColSource.FieldName = "Source" 
            grdColSource.HeaderText = "Source" 
            grdColSource.UniqueName = "grdColSource" 
            grdColSource.Width = 60 
            grdColSource.DisplayMember = "Text" 
            grdColSource.ValueMember = "Text" 
            grdColSource.ImageLayout = ImageLayout.Tile 
            grdColSource.TextImageRelation = TextImageRelation.ImageBeforeText 
            objSourcedata = New List(Of Telerik.WinControls.UI.RadComboBoxItem) 
            objcmbitem = New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "Script" 
            objcmbitem.Image = imgListSource.Images("Script.ico"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objSourcedata.Add(objcmbitem) 
            objcmbitem = New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "Others" 
            objcmbitem.Image = imgListSource.Images("Other.png"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objSourcedata.Add(objcmbitem) 
            objcmbitem = New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "Manual" 
            objcmbitem.Image = imgListSource.Images("Manual.ico"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objSourcedata.Add(objcmbitem) 
            objcmbitem = New Telerik.WinControls.UI.RadComboBoxItem 
            objcmbitem.Text = "Electronic" 
            objcmbitem.Image = imgListSource.Images("Electronic.png"
            objcmbitem.ImageAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextAlignment = ContentAlignment.MiddleLeft 
            objcmbitem.TextImageRelation = TextImageRelation.ImageBeforeText 
            objcmbitem.DisplayStyle = DisplayStyle.ImageAndText 
            objSourcedata.Add(objcmbitem) 
            grdColSource.DataSource = objSourcedata 
            'End added by jignesh patel dtd 2010.01.22  Initializing properties for columns 
     
            ' added by jignesh patel dtd 2010.01.22  To group related columns in one group 
            Dim columnGroupsView As New ColumnGroupsViewDefinition 
            columnGroupsView.ColumnGroups.Add(New GridViewColumnGroup("Medication Detail"))   ' For status 
            columnGroupsView.ColumnGroups.Add(New GridViewColumnGroup("Other Details"))  ' for dates 
     
            columnGroupsView.ColumnGroups(0).Rows.Add(New Telerik.WinControls.UI.GridViewColumnGroupRow)   ' Row creatd for status column which will contains status column 
            columnGroupsView.ColumnGroups(1).Rows.Add(New Telerik.WinControls.UI.GridViewColumnGroupRow)   ' Row creatd for dates columns which will contains all 4 date column 
     
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColStatus) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColFavoriteMedicineID) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColMedicine) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColTimes) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColQty) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColRefill) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColRemarks) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColRxOTC) 
            columnGroupsView.ColumnGroups(0).Rows(0).Columns.Add(grdColSource) 
     
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColStartDate) 
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColDate) 
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColReNewal) 
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColStopDate) 
     
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColCareGiver) 
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColUpdatedBy) 
            columnGroupsView.ColumnGroups(1).Rows(0).Columns.Add(grdColUpdatedOn) 
     
            grdMedication.ViewDefinition = columnGroupsView 
            grdMedication.MasterGridViewTemplate.Columns(0).RowSpan = 2 
            ' added by jignesh patel dtd 2010.01.22  To group related columns in one group 
     
        End Sub 


    Please help.

    Regards,
    Jignesh Patel
  3. DevCraft banner
Back to Top