Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: CL | DM;

Вниз

Простой вопрос   Найти похожие ветки 

 
федя   (2002-06-21 04:34) [0]

Как по-умному загнать содержимое столбца таблицы в ComboBox?
Может быть есть стандартная ф-ция вроде:

function TForm1.MakeStrings(ATable,AField:string):TStrings;
begin
result:=TStringList.Create;
with Table do
begin
TableName:=ATable;
Open;
while not Eof do begin
result.Add(FieldValues[AField]);
next
end;
Close
end
end;


 
fnatali ©   (2002-06-21 05:55) [1]

Может, тебе воспользоваться DBLookupComboBox?


 
tural   (2002-06-21 10:12) [2]

procedure TForm1.FormCreate(Sender: TObject);
begin
Table1.First;
ComboBox1.Items.Clear;
while not Table1.Eof do
begin
ComboBox1.Items.Add(Table1.FieldByName("subj_name").AsString);
Table1.Next;
end;
end;



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

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.012 c
1-47519
sdram
2002-07-04 17:28
2002.07.15
есть ли функция проверка преобразования strtoint


7-47818
Lizard
2002-04-18 11:36
2002.07.15
Как внести изменения в реестры всех компьютеров локальной сети?


14-47777
fnatali
2002-06-14 12:21
2002.07.15
Наши проиграли... Э-эх!!!...:(


3-47130
DARS73
2002-06-21 23:05
2002.07.15
Как сделать чтобы при нажатии кнопки программа перестала


1-47570
AlexanderSK
2002-06-27 12:39
2002.07.15
TBDEClientDataSet в Delphi6