Очистить ComboBox1->Text

@gvenog · Регистрация: 17.04.2010

Студворк — интернет-сервис помощи студентам

Как очистить выбранный ComboBox1->Text и поменять его на новое значение?
без ComboBox1->ItemIndex=-1;

т.е. как

C++
1
2
3
4
5
6
AnsiString str;
Integer c;
if (ComboBox1->Text==str)
{
ComboBox1->Text=c;
}

только этот код не работает

@Sasha · 21.05.2013, 14:30

вместо Integer просто пишут

C++
1
int

@_Dimon_ · 21.05.2013, 14:31

C++
1
2
3
4
5
6
AnsiString str;
int c;
if (ComboBox1->Text==str)
{
 ComboBox1->Text=IntToStr(c);
}

@LASpace · 21.05.2013, 14:39

конечно не работает) ты в текст пишешь int
надо хотя бы так

C++
1
ComboBox1->Text = IntToStr(c);

но это не изменит значения выбранного элемента... Что бы изменить элемент ComboBox1

C++
1
ComboBox1->Items->Strings[ComboBox1->ItemIndex] = IntToStr(c);

@gvenog · 21.05.2013, 14:47 **[ТС]**

_Dimon_, не работает

вот полностью код обработчика:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void __fastcall TForm1::ComboBox3Select(TObject *Sender)
{
Table3->Open();
    Table3->First();
    int n=Table3->RecordCount;
    for (int q=0;q<n;q++)
    {
    c = Table3->FieldByName("GR_CODE")->AsInteger;
    str = IntToStr(c) + "      " + Table3->FieldByName("GR_NAME")->AsString;
    if (ComboBox3->Text==str)
    {
     ComboBox3->Text=IntToStr(c);
    Edit3->Text = Table3->FieldByName("GR_NAME")->AsString;
    }
    c=0;
    str=0;
    if (q!=(Table3->RecordCount))
    Table3->Next();
    }
}

мне надо, чтобы в списке Combobox было GR_CODE и GR_NAME, а при выборе нужного значения, ComboBox3->Text менялось только на GR_COD

Добавлено через 4 минуты
LASpace,

C++
1
ComboBox1->Items->Strings[ComboBox1->ItemIndex] = IntToStr(c);

этот код вообще заменяет строку в списке Combobox, мне надо, чтобы в списке Combobox показывалась строка str, а при выборе этого элемента только код c

@LASpace · 21.05.2013, 14:50

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

этот код вообще заменяет строку в списке Combobox, мне надо, чтобы в списке Combobox показывалась строка

я и писал что он изменит строку)
а чем не подходит

C++
1
ComboBox1->Text = IntToStr(c);

@gvenog · 21.05.2013, 14:52 **[ТС]**

LASpace, он почему-то не работает

@_Dimon_ · 21.05.2013, 14:57

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

LASpace, он почему-то не работает

Вот смотрю я на этот код... может я не выспался, но что он должен делать ?

@LASpace · 21.05.2013, 15:01

мучал твою идею) попробуй так (может устроит)

C++
1
2
3
4
    
int i = ComboBox1->ItemIndex;
ComboBox1->Items->Strings[ComboBox1->ItemIndex] = IntToStr(c);
ComboBox1->ItemIndex = i;

@gvenog · 21.05.2013, 15:01 **[ТС]**

_Dimon_, в общем мне нужно как-то так:

@_Dimon_ · 21.05.2013, 15:04

Тебе надо забить ComboBox1 значениями из БД?

@LASpace · 21.05.2013, 15:05

фишка в том что текст ты меняешь, а комбобох автоматом меняет его на то что в itemindex записано
выход только и изменении выбранной строки

@gvenog · 21.05.2013, 15:06 **[ТС]**

LASpace, теперь значение оставляет, но и список комбобокса тоже изменяет

Добавлено через 41 секунду
_Dimon_, я его уже забила этими значениями :

C++
1
2
3
4
5
6
7
8
9
10
Table3->Open();
   ComboBox3->Clear();
   for (Table3->First(); !Table3->Eof; Table3->Next())
   {
   c = Table3->FieldByName("GR_CODE")->AsInteger;
   str = IntToStr(c) + "      " + Table3->FieldByName("GR_NAME")->AsString;
      ComboBox3->Items->Add(str);
      c=0;
      str=0;
   }

@gvenog · 24.05.2013, 19:06 **[ТС]**

в общем мне сказали, что это решается с помощью изменения длины комбобокса

@gvenog · 01.06.2013, 16:40 **[ТС]**

Если кому-то интересно, вот код из книги Ермолаева:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
//функция для получения длины самой длинной строки в комбобоксе
int TForm1::GetTextLength(TWinControl *AControl)
{
TComboBox *pComboBox = dynamic_cast <TComboBox *> (AControl);
int Length = 0;
if(pComboBox)
{
TCanvas *pCanvas = new TCanvas();
pCanvas->Handle = GetDC(pComboBox->Handle);
for (int i = 0; i < pComboBox->Items->Count; i++)
{
AnsiString Text = pComboBox->Items->Strings[i];
int TempLength = pCanvas->TextWidth(Text);
if(TempLength > Length)
Length = TempLength;
}
delete pCanvas;
return Length;
}
else
return 0;
}
 
void __fastcall TForm1::ComboBox1DropDown(TObject *Sender)
{
SendMessage(ComboBox1->Handle, CB_SETDROPPEDWIDTH, GetTextLength(ComboBox1) + 10, 0);
}
//--

В самом комбобоксе указать любой style, кроме csSimple

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .	SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@gvenog 1 / 1 / 0 Регистрация: 17.04.2010 Сообщений: 55
	21.05.2013, 14:52 [ТС]
	LASpace, он почему-то не работает 0

@gvenog 1 / 1 / 0 Регистрация: 17.04.2010 Сообщений: 55
	21.05.2013, 15:01 [ТС]
	_Dimon_, в общем мне нужно как-то так: Миниатюры 0

@_Dimon_ 1408 / 572 / 127 Регистрация: 31.10.2011 Сообщений: 1,960
	21.05.2013, 15:04
	Тебе надо забить ComboBox1 значениями из БД? 0

@LASpace 34 / 34 / 7 Регистрация: 27.01.2013 Сообщений: 142
	21.05.2013, 15:05
	фишка в том что текст ты меняешь, а комбобох автоматом меняет его на то что в itemindex записано выход только и изменении выбранной строки 0

@gvenog 1 / 1 / 0 Регистрация: 17.04.2010 Сообщений: 55
	24.05.2013, 19:06 [ТС]
	в общем мне сказали, что это решается с помощью изменения длины комбобокса 0