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

Вниз

COmbobox .....   Найти похожие ветки 

 
draculenok ©   (2002-02-19 12:51) [0]

Здравствуйте программеры!!!!!!
Для записи items для comboboxа пишу.....

begin
with DBComboBox1 do
begin
Items.Clear;
Table1.First;
for i := 1 to Table1.RecordCount do
begin
Items.Add( Table1[ "поле" ] );
Table1.Next;

при этом у меня в базе по полю имеются одинаковые значение, но мне надо чтобы они в comboboxe не повторялись
не могу сообразить что мне вписывать!!! чтобы не повторялись значения....
помогите пожалуйста


 
Fareader ©   (2002-02-19 13:22) [1]

Тогда лучше использовать Query и написать ему
select distinct tt from nn

Тогда дубликатов не будет


 
vopros ©   (2002-02-19 13:44) [2]

И пиши лучше так
Table1.First;
while not Table1.eod do
begin
Items.Add( Table1[ "поле" ] );
Table1.Next;
end;


 
vopros ©   (2002-02-19 13:47) [3]

Поправка не Table1.eod а table2.eof конечно.


 
draculenok ©   (2002-02-19 14:01) [4]

Fareader >> на счет query я тоже думал а как потом его зпрос в items закинуть......


 
MetallAdm ©   (2002-02-19 14:16) [5]

q0.Open;
q0.First;
While (not Q0.Eof) do
begin
s1:=Q0.FieldByName("dnach").AsString;
s2:=Q0.FieldByName("dkon").AsString;
s3:=q0.FieldByName("isCurrent").AsString;
Q0.Next;
stt:=s1+" - "+s2;
Cb1.Items.Add(stt);
If s3="1" Then
begin
Cb1.Text:=stt;
GlobDate:=ConvDate(stt);
end;
end;

Я пример бросил из своей проги
ну я не стал его попровлять но из запроса я думаю понятно как
в итемс вставить!



 
Fareader ©   (2002-02-19 14:27) [6]

Согласен с MetallAdm ©


 
draculenok ©   (2002-02-19 14:39) [7]

а это какие переменые?
GlobDate:=ConvDate(stt);


 
Johnmen ©   (2002-02-19 14:40) [8]

Query1.Open;
while not Query1.EOF do begin;
Items.Add(Query1.FieldByName("поле".AsString);
Query1.Next;
end;


 
Johnmen ©   (2002-02-19 14:47) [9]

перед заполнением : ComboBox1.Clear;


 
draculenok ©   (2002-02-19 14:51) [10]

Johnmen ©
[Error] Unit1.pas(370): Record, object or class type required
вот такую ерунду пишет где asstring


 
Fareader ©   (2002-02-19 14:56) [11]

Наверное имелось ввиду это:
Query1.FieldByName("поле").AsString;

Ну это не серьезно! Ты бы хоть вникал чего ты вставляешь в код!



 
draculenok ©   (2002-02-19 15:03) [12]

Все спасибо всем!!!!!!!
извиняюсь за не знание ......



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

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

Наверх




Память: 0.49 MB
Время: 0.017 c
4-57550
Death
2002-01-18 21:03
2002.03.18
Дебаг...


1-57378
ruslan_as
2002-03-01 13:52
2002.03.18
Проверка на корректный ввод чисел


14-57498
panov
2002-01-22 22:14
2002.03.18
О языке. О русском. Мозги набекрень от вопросов.


3-57315
AndrewK
2002-02-19 08:35
2002.03.18
Как заставить программу подключаться к MS SQL Server через NT-вые логины?


4-57564
Serhy
2002-01-16 01:57
2002.03.18
Интересное в ShellExecute