Link to home
Start Free TrialLog in
Avatar of alspivey
alspivey

asked on

icmp in Delphi6

I'm using icmp from Andreas Hörstemeier in Delphi6 and it will compile and run in the IDE but when I try to build the project I get the following error:


[Error] ICMP.PAS(532): Left side cannot be assigned to



 ticmp_sendblock(requestdata^).icmp_header.icmp_type := ICMP_ECHO;
    ticmp_sendblock(requestdata^).icmp_header.icmp_code := 0;
    ticmp_sendblock(requestdata^).icmp_header.icmp_cksum := 0;
    ticmp_sendblock(requestdata^).icmp_header.icmp_seq := f_packet_no;
    inc(f_packet_no);     {  LINE 532   }
    ticmp_sendblock(requestdata^).icmp_header.icmp_id := word(self);
    fillchar(ticmp_sendblock(requestdata^).data,f_blocksize,#$a7);
    ticmp_sendblock(requestdata^).time:=now_ms;
    ticmp_sendblock(requestdata^).icmp_header.icmp_cksum := ICMP_checksum(requestdata^,rq_size);
    whereto_len:=sizeof(whereto);



Is anyone using this VCL in version 6, If so what is the workaround.  I tried to change it but everything I try fails.


Thanks



ASKER CERTIFIED SOLUTION
Avatar of God_Ares
God_Ares

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of alspivey
alspivey

ASKER

I'm not that is the original code