[/7y3uK]

Попробуй перед присваиванием inf :=pointer(lParam); выделить записи память New(inf)
После выполнения не забудь освободить Dispose(inf);