Использую MySQL
Хочу обратить внимание на чтение записей из БД с использованием SQLdb.
Вольности кончились!
Это теперь не работает!
Код: Выделить всё
CmboBox1.Items.Clear;
select name from table_nm;//name-char
with SQLQuery do begin
First;
while not EOF do begin
ComboBox1.Items.Add(FieldByName('name').Value);
Next;
end;//while
end;//with
Аналогично - тоже не работает
Код: Выделить всё
select number from table_nm;//number-int
with SQLQuery do begin
First;
while not EOF do begin
case FieldByName('number').Value of
0: ....
1: ....
end;//case
Next;
end;//while
end;//with
Теперь следует аккуратно читать ответ в переменную, соответствующую типу поля, а уж потом делать присваивание.
Т.е. в первом примере
Код: Выделить всё
var
s:String;
....
CmboBox1.Items.Clear;
select name from table_nm;//name-char
with SQLQuery do begin
First;
while not EOF do begin
s:=FieldByName('name').Value
CmboBox1.Items.Add(s);
Next;
end;//while
end;//with
и соответственно во втором
Код: Выделить всё
var
i:Integer;
....
select number from table_nm;//number-int
with SQLQuery do begin
First;
while not EOF do begin
i:=FieldByName('number').Value;
case i of
0: ....
1: ....
end;//case
Next;
end;//while
end;//with
