Скачать: CL | DM;

Помогите!   Найти похожие ветки 

← →
Le!   (2002-12-01 09:00) [0]

Народ посоветуйте! как в обыкновенном ComboBox сделать только на выбор чтобы в него ничего нельзя было писать!

---

← →
Николай Быков ©   (2002-12-01 09:07) [1]

свойство style у Combobox"a установи в csOwnerDrawFixed и будет тебе счастье

---

← →
KA_   (2002-12-01 11:10) [2]

ComboBox1.Style := csDropDownList;
или тоже самое в Object Inspector.

---

← →
Tano ©   (2002-12-01 20:36) [3]

Чтобы какой-то пункт был сразу виден:
ComboBox1.IntemIndex:=номер //чаще всего просто 0
иначе получишь беленькое окошко - просто выглядит несуразно.

---

← →
Le!   (2002-12-02 01:32) [4]

Спасибо! Люди добрые!

---

← →
snv-soft ©   (2002-12-02 06:25) [5]

Да уж..

---

← →
Le!   (2002-12-02 08:14) [6]

А если вот так: нужно чтобы при первом виде этого ComboBox на нем было "Выбрать" а когда на него нажимаешь то эту надпись выбрать было нельзя, и при этом чтобы в него нельзя было ничего писать. а?

---

← →
sandima   (2002-12-02 10:06) [7]

Пиши
with ComboBox do
begin
Text:="dkfhjd";
ItemIndex:=-1;
end;
и все...

---

← →
SergeyKatruk ©   (2002-12-02 18:35) [8]

Чё то у меня так не выходит

---

← →
TTCustomDelphiMaster ©   (2002-12-02 19:07) [9]

var
Form1: TForm1;
CbChange, CbDropDown: TNotifyEvent;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items.Insert(0, "Вставте строку");
ComboBox1.ItemIndex := 0;
CbChange := ComboBox1.OnChange;
CbDropDown := ComboBox1.OnDropDown;
ComboBox1.OnChange := DeleteFirst;
ComboBox1.OnDropDown := DeleteFirst;
end;

procedure TForm1.DeleteFirst(Sender: TObject);
begin
ComboBox1.Items.Delete(0);
ComboBox1.ItemIndex := 0;
ComboBox1.OnChange := CbChange;
ComboBox1.OnDropDown := CbDropDown;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c