Wake on LAN Problem :-(

[rollstuhlfahrer]

Für Delphi7 musst du entweder die Unit SysUtils in die Unit hostalive einbinden oder folgende Funktion unterhalb von implementation einfügen:

Delphi-Quellcode:

{ Memory management routines }  // kommt aus SysUtils

function AllocMem(Size: Cardinal): Pointer;
begin
  GetMem(Result, Size);
  FillChar(Result^, Size, 0);
end;

Bernhard

EDIT: Ich machs mal genauer:

Zwischen
"function IcmpSendEcho(IcmpHandle: Cardinal; DestinationAddress: Cardinal; RequestData: Pointer; RequestSize: Word; RequestOptions: PIP_OPTION_INFORMATION; ReplyBuffer: Pointer; ReplySize: Cardinal; Timeout: Cardinal): Cardinal; stdcall; external 'Iphlpapi.dll' name 'IcmpSendEcho';"

und (also hier; etwa Zeile 40)

"function IsHostAlive(Hostname: String; pTripTime: PCardinal = nil; Timeout: Integer = 1000; TTL: Integer = 255): Boolean; "