hallo,
ich möchte mit folgender methode eine dfü verbindung herstellen,
allerdings stell ich mich dabei total dusselig an, ich hab nämlich
keine ahnung wie ich die methode korrekt aufrufen soll
Delphi-Quellcode:
function TForm1.DialDFUE(DFUEName: String; var ErrorCode: integer; var ConId: DWord): boolean;
var
ConNum: LPDWORD; ReturnCode: DWord;
begin
result:= false;
ErrorCode:= 0;
New(ConNum);
try
ReturnCode := InternetDial(Application.Handle , PChar(DFUEName), INTERNET_AUTODIAL_FORCE_UNATTENDED, ConNum, 0);
ErrorCode:= ReturnCode;
if ReturnCode = ERROR_SUCCESS then
begin
result:= true;
ConId:= ConNum^;
end;
finally
Dispose(ConNum);
end;
end;
// DialDFUE('freenet', 0, 0) funktioniert leider nicht