|
|
#1
|
|||
|
|||
TListBox
Есть ли возможность в TListBox к конкретной строке создать событие двойной клик мышью?
При этом мне нужно запомнить id строки в TListBox и нужно написать код события. Подскажите пожалуйста как это сделать? |
#2
|
|||
|
|||
можно, через OnDblClick, и потом в процедуре делаешь проверку через case:
0: нажали на первую строку; 1: нажали на вторую и т.д.... p.S.: подробнее опиши что именно нужно |
#3
|
|||
|
|||
С листбоксом разберусь чуть позднее, мне для курсовой нужно rss reeder написать... Возможно перемудрил, но все строки прокомментированы.
Все работает за исключением: не могу найти номер строки где идет закрывающий тег </title>(до какого символа использовать функцию copy()) Прошу помочь: PHP код:
|
#4
|
|||
|
|||
Еще проблема в том что он находит этот <title>, но не первый по счету, а где то ближе к конце....Не знаю в чем дело
|
#5
|
|||
|
|||
а Pos или PosEx не пробовал использовать?
Код:
procedure TForm1.Button1Click(Sender: TObject); var c: string; n1,n2: integer; title: string; begin c := IdHTTP1.Get('http://mobile-review.com.feedsportal.com/c/33244/f/557683/index.rss'); if c = '' then ShowMessage('Ошибка'+#13+'невозможно получить html-код...') else begin n1 := Pos('<title>',c) + Length('<title>'); n2 := Pos('</title>',c) - n1; title := Copy(c,n1,n2) ShowMessage(title); end; end; Последний раз редактировалось Assistant, 12.03.2011 в 20:36. |
#6
|
|||
|
|||
Есть способ по проще, на панели internet есть XMLDocument1
насколько я понимаю прямая ссылка на rss ленту - xml. нашел исходник как пример работы с xml: PHP код:
Выводит пустой showmessage, подскажие в чем проблема |