# | Line 230 | Line 230 | begin | |
---|---|---|
230 | begin | |
231 | IBAlloc(FEventBuffer,0,FEventBufferLen); | |
232 | if FEventBuffer = nil then Exit; | |
233 | – | {$if declared(FillByte)} |
234 | – | FillByte(FEventBuffer^,FEventBufferLen,0); |
235 | – | {$else} |
233 | FillChar(FEventBuffer^,FEventBufferLen,0); | |
237 | – | {$ifend} |
234 | IBAlloc(FResultBuffer,0,FEventBufferLen); | |
235 | if FResultBuffer = nil then | |
236 | begin | |
237 | FreeMem(FEventBuffer); | |
238 | Exit; | |
239 | end; | |
240 | + | FillChar(FResultBuffer^,FEventBufferLen,0); |
241 | ||
242 | P := FEventBuffer; | |
243 | P^ := EPB_version1; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |