Форум: "Начинающим";
Текущий архив: 2006.07.02;
Скачать: [xml.tar.bz2];

Вниз

addobject выдает несовместимость типов   Найти похожие ветки 

← →
Dimich1978   (2006-06-09 09:06) [0]

выдает ошибку
[Error] Unit1.pas(876): Incompatible types: "TObject" and "Integer"
var
findex:^integer;
i:integer;
begin
checklistbox1.Clear;
with TUsers do
         begin
           Active:=false;
           TableName:="spisokBD";
           Open;
           for i:=0 to recordcount-1 do
           begin
            findex^:=FieldByName("ID_id").Asinteger;
//Вот в этом месте ошибка             checklistbox1.items.AddObject(FieldByName("Base1C").AsString,findex);
            next;
           end;
Как побороть...пробовал и как в примере Хелпа..ошибка точь в точь такая же.(через создание своего типа)

---

← →
Dimich1978   (2006-06-09 09:17) [1]

Спасибо уже не надо!!! Дошло

---

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

Форум: "Начинающим";
Текущий архив: 2006.07.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.011 c