Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
15-1146722158
MrShadow_
2006-05-04 09:55
2006.05.28
Электронный справочник по Delphi


6-1138699189
Hij
2006-01-31 12:19
2006.05.28
Indy -->IdFTP системе не удается найти путь


2-1147277350
Nicky
2006-05-10 20:09
2006.05.28
Как запаролить форму


2-1147515507
2006_A
2006-05-13 14:18
2006.05.28
Реогирование на кнопку "windows"


2-1147233740
Rubey
2006-05-10 08:02
2006.05.28
Имя файла при сохранении




   Наверх