[Erilar]

В Листбоксе список имен. Нужно задействовать три кнопки.

Первая: Удаляет выбранное имя.
Вторая: Выбранное имя перемещается на позицию вверх.
Третья: Выбранное имя перемещается на позицию вниз.

[Aristarh Dark]

Вверх:

Код:

var
  currentstring:string;
  ix:Integer;
begin
  if ProtocolList.Items.Count>0 then
    if ProtocolList.ItemIndex<>0 then
      begin
        ix:=ProtocolList.ItemIndex;
        currentstring:=ProtocolList.Items[ix];
        ProtocolList.Items.Delete(ix);
        Dec(ix);
        ProtocolList.Items.Insert(ix,currentstring);
        ProtocolList.ItemIndex:=ix;
      end;
end;

Вниз и удаление сам додумаешь.

[Erilar]

Сообщение от Aristarh Dark

Вниз и удаление сам додумаешь.

Удаление додумал, а вниз не могу.

[friz]

Так в коде от Aristarh Dark надо только одну строчку поменять....

[Erilar]

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

Так в коде от Aristarh Dark надо только одну строчку поменять....

Какую строчку?

[friz]

Не надо лениться думать...
Dec(ix); ---> Inc(ix);