Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1502844 Thu, 29 Mar 2007 05:46:30 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1502844 Stratocoder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1502838 Thu, 29 Mar 2007 05:40:35 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1502838 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501355 Wed, 28 Mar 2007 06:58:04 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501355
     for i:=ListBox1.Count-1 DownTo 0 do
      if ListBox1.Selected[i] then
       ListBox1.Items.Delete(i);
]]> DMX_XC Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501203 Wed, 28 Mar 2007 05:34:46 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501203 Цитата koder @
ПРи удалении Connections[i] например удаляя 1 элемент, второй элемент не станет первым?
Станет. При удалении элементов из списков пользуются обратным ходом: for i:=max downto 0 do]]> Testudo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501201 Wed, 28 Mar 2007 05:33:20 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501201 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501180 Wed, 28 Mar 2007 05:16:05 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501180 koder, проходись по списку и делай, что тебе нужно с TCPServer1.Connections[I]. Если не получилось, скажем, удалить соединение, то делай Selected:=false. А после цикла вызови ListBox1.DeleteSelected;
Вот и все.]]> Testudo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501163 Wed, 28 Mar 2007 04:58:30 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1501163
     for i:=0 to SendToBox.Items.Count-1 do
           If SendToBox.Selected[i] then
           begin
             tmpClient := TCPServer1.Connections[I];
             TCPServer1.Send(tmpClient, PChar(Code), Length(Code));
           end;

а также соединения TCPServer1.Connections[I]
есть ли другой способ отличный от записывание номеров в массив в список?]]> koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500828 Tue, 27 Mar 2007 17:42:04 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500828 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500820 Tue, 27 Mar 2007 17:28:50 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500820 Gaws Компилятор сам так сделает.]]> P.O.D Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500814 Tue, 27 Mar 2007 17:20:18 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500814
    x:=ListBox1.Items.Count-1;
    for i:=0 to x do
     If ListBox1.Selected[i] then
      ListBox2.Items.Add(ListBox1.Items[i]);

и Больше дополнить нечем.]]> Gaws Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500797 Tue, 27 Mar 2007 16:55:04 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500797
    for i:=0 to ListBox1.Items.Count-1 do
     If ListBox1.Selected[i] then
      ListBox2.Items.Add(ListBox1.Items[i]);
]]> Profi Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500728 Tue, 27 Mar 2007 16:02:57 +0000 Как узнать все выделенные элементы в ListBox https://forum.sources.ru/index.php?showtopic=177452&view=findpost&p=1500728 koder Delphi: Общие вопросы