Помогите!

← →
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;
и все...

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

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;

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