LISTBOX!!! - hhhheeeeeellllppppppp!!!!!!!!!

← →
ИЛЮХА (2003-12-22 19:31) [0]

У меня такой интересный вопрос!!! Объясню на примере.
У меня несколько LISTBOX-ов (допустим четыре) я удаляю один файл из списка одного из LISTBOX-ов (допустим третий )
И МНЕ НУЖНО ЧТО БЫ С ОСТАЛЬНЫЙ LISTBOX-ов УДАЛИЛИСЬ третьи ФАЙЛЫ, Т.Е.

Я удаляю "333" из первого LISTBOX-a и должны удалиться "ddd" "888" "rrr", из 3-ч других LISTBOX-ов. Доступно объяснил!?!? (пример)
Только не надо писать простое удаление, т.е.
если 333 delete then ddd b 888 b rrr delete (не рабочий пример).
Желательно, без
If LB1.ItemsIndex1 delete then ...
Че тока не пробовал, не получается, то ошибки, то ошибок нет, но не работает!?!?
Может кто знает!?!?

← →
panov (2003-12-22 19:35) [1]

Во-первых, незачем так орать.
Во-вторых, где твой неработающий код?

← →
ИЛЮХА (2003-12-22 20:33) [2]

Во-первых я не ору!!! Ты вообще врятли меня слышишиь!!!
Ни какого кода нет. Их было много, не которые даже работали, но не так как мне надо.

P.S. panov - это твоя фамилия???????????

← →
panov (2003-12-22 20:52) [3]

>ИЛЮХА © (22.12.03 20:33) [2]

Восклицательные знаки используются в интернете именно для воплей.

по теме:

Ни какого кода нет. Их было много, не которые даже работали, но не так как мне надо.

Так как же мы тебе можем помочь, если непонятно, каким образом ты удаляешь строку, что тебе известно на момент удаления, как информация структурирована в TListBox.

← →
Palladin (2003-12-23 05:11) [4]

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

← →
TUser (2003-12-23 07:05) [5]

[2] - интересный ответ. Тебя спросили, гле твой неработающий код. Ты отвечаешь, что, мол, много их было, но только они не работают. Так хоть один привел бы.

← →
Zergling (2003-12-23 07:09) [6]

P.S. panov - это твоя фамилия???????????

panov © осторожней! Видать силовое ведомство или еще чего. А может и вобще закажут :)

← →
Ega23 (2003-12-23 09:06) [7]

> Zergling © (23.12.03 07:09) [6]
> P.S. panov - это твоя фамилия???????????
>
> panov © осторожней! Видать силовое ведомство или еще чего.
> А может и вобще закажут :)

Или налоговая...

← →
Спрашивающий_ (2003-12-23 09:56) [8]

И чем кричащему товарищу If-ы не понравились?
p.s. Если бы так не кричали и самое главное не умничал, ответ получил бы через 1 мин, а то завалил тут всех кодами уж не знаю с какого начать?

← →
@lex (2003-12-23 10:09) [9]

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

← →
wicked (2003-12-23 10:15) [10]

2 ИЛЮХА

например так
procedure DeleteItem(const name: string);
var i: integer;
begin
i := ListBox1.Items.IndexOf(name);
if i >= 0 then begin
ListBox1.Items.Delete(i);
ListBox2.Items.Delete(i);
ListBox3.Items.Delete(i);
ListBox4.Items.Delete(i);
end;
end;

а вообще то повежливей не мешало бы быть...

← →
wicked (2003-12-23 10:16) [11]

ЗЫ не люблю реп... :(

← →
REA (2003-12-23 10:20) [12]

А файлы тут при чем?

← →
ИЛЮХА (2003-12-23 10:38) [13]

Че то я вас не понимаю.
Восклицательный знак, это чтобы красиво и заметно было.
Я ни хотел орать. Могу всегда ставить точки............
Вот пример кода, который работает, но не выполняет нужную функцию. Тот что приведен выше сейчас попробую .

← →
имя (2003-12-23 10:41) [14]

Удалено модератором
Примечание: Не надо в стеб вести под разными именами...

← →
Тимохов (2003-12-23 10:41) [15]

2ИЛЮХА © (23.12.03 10:38) [13]

Прикол, "работатет, но делает того, что нужно".
Это шутка, что ли - говоришь вот пример, кода, который рабатет, но не делает то, что нужно, и ничего не приводишь?

Юмор ценю.

← →
ИЛЮХА (2003-12-23 10:48) [16]

Я закасячил.
Вот код:

Procedure DelItem(Index:Word);
Begin
LB1.Items.Delete(Index);
LB2.Items.Delete(Index);
LB3.Items.Delete(Index);
LB4.Items.Delete(Index);
End;

он делает НЕ то что нужно.
У меня просто пальцы в клаве застряли.

← →
TUser (2003-12-23 10:48) [17]

2 ИЛЮХА
Не длинный у тебя код получился. Целых 0 строчек.

PS. Интересно, скоро эту ветку в Потрепаться отправят?

← →
Тимохов (2003-12-23 10:51) [18]

ИЛЮХА © (23.12.03 10:48) [16]

Да ты издеваешься просто - откуда нам знать как ты эту процедуру вызываешь.

← →
REA (2003-12-23 10:51) [19]

>У меня просто пальцы в клаве застряли.

Вот это скорее всего.

← →
Palladin (2003-12-23 11:01) [20]

> ИЛЮХА © (23.12.03 10:48) [16]

Приведенный код делает именно то что ему и сказано, а конкретно, удаляет элемент под номером Index из четырех TListBox (ведь это всё TListBox?). С другой стороны, теперь стоит послушать: почему ты считаешь, что он делает не то что нужно?

← →
ИЛЮХА (2003-12-23 11:20) [21]

Прочитай первую статью. и ты поймешь.
Или я че то не то делаю.
напишите мне тогда еще обработчик для кнопки удаления.
Я сверю. может у меня с руками чето не то.
пожалуйста.

← →
Тимохов (2003-12-23 11:21) [22]

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

← →
Alex_Bredin (2003-12-23 11:22) [23]

клинический случай

← →
Romkin (2003-12-23 11:23) [24]

2ИЛЮХА http://ln.com.ua/~openxs/articles/sq_118.html
Пожалуйста, внимательно прочитай

← →
KSergey (2003-12-23 11:26) [25]

> ИЛЮХА © (22.12.03 19:31)
> Я удаляю "333" из первого LISTBOX-a и должны удалиться "ddd"
> "888" "rrr", из 3-ч других LISTBOX-ов. Доступно объяснил!?!?

НЕТ! НЕ ПОНЯТНО!

Совершенно не понятно как связаны "333" из первого LISTBOX-a и "ddd" "888" "rrr", из 3-ч других LISTBOX-ов

И при чем тут файлы? Где тут файлы? Пока вроде речь только про элементы из ListBox"ов.
А файлы тут при чем???

PS
Я просто поражаюсь, насколько мы тут все тупые! Вот только автора это, похоже, ни на какие мысли не наталкивает...

← →
KSergey (2003-12-23 11:30) [26]

OFF

> [24] Romkin © (23.12.03 11:23)
> 2ИЛЮХА http://ln.com.ua/~openxs/articles/sq_118.html
> Пожалуйста, внимательно прочитай

Сколько читаю этото материал - никак не могу понять при чем тут хакеры?

← →
@lex (2003-12-23 11:32) [27]

2 ИЛЮХА ©
Все таки ваша функция должна делать то что нужно. Наверное, вы не то подставляете в качестве параметров.
У вас одна кнопка, и вам нужно выяснить какой из ListBox-ов активный, и потом подставить в функцию индекс выбранной записи активного ListBox-а?

← →
sniknik (2003-12-23 11:50) [28]

беда некоторых программистов,
"программа делает не то что задумано а то что написано." ;о))

← →
Igorek (2003-12-23 13:31) [29]

НАРОД, Я ПОООНЯЯЯЛЛЛ!!! :)
У чела есть четыре листбокса. Он выбирает в одном какую то запись, а потом жмет на кнопку. И хочет что-бы во всех листбоксах удалилась запись с тем номером, что выбранная.
Проблема в том, что обработчик кнопки не знает, какой лист бокс использовался перед нажатием на кнопку.

> ИЛЮХА © (22.12.03 19:31)

Короче делай один обработчик на все листбоксы, анализируй Sender, узнавай индекс элемента и удаляй во всех. Код не приведу - не проси. :)))

← →
Anatoly Podgoretsky (2003-12-23 13:36) [30]

Ты думаешь, вот он сейчас в чате, а ситуация не меняется, все что известно, так это то что НЕ РАБОТАЕТ

← →
Marser (2003-12-23 13:40) [31]

А можно Chubais"a заменить? Можно, да? Ну ладно:
АААААААААААААААААААААААА!!!!
;-)

← →
Palladin (2003-12-23 13:40) [32]

> ИЛЮХА © (23.12.03 11:20) [21]

Какую первую статью? Не вижу никаких статей. Отвечай на поставленный мною вопрос по существу и я тебе отвечу по существу.

← →
ИдиотЪ (2003-12-23 13:42) [33]

зачем так громко кричать, я уже и так ничего не слышу !!!

← →
Ru (2003-12-23 16:09) [34]

>ИЛЮХА ©

по идее алгоритм следующий:
1. кликаем на один из листбоксов, чем вызываем событие OnClick, в котором присваиваем заранее приготовленной глобальной переменно номер выделенной записи (соответственно у каждого листбокса свой OnClick)
2. нажимаем кнопку, которая отвечает за удаление записей, вот эта кнопка вызывает приведенный вами код из сообщения ИЛЮХА © (23.12.03 10:48) [16]; в этом коде в качестве передаваемого параметра вам необходимо использовать вашу глобальную переменную.

var
intGlobalListBoxItemNumber:word; //глобальная переменная

procedure LB1.OnClick(Sender:TObject);
begin
intGlobalListBoxItemNumber:=LB1.ItemIndex;
end;

{повторить асолютно похожее для каждого LB}

procedure DelBtn(Sender:TObject);
begin
DelItem(intGlobalListBoxItemNumber); //запустили удаление
end;

я могу ошибаться

← →
митяй (2003-12-23 16:14) [35]

Чушь какакя-то!
Чувак явно не в себе!!!

← →
Mike Kouzmine (2003-12-23 16:17) [36]

Ru © (23.12.03 16:09) [34] Ошибаешься.
Проблема в том, чтобы определить активный бокс перед нажатием кнопки. Можно сделать так, на событие onEnter всех боксов поставить код, который чистит таг (0) у всех боксов, а свой выставляет в 1. При нажатии на кнопку ищем бокс у кого выставлен таг и пляшем от печки.
Можно по другому.

← →
Ru (2003-12-23 16:19) [37]

>Mike Kouzmine © (23.12.03 16:17) [36]

вслед за автором ветки посылаю к первому сообщению. Если я не ошибся в коде, то всё правильно.

← →
Mike Kouzmine (2003-12-23 16:21) [38]

← →
Ru (2003-12-23 16:23) [39]

>Mike Kouzmine © (23.12.03 16:21) [38]

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

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

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