[Flashton]

Спасибо всем ответившим
Разобрался: проблема в том, что я не инициализировал размер структуры, нужно было добавить код PPE.dwSize:=sizeof(PPE);