| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

For loop control must be simple local variable [D7, WinXP]

xeron ©   (2007-01-20 15:43:00) 

Всем привет!
Пишу программу, которая взаймодействует
с другой программой путем посылки сообщений...
Вот ее код:

program Project1;

uses
 Windows,
 Messages;

var
MyWnd:HWND;
Hndl:array[1..40] of Hwnd;
i: Dword;

Procedure Send;
begin
MyWnd:=FindWindow(nil,PChar('My Window'));
Hndl[1]:=GetWindow(MyWnd,GW_CHILD);
for i:=2 to 39 do Hndl[i]:=GetWindow(Hndl[i-1],GW_HWNDNEXT);
end;

begin
end.

При компиляции возникает Warning:
"For loop control must be simple local variable"

Подскажите плиз что ему не нравится?

---

xeron   (2007-01-20 15:52:00) [1]

Все, разобрался :)
Переменная должна быть обьявлена в блоке самой процедуры...
Спасибо!

---

Palladin   (2007-01-20 15:46:00) [2]

for - для
loop - цикл
control - контроль
must - должен
be - быть
simple - простой
local - локальный
variablt - переменная

свяжи вместе и подумай

---

Наверх