Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340553 Sun, 18 Apr 2004 10:09:46 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340553 СПАСИБО ОГРОМНОЕ
в особености
Old
и ... Админу Song ты супер :D :D :D]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340417 Sat, 17 Apr 2004 21:47:50 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340417 Или
Цитата Song 17.04.04, 14:26
Забей..
]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340275 Sat, 17 Apr 2004 14:26:55 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340275 Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340267 Sat, 17 Apr 2004 14:16:13 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340267
...

:blink:]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340192 Sat, 17 Apr 2004 11:37:50 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340192 PsiHo, эта ссылка не на тему, а на посты, о которых я говорил. (Ты нажать-то пробовал) ?]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340135 Sat, 17 Apr 2004 09:16:55 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340135 Song
и что ты этим хочеш сказать >:(

что за прикол покавывать мне ссылки моих же тем

:wacko:]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340010 Sat, 17 Apr 2004 00:18:19 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=340010 Цитата Song @ 16.04.04, 13:59
Цитата
PsiHo, 16.04.04, 17:37
это что же именно я не читал

Два comboBox
Два comboBox

Все возвращается на круги своя...
:'(]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339808 Fri, 16 Apr 2004 13:59:28 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339808 Цитата
PsiHo, 16.04.04, 17:37
это что же именно я не читал

Два comboBox
Два comboBox]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339786 Fri, 16 Apr 2004 13:37:01 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339786
Добавлено в :
я же говорил и говорю еще раз пишите по подробнее я еще не спец :blink:]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339781 Fri, 16 Apr 2004 13:33:31 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339781 Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339760 Fri, 16 Apr 2004 13:20:11 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339760
Добавлено в :
Спасибо !!!

наконец то решили, надеюсь (еще не проверял)]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339386 Fri, 16 Apr 2004 04:31:41 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339386 Само собой в TComboBox такого нет, т.к. там контейнер - TStrings, а не TStringList.
Ребят, вы хоть читайте что я пишу в постах.]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339343 Fri, 16 Apr 2004 00:47:19 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339343 Цитата Song @ 15.04.04, 18:43
Duplicates:=dupIgnore;

А мы искали в ComboBox'ax :D
А оно типа в массивах :P]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339254 Thu, 15 Apr 2004 18:43:12 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339254
    With TStringList.Create Do
     try
      Sorted:=True;
      Duplicates:=dupIgnore;
      Add('String1');
      Add('String1');
      Add('String2');
      Add('А теперь убедитесь что над этой надписью две строки,а не три!');
      ShowMessage(Text);
     finally
      Free;
     end;
]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339250 Thu, 15 Apr 2004 18:31:43 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339250 а случай тяжёлый (даже очень ) :D :D :D]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339246 Thu, 15 Apr 2004 18:28:00 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339246 Хочешь на Дельфи?]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339242 Thu, 15 Apr 2004 18:18:49 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339242 Song
я же это уже писал
читай #26

Цитата
PsiHo, 15.04.04, 11:33
а насчет:
Sorted = True
Duplicate = dupIgnore
поставил, но нефига не выходит


напиши как именно по твоему
( :wacko: )]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339221 Thu, 15 Apr 2004 17:38:08 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=339221 Цитата
PsiHo, 15.04.04, 15:33
а што ты хотел чтобы все вопросы решался мигом

именно.

После того как поставил Sorted = True и Duplicate = dupIgnore
добавляй в список две одинаковых строки. Увидишь, что вторая не добавится.]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338927 Thu, 15 Apr 2004 11:33:34 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338927 Song

а што ты хотел чтобы все вопросы решался мигом или как...
а насчет:
Sorted = True
Duplicate = dupIgnore
поставил, но нефига не выходит

p.s. может сам побыстрому напишеш, ась...

Old
да, речь идет по-прежнему о сравнении, а потом и добавке двух combobox'ов
ComboBox2->ItemIndex=ComboBox1->ItemIndex;

ё - мае:
дык, как сделать...]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338636 Thu, 15 Apr 2004 04:43:23 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338636 Old,
1) перед занесением элемента в любой список прогоняй его через TStringList.
2) Постоянно храни данные в TStringList, а после добавления просто ассигни на TComboBox.Items
3) Обрабатывай циклом в конце концов, удаляя всё вручную..

Удивлён, что такой вопрос столь долго обсуждается.]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338571 Wed, 14 Apr 2004 22:48:03 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=338571 Цитата PsiHo @ 13.04.04, 06:19
:wall: :wall: :wall:
что за такое невыходит повторения есть
:'( :'( :'(


Так оно ж должно удаляться при нажатии кнопочки...

Речь по-прежнему идет о сравнении двух ComboBox:
    ComboBox2->ItemIndex=ComboBox1->ItemIndex;
?
В таком случае, если все это начать сортировать...
Например, если в ComboBox1 после последнего итема на я добавить итем на а и отсортировать...
Он же из последнего станет первым, и что тогда с чем сравнивать.
Ну да, если вводить в оба бокса две идентичные строки, и потом сортировать, и отлавливать совпадения...
Но это уже садомазохизм какой-то получается...
И что-то мне очень сильно кажется, что
Sorted = True
Duplicate = dupIgnore
не буде сортировать и сравнивать элементы в двух ComboBox...]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337297 Tue, 13 Apr 2004 09:35:02 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337297 Цитата
PsiHo, 13.04.04, 12:46
а насчет
Duplicate = dupIgnore

Где оно что найти не могу может покажешь
(и просьба пиши поподробнее)

оно у TStringList. Но без Sorted оно работать не будет.]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337245 Tue, 13 Apr 2004 08:46:18 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337245 Song
читал
при использовании Sorted = True получается что когда ты нажал на кнопку оно отсортировало (ну это и понятно) а мне данное действие не подходит...

а насчет
Duplicate = dupIgnore

Где оно что найти не могу может покажешь
(и просьба пиши поподробнее)
:yes:]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337194 Tue, 13 Apr 2004 07:55:01 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337194 PsiHo, почитай #16]]> Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337143 Tue, 13 Apr 2004 06:19:09 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=337143 что за такое невыходит повторения есть
:'( :'( :'(]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335661 Sat, 10 Apr 2004 14:25:22 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335661
    void __fastcall TForm1::ComboBox1Select(TObject *Sender)
    {
    ComboBox2->ItemIndex=ComboBox1->ItemIndex;
      if (ComboBox1->Text.Pos(ComboBox2->Text))
          {
             if (Application->MessageBox(
                    "Ай-я-яй!\nОбнаружены совпадения в ComboBox'ax!\nУдалить элемент!",
                    "Проверка сопадений",
                    MB_OK + MB_ICONWARNING))
                    {
                    ComboBox1->Items->Delete(ComboBox1->ItemIndex);// удаляем элемент ComboBox'a
                    ComboBox1->ItemIndex = 0;
                    }
              }
      else
         Application->MessageBoxA("Совпадений в ComboBox'ax нет.", "Проверка совпадений", MB_ICONASTERISK);
         }
]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335590 Sat, 10 Apr 2004 11:56:52 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335590 PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335255 Fri, 09 Apr 2004 18:40:36 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335255 Как бы так (без изысков с файлом типа ini и всяких там других box'ов и stringlist'ов (простите меня, за последнее, уважаемый KAV :) )):

Создаем два файла ComboBox1.txt и ComboBox2.txt
Файл ComboBox1.txt
    Title 1                                    
    Title 2                                    
    Повторяющийся элемент ComboBox'ов          
    Еще один повторяющийся элемент  ComboBox'ов

Файл ComboBox2.txt
    pathname1.txt                              
    C:\temp\pathname2.txt
    Повторяющийся элемент ComboBox'ов          
    Еще один повторяющийся элемент  ComboBox'ов

Пишем:
    ...
    //---------------------------------------------------------------------------
    void __fastcall TForm1::FormCreate(TObject *Sender)
    {
      ComboBox1->Items->LoadFromFile("ComboBox1.txt");
      ComboBox2->Items->LoadFromFile("ComboBox2.txt");
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::ComboBox1Select(TObject *Sender)
    {
    ComboBox2->ItemIndex=ComboBox1->ItemIndex;  // сравнение элементов
      if (ComboBox1->Text.Pos(ComboBox2->Text))
         ShowMessage("Ай-я-яй!\nНа этот раз Вам не удалось избежать повторений в ComboBox'ax!");
      else
         ShowMessage("Повторений в ComboBox'ax нет.");
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::ComboBox2Select(TObject *Sender)
    {
    ComboBox1->ItemIndex=ComboBox2->ItemIndex; // сравнение элементов
      if (ComboBox1->Text.Pos(ComboBox2->Text))
         ShowMessage("Ай-я-яй!\nВам снова не удалось избежать повторений в ComboBox'ax!");
      else
         ShowMessage("Повторений в ComboBox'ax нет.");
         }
    //---------------------------------------------------------------------------
     
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
      ComboBox1->Items->Add(ComboBox1->Text); // добавляем текст
      ComboBox1->Items->SaveToFile("ComboBox1.txt"); // записываем в файл
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button2Click(TObject *Sender)
    {
      ComboBox2->Items->Add(ComboBox2->Text); // добавляем текст
      ComboBox2->Items->SaveToFile("ComboBox2.txt"); // записываем в файл
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button3Click(TObject *Sender)
    {
      int i;
      i = ComboBox1->Items->IndexOf(ComboBox2->Text);
        if (i >= 0)
          ComboBox1->Items->Delete(i);
          ComboBox1->ItemIndex = 0; // удаляем элемент ComboBox'a
          {
            ComboBox1->Items->SaveToFile("ComboBox1.txt"); // записываем в файл
          }
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button4Click(TObject *Sender)
    {
      int i;
      i = ComboBox2->Items->IndexOf(ComboBox1->Text);
        if (i >= 0)
          ComboBox2->Items->Delete(i);
          ComboBox2->ItemIndex = 0; // удаляем элемент ComboBox'a
          {
            ComboBox2->Items->SaveToFile("ComboBox2.txt"); // записываем в файл
          }
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button5Click(TObject *Sender)
    {
    int i;
         i = ComboBox1->ItemIndex;
         if (i >= 0)
         ComboBox1->Items->Delete(i);
         ComboBox1->ItemIndex = 0;
         {
            ComboBox1->Items->SaveToFile("ComboBox1.txt"); // записываем в файл
          }
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button6Click(TObject *Sender)
    {
    int i;
         i = ComboBox2->ItemIndex;
         if (i >= 0)
         ComboBox2->Items->Delete(i);
         ComboBox2->ItemIndex = 0;
          {
            ComboBox2->Items->SaveToFile("ComboBox2.txt"); // записываем в файл
          }
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button7Click(TObject *Sender)
    {
    int ix;
      ix = ComboBox1->Items->IndexOf(ComboBox2->Text);
        if (ix >= 0)
          ComboBox1->Items->Delete(ix); // если есть повтор
          ComboBox1->ItemIndex = 0; // удаляем элемент ComboBox'a
          {
            ComboBox1->Items->SaveToFile("ComboBox1.txt"); // записываем в файл
          }
    {
      int iy;
      iy = ComboBox2->Items->IndexOf(ComboBox1->Text);
        if (iy >= 0)
          ComboBox2->Items->Delete(ix); // если есть повтор
          ComboBox2->ItemIndex = 0; // удаляем элемент ComboBox'a
          {
            ComboBox2->Items->SaveToFile("ComboBox2.txt"); // записываем в файл
          }
       }
    }
    //---------------------------------------------------------------------------

Теперь в любом ComboBox'e выбираем Повторяющийся элемент ComboBox'ов, и ждем сообщения :)
Вариант ComboBox2Select->ShowMessages не смог проверить, поскольку у меня было установлено
    ComboBox2->Enabled = false
:D]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335112 Fri, 09 Apr 2004 13:52:12 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335112 Song Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335080 Fri, 09 Apr 2004 13:05:50 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335080 Цитата
PsiHo, 8.04.04, 23:16
избежание повторений


Цитата
PsiHo, 9.04.04, 15:31
нет OLD все пашет но кто нибудь это знает как сделать

Избежание повторений- на уровне СomboBox чтото типа IndexOf?]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335044 Fri, 09 Apr 2004 12:31:50 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=335044 PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334590 Thu, 08 Apr 2004 23:49:14 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334590 Цитата PsiHo,8.04.04, 20:16
избежание повторений

Не работает?
Так речь, кажись, шла о сравнении элементов, а не об удалении повторов...
Или нет?]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334542 Thu, 08 Apr 2004 20:16:26 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334542 я сделал так:
запись:
ComboBox1->Items->Add(ComboBox1->Text);
ComboBox1->Items->SaveToFile("ComboBox1.txt");
ComboBox2->Items->Add(ComboBox2->Text);
ComboBox2->Items->SaveToFile("ComboBox2.txt");

загрузка:
ComboBox1->Items->LoadFromFile("ComboBox1.txt");
ComboBox2->Items->LoadFromFile("ComboBox2.txt");

:wacko:]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334488 Thu, 08 Apr 2004 18:42:39 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334488 Цитата PsiHo,8.04.04, 10:17
после добывки в ComboBox1->Items->Add(ComboBox1->Text);
оно записывалось в файл и все
а при открыти загружало :)

Например, вешаем это на две кнопки.

Button1->Click
    ComboBox1->Items->Add(ComboBox1->Text);
    ComboBox1->Items->SaveToFile("ComboBox1.txt");

Button2->Click
    ComboBox1->Items->LoadFromFile("ComboBox1.txt");

Где-то так :)]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334438 Thu, 08 Apr 2004 16:36:45 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334438 Цитата PsiHo,8.04.04, 07:05
OLD
при вводе значения и нажатия Button1 выдает cannot open file !!! :'(

А его там и нет :D

Создай файл в той же директории, что и проект, или, например c:\pathname.dat.
Или , или pupkin_lovely_file, или просто pathname.txt, не забыв в таком случае сделать:
    // загружаем Combobox'ы из файла bin\pathname.dat
    TIniFile* ini = new TIniFile(ExtractFilePath(Application->ExeName) + "pathname.txt");

Формат файла:
    ; Названия файлов
    [TITLE]
    FileTitle0=Title 1
    FileTitle1=Title 2
    ; Пути файлов
    [PATH]
    FilePath0=pathname1.txt
    FilePath1=C:\temp\pathname2.txt //или так


И вперед!]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334118 Thu, 08 Apr 2004 10:17:10 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334118 несовсем выходит нет новых записей в файле sss.txt ...
:'(

Добавлено в :
Kav
мне надо чтобы
после добывки в ComboBox1->Items->Add(ComboBox1->Text);
оно записывалось в файл и все

а при открыти загружало :)]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334015 Thu, 08 Apr 2004 08:00:21 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=334015 KAV Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333979 Thu, 08 Apr 2004 07:05:56 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333979 OLD
при вводе значения и нажатия Button1 выдает

cannot open file !!! :'(

KAV
СПАСИБО понял, :yes:
но как добавить значения в файл...

Bas
спасибо вроде работает :yes:
ComboBox1->ItemIndex=ComboBox2->ItemIndex;]]> PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333899 Thu, 08 Apr 2004 02:16:41 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333899
    ...
    #include "IniFiles.hpp"
    ...
    //---------------------------------------------------------------------------
    void __fastcall TForm1::FormCreate(TObject *Sender)
      {
      // загружаем Combobox'ы из файла bin\pathname.dat
      TIniFile* ini = new TIniFile(ExtractFilePath(Application->ExeName) + "pathname.dat");
      TStringList* Titles = new TStringList;
      TStringList* Path = new TStringList;
      ini->ReadSectionValues("TITLE", Titles);
      ini->ReadSectionValues("PATH", Path);
       for(int i=0; i<Titles->Count; ++i)
       {
       ComboBox1->Items->Add(Titles->Values["FileTitle"+IntToStr(i)]);
       }
       for(int i=0; i<Path->Count; i++)
       {
       ComboBox2->Items->Add(Path->Values["FilePath"+IntToStr(i)]);
       }
       ComboBox1->ItemIndex = 0;
       ComboBox2->ItemIndex=ComboBox1->ItemIndex;
       delete Titles;
       delete Path;
       delete ini;
       }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::ComboBox1Select(TObject *Sender)
    {
            ComboBox2->ItemIndex=ComboBox1->ItemIndex;
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::ComboBox2Select(TObject *Sender)
    {
            ComboBox1->ItemIndex=ComboBox2->ItemIndex;
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
            TStringList * List = new TStringList;
             int f = ComboBox2->ItemIndex; // строка ComboBox'a
             AnsiString lf = ComboBox2->Items->Strings[f]; // файл, который будем грузить
             ListBox1->Clear();
             List->LoadFromFile(lf);   // загружаем в TStringList строки из файла
            {
             for(int i=0;i<List->Count;i++)    // бежим по всем строкам
             ListBox1->Items->Add(List->Strings[i]);  // тогда добавляем в ListBox
             List->Clear();
             delete List;
             }
             }
    //---------------------------------------------------------------------------

Не проверял! © trainer]]> Old Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333705 Wed, 07 Apr 2004 16:27:42 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333705 Компонент этот появился с C++Builder6. Находится на вкладке Additional. Он служит для редактирования списка вида "имя = значение". Например, пользователю требуется для работы программы задать несколько переменных, можно его использовать - в первой колонке будет имя, во второй - вводимое пользователем значение. Надписи на заголовках задаются в свойстве TitleCaptions. По умолчанию - "Key \n Value". Сами данные в свойстве Strings, имеющее тип TStrings. Встроенный редактор этого свойства позволяет все визуально спроектировать. Во время выполнения к ключам и значениям можно добраться через Keys и Values или Cells. Во время выполнения, если разрешено редактирование, пользователь сам может изменять значения, и даже добавлять и удалять (естественно, если такой режим включен). Свойство KeyOptions определяет, какие операции доступны пользователю (во время выполнения) при редактировании колонки имен. Это keyEdit (редактирование имен), keyAdd (добавление новых строк), keyDelete (удаление строк), keyUnique (имена не могут повторяться). Свойство ItemProps позволяет установить параметры редактирования каждого из элементов списка. Это массив, каждый его элемент - типа TItemProp. Он имеет ряд свойств, применимых к каждому элементу: EditMask (маска ввода, так же как и у MaskEdit, как ей пользоваться - здесь: http://bcb-faq.pochta.ru/094.html), EditStyle (стиль редактирования (esSimple (обычное редактирование), esEllipsis (кнопка с многоточием, при нажатии на нее - событие OnEditButtonClick, где можно показывать, например, специальную форму для редактирования значения), esPickList (выпадающий список, для его формирования - OnGetPickList))), ReadOnly (можно ли пользователю изменять значение в самом окне), MaxLength (максимально допустимая длина вводимых символов). Свойства TValueListEditor DisplayOptions и просто Options регулируют различные параметы поведения и отображения.
:)]]> KAV Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333652 Wed, 07 Apr 2004 15:08:25 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333652 ComboBox1->ItemIndex=ComboBox2->ItemIndex;
В событии Change]]> Bas Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333635 Wed, 07 Apr 2004 14:53:25 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333635 PsiHo Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333584 Wed, 07 Apr 2004 14:03:53 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333584 Sazabis Borland C++ Builder/Turbo C++ Explorer https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333555 Wed, 07 Apr 2004 13:13:14 +0000 Два comboBox https://forum.sources.ru/index.php?showtopic=50663&view=findpost&p=333555
на form'e 2-ва ComboBox

в 1. показывается название
во 2. показывается код (названия)

как сделать так чтобы:
они грузились из файла,
и соответствовали друг другу (название = коду (вводишь одно показывалось второе)).

и при необходимости можно было ввести новый код и название (сохранить в этом файле).]]> PsiHo Borland C++ Builder/Turbo C++ Explorer