Главная страница
    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.04 c
15-1175709413
Pazitron_Brain
2007-04-04 21:56
2007.04.29
Подскажите книгу


2-1176288250
Alex7
2007-04-11 14:44
2007.04.29
FileListBox не видит первую букву имени файла.


15-1175680037
Romas81
2007-04-04 13:47
2007.04.29
как прикрепить файлы к mailto ?


15-1175843451
db2admin
2007-04-06 11:10
2007.04.29
Сталкер


2-1176025824
vitv
2007-04-08 13:50
2007.04.29
DBGrid+DrawText





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский