Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.06;
Скачать: CL | DM;

Вниз

Работа с EnumWindows   Найти похожие ветки 

 
pasha_golub ©   (2003-11-28 11:39) [0]

Вообщем-то код


procedure TForm1.OnClick(Sender: TObject);
var LP: lParam;
I: integer;

function MyEnumProc(Handle: HWND; LPar: lParam);
begin
Result := true;
//вот отсюда я не могу обратится наружу
I := I + Handle; //access violation
Memo1.Lines.Append(inttostr(handle)); //access violation тоже
end;

begin
EnumWindows(@MyEnumProc,LP);
end;

Вообщем-то он нерабочий. Если вынести функцию MyEnumProc за пределы обработчика все работает, это и неудивительно.

Вопрос, почему нельзя использовать код, приведенный мной? Что происходит. Спасибо


 
clickmaker ©   (2003-11-28 11:41) [1]

callback ф-ия не может быть локальной


 
Игорь Шевченко ©   (2003-11-28 11:41) [2]

Потому что локальные процедуры нельзя использовать в качестве callback-функций


 
pasha_golub ©   (2003-11-28 11:51) [3]

Хотелось бы узнать где про соглашения вызова callback-функций прочитать. Спасибо


 
clickmaker ©   (2003-11-28 11:52) [4]

А чо тут читать. stdcall и дело с концом. Ну и все вышесказанное



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
1-16330
новый
2004-01-24 21:16
2004.02.06
сортировка


1-16252
Santak
2004-01-26 14:11
2004.02.06
Помогите с открытием файла


14-16686
Label
2004-01-16 20:48
2004.02.06
Помогите с тестом знаний


1-16389
Ренат
2004-01-23 16:38
2004.02.06
Динамическое создание TQRDbText в отчете


4-16804
DDA2
2003-11-28 18:28
2004.02.06
Handle для папки