Combobox

3 отговора 230 прегледа
#1

Combobox

kak da add-na w edin ComboBox angliiskata azbuka.
Sigurno za niakoi e mnogo elementarno, no molia za pomosht

Отговор
в отговор на Nishto neznaesht #2

В дизай или рънтайм режим?

В дизайн режим - щракваш два пъти на Items на ComboBox
В рънтайм - най-добре при създаване на формата:
{}procedure TForm1.FormCreate(Sender: TObject);

var
c: char;
begin
ComboBox1.ItemIndex := -1;
ComboBox1.Items.Clear;
for c:='A' to 'z' do begin
ComboBox1.Items.Add(c);
end;
end;


Обърни внимание на хелпа и прочети за Items - много популярен тип TStrings - негови наследници се ползват в TEdit, tMemo и маса други места, където има редове с текст.

Редактирано от NikB на

Отговор
в отговор на Nishto neznaesht #3

Re: Combobox

Предполагам, че искаш всяка буква да е на отделен ред, нали? Можеш да направиш например така...

procedure TForm1.Form1Create(Sender: TObject);
var i: Integer;
begin
ComboBox1.Items.Clear;
for i := Ord('A') to Ord('Z') do
ComboBox1.Items.Add(Chr(i));
end;


Отговор