Цитата:
Сообщение от Alegun
на внешний обработчик с отслеживанием состояния флажка
|
Если пишу так:
Код:
procedure TForm1.ExternalWndProc;
begin
if (RadioGroup1.ItemIndex=0) and (ComboBox1.ItemIndex=4) then
begin
GetCursorPos(p);
SetCursorPos(p.X+5, p.Y+5);
...
end
else exit;
end;
то выдает ошибку "Undeclared identifier: 'RadioGroup1' " и "extended but identifier 'ItemIndex' found". Если выношу обратно (где и было смещение курсора - procedure TForm1.WndProc(var Msg: TMessage)

, то все нормально. Можете помочь, где я туплю?
И не совсем понял вотэтот участок:
Код:
begin
flg:= true;
ExternalWndProc;
end;