Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.20;
Скачать: CL | DM;

Вниз

LISTBOX!!! - hhhheeeeeellllppppppp!!!!!!!!!   Найти похожие ветки 

 
Sandman25 ©   (2003-12-23 16:50) [40]

[39] Ru © (23.12.03 16:23)

Зачем 4? Sender же есть.


 
Ru ©   (2003-12-23 16:54) [41]

>Sandman25 © (23.12.03 16:50) [40]

читаем ветку с начала и приходим к выводу, что для обеспечения нормального восприятия полученной информации пример должен быть на том же уровне


 
Sandman25 ©   (2003-12-23 16:56) [42]

[41] Ru © (23.12.03 16:54)

Хлопая себя по лбу...
-А...
-Семен Семеныч...


 
REA ©   (2003-12-23 17:34) [43]

Все на борьбу с листбоксами...
Мне почему то кажется, что после решения проблемы лучше никому не станет. Скорее наоборот.


 
Mike Kouzmine ©   (2003-12-23 17:38) [44]

REA © (23.12.03 17:34) [43] Почему же. Может какой-нибудь малыш из далекой Африки хоть на секунду станет счастливее...


 
Igorek ©   (2003-12-23 17:52) [45]


> Mike Kouzmine ©
> Ru ©

Народ, проще все. Один обработчик на все листбоксы и в нем такое:
var
Index: Integer;
begin
if Sender = LB1 then
Index := LB1.ItemIndex(LB1.Text)
else
if Sender = LB2 then
Index := LB2.ItemIndex(LB2.Text)
else
if Sender = LB2 then
Index := LB3.ItemIndex(LB3.Text)
else
Index := LB4.ItemIndex(LB4.Text)

LB1.DeleteItem(Index);
LB2.DeleteItem(Index);
LB3.DeleteItem(Index);
LB4.DeleteItem(Index);

Сорри, если методы где попутал.


 
Ru ©   (2003-12-23 18:04) [46]

>Igorek © (23.12.03 17:52) [45]

во-первых лень напрягаться
во-вторых если человек так реагирует даже на попытки помощи, то уложнять не следует, пример должен быть как можно проще


 
MVova ©   (2003-12-23 18:07) [47]


> Igorek © (23.12.03 17:52) [45]

Это круто.

подумай про TListBox(Sender)


 
Palladin ©   (2003-12-23 19:30) [48]

:)


 
ssk   (2003-12-23 19:40) [49]

рульная ветка


 
Marser ©   (2003-12-23 20:00) [50]

Вот только мне подумалось, что форум оскучнел, сразу появилось несколько веток-опровержений. Так держать, господа LMD!


 
Style ©   (2003-12-23 20:05) [51]

а к какой категории относит себя господин Marser © ?


 
app ©   (2003-12-23 20:16) [52]

Личная переписка, у господина Marser доступна почта, вот туда и пошли свой вопрос.


 
app ©   (2003-12-23 20:17) [53]

Ответ ествествнно, если будет желание, также по почте, ответный адрес тоже доступен.


 
Style ©   (2003-12-23 20:28) [54]

2 app

- Сорри, так и сделал можно вырезать!


 
app ©   (2003-12-23 20:52) [55]

Оставьлю для других.


 
Спрашивающий_   (2003-12-24 03:20) [56]

To ИЛЮХА ©
procedure TForm1.Button1Click(Sender: TObject);
var
I:Word;
J:SmallInt;
begin
J:=ListBox1.ItemIndex;//Нужный Items(ИЛЮХА © определяйся сам, вариантов много )
If J>=0 Then
For I:=0 To Form1.ComponentCount-1 Do
If Form1.Components[I] is TListBox Then
TListBox(Form1.Components[I]).Items.Delete(J) ;
end;


 
Германн ©   (2003-12-24 03:59) [57]

Пока нет ответа на
KSergey © (23.12.03 11:26) [25]
"Совершенно не понятно как связаны "333" из первого LISTBOX-a и "ddd" "888" "rrr", из 3-ч других LISTBOX-ов"
любой ответ будет не хуже этого:

Randomize;
for i:=0 to Form1.ComponentCount-1 Do
If Form1.Components[I] is TListBox Then begin
k:=Random(TListBox(Form1.Components[I]).Items.Count);
TListBox(Form1.Components[I]).Items.Delete(k) ;
end;


 
KSergey ©   (2003-12-24 08:37) [58]

А где же наш доблестный автор?? Я, сказать по-правде, надеялся, что он появится.... растолкует мне, недалекому...


 
mfender ©   (2003-12-25 12:29) [59]

Здорово. От души развлекся. Как в баню сходил. Заново народился. Поорать бы счас на радостях то... А!!? А-а-а!!!!


 
Marser ©   (2003-12-26 20:40) [60]


> Style © (23.12.03 20:05) [51]
> а к какой категории относит себя господин Marser © ?

Полубог ;-)

> app © (23.12.03 20:16) [52]
> Личная переписка, у господина Marser доступна почта, вот
> туда и пошли свой вопрос.

Marser "a, я в анкете пол указал конкретно(если у кого-то вызывает сомнения имя :-) )


 
Nous Mellon ©   (2003-12-26 20:43) [61]


> Полубог ;-)

Нехорошо


 
Marser ©   (2003-12-27 00:37) [62]


> Nous Mellon © (26.12.03 20:43) [61]
>
> > Полубог ;-)
>
> Нехорошо

А что, на такие вопросы надо серьезно отвечать? Прочитав письмо, я вообще хотел послать открытым текстом, но потом нашел ветку и решил отшутиться.


 
Style ©   (2003-12-27 11:57) [63]

Marser ©
Ну так пошли открытым текстом..

Вот я например - лесоруб ;)
Вроде ничего не знаю, зато топором умею махать.

Просто я не понимаю, когда один человек начинает считать другого LMD, по сравнению с собой? Это начинает вызывать некоторую неприязнь.

Сейчас на столько вырос компьютерний мир в ширину, т.е. появилось куча всяких направлений и даже видов компьютерной деятельности - ну нельзя так просто обозвать человека ламером, если он в чем то не прав - вообще LMD помоему это глупая оценка, а если человек хамит явно - то это уже флудер или бык! :)



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

Текущий архив: 2004.01.20;
Скачать: CL | DM;

Наверх




Память: 0.58 MB
Время: 0.032 c
1-63123
C0rWin
2004-01-10 19:36
2004.01.20
Изменение стилей на лету.


1-63205
Ser_ega
2004-01-09 23:17
2004.01.20
Копия экрана!!!


1-63058
jiurajhgjhgty
2004-01-08 19:24
2004.01.20
Выделение ячейки в Excel через OLE


3-62975
GIL
2003-12-24 12:13
2004.01.20
запрос


1-63083
WELLiON
2004-01-06 16:13
2004.01.20
Timer и оставшееся время