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

Вниз

Не выполняется цикл. Почему?   Найти похожие ветки 

← →
Близнец   (2006-05-08 13:12) [0]

Доброго времени суток!
Мне необходимо выяснить сколько полей в БД совпадают с полями грида (но суть вопроса не в этом). Делаю так:

var fieldList:TStrings;
   j,k:integer;
   field_count:integer;
begin
   fieldList:=TStringList.Create;
   DM.ADOConnection1.GetFieldNames ("baza",fieldList);
   field_count:=0;
   for j:=0 to fieldList.Count-1 do
     for k:=0 to FUnite.DBGrid1.FieldCount-1 do
     begin
     showmessage (fieldList[j]+"  "+FUnite.DBGrid1.Fields[k].Name); //1
     if fieldList[j]=FUnite.DBGrid1.Fields[k].Name then field_count:=field_count+1; //2
     end;

Поля совпадают все, но результат нулевой и message ни разу не появляется. При трассировке выясняется, что в цикле строчки, закомментированные здесь как 1 и 2, вообще ни разу не обрабатываются, а сразу осуществляется переход на end. Цикл выполняется нужное количество раз, но ничего не делает. Пожалуйста, помогите, совсем уже ничего не соображаю.

---

← →
Плохиш ©   (2006-05-08 13:38) [1]

Значит FUnite.DBGrid1.FieldCount = 0

---

← →
Близнец   (2006-05-08 13:45) [2]

даже -1, спасибо, буду разбираться

---

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

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

Наверх

Память: 0.47 MB
Время: 0.048 c