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

← →
Близнец (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, спасибо, буду разбираться

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