Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#10

Re: Windows API Übersetzung - Welche Variante ist besser ?

  Alt 6. Nov 2009, 08:57
Zitat von Bernhard Geyer:
Schau dir mal an wie es im Jedi Win32API-Projekt gemacht ist.
Welches der Projekte meinst Du da genau ? JCL/JVCL oder welches ?
Zitat von Bernhard Geyer:
Solltest du D2010 oder neuer haben so wäre auch Delay Load etwas was mit dem neuen Schlüsselwort delayed ermöglicht wird.
Ich benutze Delphi 2006, eventuell noch 2007.
Ich verstehe nur noch nicht das Beispiel was mir uoeb7gp hier gepostet hat. Im Moment würde ich folgendermaßen vorgehen :
Delphi-Quellcode:
type
  TGetAdapterAdresses = function(Family: ULONG; Flags: cardinal;
    Reserved: PVOID; pAdapterAddresses: PIP_ADAPTER_ADDRESSES;
    pOutBufLen: PULONG) : DWORD; stdcall;

{...}

function xy(Test:string):string;
var
  AdaptersAddresses : TGetAdapaterAddresses;
  hdll : THandle;
begin
  hdll := LoadLibrary('IPHLPAPI.DLL');
  if hdll <> 0 then
  begin
    @AdapaterAddresses := GetProcAddress(hdll, 'GetAdaptersAddresses');
    if @AdaptersAddresses <> nil then
    begin
      { hier der Aufruf der Funktion und Verarbeiten der ausgelesenen Daten }
    end;
  end;
end;
Jetzt stellt sich mir die Frage, wo ist der Unterschied zwischen meinem Beispiel und dem von user]uoeb7gp[/user] ?
Rolf Warnecke
App4Mission
  Mit Zitat antworten Zitat