یک سوال در مورد کتابخانه rssview

[rezanaseri 6]

با سلام من این سورس را قرار دادم 

چند تا سوال دارم

1- می خواهم در این سورس یک عکس هم در سمت راست هر مطلب قرار دهم 

2- عبارت تاریخ و ساعت که زیر هر آگهی می آید را چگونه از بین ببرم

 

Sub Globals

    Private rssView As CustomRSSView
                
                Private ParseOnlineRSSButton As Button
                Private ParseOfflineButton As Button

End Sub

Sub Activity_Create(FirstTime As Boolean)

    Activity.LoadLayout("Main")
            
                'Initialize the CustomRSSView
                rssView.Initialize(Activity, Me, "rssView", 50dip, 100%y - 50dip)

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause(UserClosed As Boolean)

End Sub

'##########################
'######## Controls ########
'##########################

'##########################
'######## Routines ########
'##########################

Sub ParseOnlineRSSButton_Click

    ProgressDialogShow("Fetching...")

                'Enter the URL of the RSS feed you want to parse
                rssView.ParseRSS("http://betamak.ir/group/%DA%AF%D8%B1%D9%88%D9%87-%D8%A2%D8%B1%D8%A7%DB%8C%D8%B4%DB%8C-%D9%88-%D8%A8%D9%87%D8%AF%D8%A7%D8%B4%D8%AA%DB%8C/feed")
    
End Sub

Sub ParseOfflineButton_Click

    ProgressDialogShow("Fetching...")

                'Enter the direcrory and file name of the feed to parse
                rssView.ParseOfflineRSS(File.DirAssets, "MagazineStyleTemplate.xml")
    
End Sub

Sub rssView_FinishedLoading
    
       ProgressDialogHide

End Sub

Sub rssView_ItemClicked(URL As String)
    
       'On this even you will get the URL of a clicked item and process it as you wish
                Msgbox(URL, "Item Clicked")
                
End Sub

Sub rssView_ErrorMessage(Message As String)
    
       ProgressDialogHide
                
                Msgbox(Message, "Oops!")
                
End Sub

Sub Activity_KeyPress(KeyCode As Int) As Boolean

    If rssView.IsOpen = True Then
                
                   rssView.HideCustomRSSView
                            
                   Return True
                            
             End If                
    
End Sub

 

[rezanaseri 6]

واقعا چرا جواب نمیدید

[rezanaseri 6]

دوستان لطفا جواب بدید

در ضمن تیتر هم می خواهم سمت چپ باشد