Moin moin,
jo, da haste nen Fehler entdeckt. Hatte die Teile aus einer Fltdefs.pas kopiert, und da ist es auch schon falsch drinne.
Ändere mal folgendes ab:
Delphi-Quellcode:
//..
// rausnehmen und dafür...
// PFFORWARD_ACTION = Integer;
// PPFFORWARD_ACTION = ^PFFORWARD_ACTION;
// dies rein
_PfForwardAction = (
PF_ACTION_FORWARD,
PF_ACTION_DROP );
PFFORWARD_ACTION = _PfForwardAction;
PPFFORWARD_ACTION = ^_PfForwardAction;
//..
// und das jetzt ganz weg
//const
// PF_ACTION_FORWARD = 0;
// PF_ACTION_DROP = 1;
Damit sollte es dann jetzt aber funktionieren.