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

Вниз

Пару вопросов про ListBox   Найти похожие ветки 

 
iudjen ©   (2004-05-09 15:59) [0]

procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
   r:word;
begin
if (AlreadyEnteredWord(listbox1.Count)=false) then exit;

r := MessageDlg(""Вы действительно хотите удалить это слово  ",mtConfirmation,[mbYes,mbCancel],0);
if r = mrYes then
begin
  for i:=0 to Listbox1.Items.Count - 1 do
  if ListBox1.Selected[i] then

  begin
  ListBox1.Items.Delete(i);
  ListBox2.Items := listbox1.Items;
  ListBox3.Items := listbox1.Items;

end;
end;
if r = mrCancel then exit;
end;

И когда я хочу удалить первое слово, он мне выдаёт ошибку:
Project Project.exe raised exception class EListError with message "List index out of bounds (1)"
А когда (первое) слово единственное в списке всё идет хорошо
(слово я выделяю)


 
Mim1 ©   (2004-05-09 16:06) [1]

for i := Listbox1.Items.Count - 1 downto 0 do


 
iudjen ©   (2004-05-09 16:18) [2]

И как сделать чтобы в ListBoxe русские или англииские слова выстраивались по порядку от А Б В .. Ю Я. И чтобы to] какой-то ListBox изменял свой списки вместк с этим. Спасибо всем за то что прочитали. И ещё спасибо если ответят


 
Anatoly Podgoretsky ©   (2004-05-09 16:26) [3]

Естественно свойство Sorted
Как плохо жить без словаря



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
8-1078753292
max003
2004-03-08 16:41
2004.05.23
Вытащить JPEG из файла с картинками


1-1083663681
Islander
2004-05-04 13:41
2004.05.23
Как определить, включены ли темы в XP?


1-1083758296
Семен Сорокин
2004-05-05 15:58
2004.05.23
Окна сверху вниз/слева направо


14-1083328424
Ega23
2004-04-30 16:33
2004.05.23
Господа, коллеги, товарищи, друзья!


3-1083244166
Kibas
2004-04-29 17:09
2004.05.23
Обработка отвалившегося коннекта с БД