OnClick ComboBoxa

[Corvis]

Witam,

Potrzebuję zrobić taki manewer. Mam w comboboxie listę z 1 pozycją : "Wybierz..." która jest domyślnie ustawiona. Teraz chcę zrobić tak, że jak kliknę myszką w ComboBoxa to przed rozwinięciem się listy dodam doniej dodatkowe pozycje. Robię to w zdarzeniu OnClick ComboBoxa ale komponent nie reaguje na to zadarzenie tak jak chce. OnClick włącza się w chwili wybrania konkretnej pozycji ComboBoxa. Może ktoś wie jak to zrobic ??


Pozdrawiam,

[kurczez]

Witaj,

Nie wiem czy to jest optymalny sposób, pewnie nie, ale ja sobie tak poradziłem.

bool a = false; // zmianna globalna

void __fastcall TForm1::ComboBox1Enter(TObject *Sender)
{
if (a == false)
ComboBox1->Items->Add("test");

a = true;
}
void __fastcall TForm4::ComboBox1MouseEnter(TObject *Sender)
{
if (a == false)
ComboBox1->Items->Add("test");

a = true;
}

Ten kod powoduje dodanie elementu po najechaniu myszką na kontrolkę. Jeśli chcesz aby za każdym razem po najechaniu wartość się dodawała/zmieniała to w zdarzeniu OnMouseMove kontrolki/formy, na której masz ComboBoxa dajesz kod a = false;

[Corvis]

Witam,

Dzięki, tak myślałem, żeby coś podobnego napisać. Ale sądziłęm, że dało się to obejść poprzez gotowe metody CBX

Dzieki

[Cyfrowy Baron]

Obiekt typu TComboBox posiada zdarzenie OnDropDown. Jeżeli będziesz uzupełniał listę w tym zdarzeniu to elementy będą dodawane przed rozwinięciem listy:

Kod: Zaznacz cały


void __fastcall TForm1::ComboBox1DropDown(TObject *Sender)
{
 ComboBox1->Items->Add("Element");
}
 

[Corvis]

Dzięki !!! Kurde porąbało mi się te zdarzenie z mechanizmem DRAG-DROP i dlatego nawet go nie sprawdziłem