Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Список [D7, XP]


Первокласник Вася ©   (2007-02-15 21:23:00) 

Привет!

Помогите пожалуйста!
Есть заполненный список типа StringList.
Этот список я перенес в Listbox1. пытаюсь в цикле получить доступ к конкретной записи в списке через listbox.
Не получается...
procedure TForm1.ListBox1Click(Sender: TObject);
var i: integer;
begin
 for i:=0 to list1.Count-1 do
 begin
   label1.Caption:= list1.Strings[i];
 end;
end;


RASkov   (2007-02-15 22:18:00) [1]

> RASkov ты наверное сам прикалываешься?

Точно:) Просто как можно еще понять такое:
for i:=0 to list1.Count-1 do
begin
  label1.Caption:= list1.Strings[i];
end;
Здесь ты на клик по листбоксу присваиваешь поочередно все элементы лэйбле..., и зачем предварительно создавать и заполнять StringList потом его переносить в ListBox...? Вообщем сам виноват - криво объяснил - мне мозги затуманил, отсюда мой такой ответ.

>извини если обидел

Нисколько. Сам держись:)


Первокласник Вася   (2007-02-15 21:49:00) [2]

RASkov ты наверное сам прикалываешься?

У Desdechado пожалуй вариант лучше, по крайней мере для меня, причем рабочий чем твой (извини если обидел). Но эименно [5] то что мне нужно!

Спасибо всем за помощь!!


Desdechado   (2007-02-15 21:40:00) [3]

procedure TForm1.ListBox1Click(Sender: TObject);
begin
 if( ListBox1.ItemIndex >= 0 ) then
   label1.Caption:= Listbox1.Items[ Listbox1.ItemIndex ];
end;


RASkov   (2007-02-15 21:40:00) [4]

> [3] Desdechado ©   (15.02.07 21:33)

Больше на прикол похоже... дурь какая-то... ничего связанного из сказанного в [0] не вижу..
procedure TForm1.ListBox1Click(Sender: TObject);
var i: integer;
begin
for i:=0 to listbox1.Count-1 do
begin
  label1.Caption:= label1.Caption+list1.Strings[i];
end;
end;

> Этот список я перенес в Listbox1

Нахрена его кудато переносить если всего-то надо получить доступ к конкретному элементу в списке....?


Первокласник Вася   (2007-02-15 21:37:00) [5]

???
А я думал (не правильно значит) что одно и тоже.
А как быть в такой ситуации?
Мне нужно из списка выбрать какой-то элемент и отобразить его.


Desdechado   (2007-02-15 21:33:00) [6]

дык, ListBox1 и list1 - это разные вещи.


Первокласник Вася   (2007-02-15 21:26:00) [7]

У меня почему-то только первый элемент списка отображается, а я хочу второй, третий и т.д. (в цикле перебрать). Брат, подскажи пожалуйста!


Desdechado   (2007-02-15 21:24:00) [8]

и что не получается?


Наверх

Титульная страница Поиск, карта сайта Написать письмо