iBase.ru Forum

Delphi 7, FireBird,IBX.
Нужно содержимое поля (из всех записей) БД поместить в string, TStrings или что-нибуль подобное.
Пытаюсь делать так
ComboBox1.Items.Values[' ']:=string(IBDataSet2.Fields.Fields[1].CurValue);

Выдает ошибку, что не может конвертировать null в string.

Как это сделать????

P.S. DBLookupComboBox не предлагать.

проверять на null

BlackEric писал(а):Пытаюсь делать так
ComboBox1.Items.Values[' ']:=string(IBDataSet2.Fields.Fields[1].CurValue);

Ужас какой! RTFM AsString немедленно!
Ну заодно и про TStrings.Add().

Если так, то я получаю только одну запись!
ComboBox1.Items.Add(IBDataSet2.FieldValues['surname']);

А если так, то 1 запись в таблице подгружается несколько раз
for i := 0 to IBDataSet2.RecordCount - 1 do
ComboBox1.Items.Add(IBDataSet2.FieldValues['surname']);

Спасибо всем за помощь!!!

Работает оно таким образом

IBDataSet2.FetchAll;
for i := 0 to IBDataSet2.RecordCount - 1 do
begin
ComboBox1.Items.Add(IBDataSet2.FieldValues['surname']);
IBDataSet2.Next;
end;



Спасибо!!!!!