Скачать: CL | DM;

Список   Найти похожие ветки 

← →
Первокласник Вася   (2007-02-15 21:23) [0]

Привет!

Помогите пожалуйста!
Есть заполненный список типа 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;



---

← →
Desdechado ©   (2007-02-15 21:24) [1]

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

---

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

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

---

← →
Desdechado ©   (2007-02-15 21:33) [3]

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

---

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

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

---

← →
Desdechado ©   (2007-02-15 21:40) [5]

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

---

← →
RASkov   (2007-02-15 21:40) [6]

> [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:49) [7]

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

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

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

---

← →
RASkov   (2007-02-15 22:18) [8]

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

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

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

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

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c