Moin mh166,
Zitat von
mh166:
Ich hab auch schon probiert die + durch or zu ersetzen,
wobei Du auch grundsätzlich bleiben solltest.
In diesem Falle spielt es ausnahmsweise mal keine Rolle, da die Funktion in den Flags einen Wert zurückliefert, und nicht auswertet, was in der Variablen steht.
Deine Funktion müsste eigentlich nur so aussehen:
Delphi-Quellcode:
function TfrmMain.IsOnline: Boolean;
var
dlfFlag : DWORD;
begin
Result := InternetGetConnectedState (@dlvFlag,0);
end;