Re: [Module] pbPDF-Module
Verfasst: 28.07.2021 15:58
Wenn man die Header/Footer Prozeduren übergibt, kann man eigentlich davon ausgehen, dass man die auch nutzen möchte.
Von daher würde ich empfehlen die beiden Prozeduren wie folgt abzuändern:
Dann kann man sich das doppelt gemoppelte EnableHeader/Footer sparen.
Von daher würde ich empfehlen die beiden Prozeduren wie folgt abzuändern:
Code: Alles auswählen
Procedure SetFooterProcedure(ID.i, *ProcAddress, *StructAddress=#Null)
If FindMapElement(PDF(), Str(ID))
PDF()\Footer\ProcPtr = *ProcAddress
PDF()\Footer\StrucPtr = *StructAddress
PDF()\Footer\Flag = #True
EndIf
EndProcedure
Procedure SetHeaderProcedure(ID.i, *ProcAddress, *StructAddress=#Null)
If FindMapElement(PDF(), Str(ID))
PDF()\Header\ProcPtr = *ProcAddress
PDF()\Header\StrucPtr = *StructAddress
PDF()\Header\Flag = #True
EndIf
EndProcedure