Menu
▾
▴
#69 Access Violation in tPingSend on Win64 platform
The tPingsend class throws an access violation on the Win64 platform in 64-bit mode.
It does work in 32-bit mode. I use Delphi 11 .2 on Windows 11 x64.
Steps to reproduce:
program Pingtest;
{$APPTYPE CONSOLE}
{$R *.res}
uses
SysUtils, pingsend;
var ping: tpingsend;
begin
ping := tpingsend.Create;
if ping.ping('www.google.nl') then
writeln('Ping Succeeded.');
ping.Free;
end.
It is wrong datatype for IpHlp handle on Win64 platform. Fixed in r267 now.
Thank you!