Как последовательно изменить ItemIndex в ComboBox'е

[Oleg Romanchuk]

procedure TPassForm.PassEditKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
i,r:integer;
begin
if key=38 then //если нажата стрелка вверх
  begin
    for i:=0 to 10 do
      begin
        r:=i+1;
      end;
      r:=LoginComboBox.ItemIndex;
  end
    else
      if key=40 then //если нажата стрелка вниз 
      begin
       for i:=0 to LoginComboBox.Items.Count-1 do
         begin
            //  LoginComboBox.ItemIndex.Next ?
         end;
      end;
      end;
end.

Фокус в Edit'e...

Вчера закрыли тему, я так и не понял как это осуществить. Надо при нажатии на стрелку вверх в ComboBox-е изменялись имена в последовательности, а при нажатии на кнопку вниз наоборот.
И если что-то измениться от этого в ComboBox добавляю имена с помощью цикла через SQL запрос из БД.

[Stilet]

изменялись имена в последовательности

Это как?

LoginComboBox.ItemIndex.Next ?

Чет тоже не понятно, это свойство типа integer Оно показывает какой элемент Комбика сейчас нужно "высветить" в его текстовом поле и подсветить в самом листе комбика. В цикле приплюсовывай к нему единичку - это даст проход по всем жэлементам, только не ясно нафинта тебе это

[FaTaL]

    for i:=0 to 10 do
      begin
        r:=i+1;
      end;

Вот этот цикл вообще непонятно для чего?! Можно без цикла присвоить r := 11;

[Oleg Romanchuk]

Сообщение от Stilet

Это как?

В комбике есть имена пользователей: Админ, Пользователь, Пользователь2 и т.д. Нужно изменять их при нажатии клавиш вверх\вниз.

В цикле приплюсовывай к нему единичку - это даст проход по всем жэлементам

можно по подробней, плиз... студент ещё, учусь

только не ясно нафинта тебе это

Хочу сделать примерно как в Штрих-м кассире: Авторизация доступа
В комбо боксе выберешь имя а в Edit вводишь пасс

[Stilet]

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

[Oleg Romanchuk]

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

Все правильно, все работает... А я пытаюсь сделать что бы фокус ввода был в Edit'e, и изменять имена в определенной последовательности... что-то типа Table1.Next; Table1.First; !!! программу пишу для Дипломной работы...

[Stilet]

имена в определенной последовательности

И что это за последовательность?
.Next - аналог - ComboBox.ItemIndex:=ComboBox.ItemIn dex+1
.First - аналог - ComboBox.ItemIndex:=0

Малопонятно если чесно...

[Oleg Romanchuk]

Stilet - Спасибо большое, тема закрыта - разобрался наконец-то