Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Вниз

ListBox и кнопка   Найти похожие ветки 

 
hover ©   (2007-04-11 14:20) [0]

Всем доброго дня! Надеюсь на вашу помощь! как сделать так,чтобы при нажатии на Button в ListBox устанавливалось значение Selected,а при повторном нажатии на кнопку значение Selected устанавливалось у следующей по списку строки в ListBox?


 
MBo ©   (2007-04-11 14:24) [1]

А какие идеи у самого-то есть?


 
hover ©   (2007-04-11 14:28) [2]

Голова уже кипит. Пробовал связать ListBox1.Selected и ListBox1.ItemIndex


 
Германн ©   (2007-04-11 14:36) [3]


> hover ©   (11.04.07 14:28) [2]
>
> Голова уже кипит. Пробовал связать ListBox1.Selected и ListBox1.
> ItemIndex
>

А за что их связывать? Какой закон они нарушили?


 
clickmaker ©   (2007-04-11 14:38) [4]


> Пробовал связать ListBox1.Selected и ListBox1.ItemIndex

порвали веревку и сбежали?


 
hover ©   (2007-04-11 14:42) [5]

Братцы, я серьёзно. Мне проект через 2 дня сдавать. Помогите чем сможете.


 
clickmaker ©   (2007-04-11 14:48) [6]

чем помочь-то? ты уже все сам сделал этим:

> Пробовал связать ListBox1.Selected и ListBox1.ItemIndex


 
SergGG ©   (2007-04-11 14:50) [7]

Попробуй так
procedure TForm1.Button1Click(Sender: TObject);
begin
 ListBox1.ItemIndex:=ListBox1.ItemIndex+1
end;



 
hover ©   (2007-04-11 16:04) [8]

Работает,но эта функция не устанавливает значение Selected,а просто вниз по списку идёт


 
KSergey ©   (2007-04-11 16:20) [9]

ну так добавить строчку - вот и все!


 
SergGG ©   (2007-04-11 16:21) [10]

Зачем Вам значение Selected?
Помоему Вам хватит положение строки - ListBox1.ItemIndex


 
hover ©   (2007-04-11 16:40) [11]

Пишу код:
ListBox1.Items[3];
if ListBox1.Selected[0] then
begin
WebBrowser1.Navigate() и т.д. Мне нужно чтобы при нажатии кнопки, в ListBox происходил поочередный выбор строки и одновременно запуск файлов(*.html) в WebBrowser


 
{RASkov}   (2007-04-11 20:06) [12]

> Братцы, я серьёзно. Мне проект через 2 дня сдавать. Помогите
> чем сможете.


> Надеюсь на вашу помощь! как сделать так, чтобы при нажатии на Button в ListBox устанавливалось значение
> Selected,а при повторном нажатии на кнопку значение Selected устанавливалось у следующей по списку строки в ListBox?


> Работает,но эта функция не устанавливает значение Selected, а просто вниз по списку идёт

Я в шоке.... :(

> [11] hover ©   (11.04.07 16:40)

ЧесТно непонял немного вопроса, но может это:

var N :Integer;
begin
 ListBox1.MultiSelect:=True;
 for N := 0 to ListBox1.Items.Count-1 do begin
  ListBox1.Selected[N]:=True;
  Application.ProcessMessages;
  Sleep(500);
 end;
end;


Думаю по нажатию кнопки сообразишь как переходить по итемам?
Если и не в тему пример, но я все равно в шоке, от таких здавальщиков программ  :(


 
MikePetrichenko ©   (2007-04-11 20:44) [13]

Предлагаю чуть поправить движок форума. Няхай он смотрит на текст вопроса, и если там встречается словосочетание "как сделать так" то автоматом выдает ответ - "прочитать справку", "нажать F1" и т.п. Можно случайным образом.

А вторым постом автоматом вставлять ссылку на магазин метел "Кетмар и Ко".



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.048 c
15-1171999140
Иксик
2007-02-20 22:19
2007.04.29
Дорогие друзья я снова с вами! :):):)


2-1175755709
Костя
2007-04-05 10:48
2007.04.29
Кто знаком с SQL?


15-1175480795
Slider007
2007-04-02 06:26
2007.04.29
С днем рождения ! 31 марта


2-1176385635
Albina
2007-04-12 17:47
2007.04.29
Выпадающий список


3-1170763158
КоТ
2007-02-06 14:59
2007.04.29
Insert into и пустой параметр





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский