C++ "..." ins Delphi Übersetzten

[Robert Marquardt]

Da ich es in der Hilfe von D6 nicht gefunden habe, duerfte es erst ab D7 implementiert sein. Schau dir mal die Hilfe zu Parametern an.

[Apollonius]

Mein Delphi 2005 Personal kennt nur offene Array-Parameter, und die sind ganz anders implementiert als in C.

[Robert Marquardt]

Ah, endlich gefunden, also auch in D6. varargs Direktive. Nur fuer externe Deklarationen in DLLs.

Delphi-Quellcode:

function Vix_GetProperties(handle: VixHandle; firstPropertyID: VixPropertyID): VixError; cdecl; varargs;

[Apollonius]

Danke für den Tipp.
Ich habe es eben getestet. Ein Kuriosum ist an dieser Stelle, dass bei mir auch ohne cdecl warnungsfrei kompiliert wird, und auf Assemblerebene kann man die Aufrufkonvention register erkennen. Da sollte der Compiler mindestens eine Warnung schmeißen (bei mehr als drei Parametern ist schließlich der Stack futsch) oder besser noch abbrechen.

[nitschchedu]

So kommen wir nun zur auflösung ^^
nach vielen Test habe ich rausgefunden das

Delphi-Quellcode:

function Vix_GetProperties(handle: VixHandle; firstPropertyID: VixPropertyID): VixError; cdecl; varargs;

das geht :cheers:
Danke allen für die Hilfe ;-)

[nitschchedu]

Ich habe mal wieder eine übersetzungs frage :gruebel: .

Code:

#define NETWORK_ADDRESS_LENGTH_IP sizeof (NETWORK_ADDRESS_IP)

habe ich so versucht

Delphi-Quellcode:

  Tndu_NETWORK_ADDRESS_LENGTH_IP = SizeOf(Tndu_NETWORK_ADDRESS_IP);

aber es kommt der Fehler :

Zitat:

[Pascal Fehler] nduNtDDNdis.pas(1789): E2029 '..' erwartet, aber ';' gefunden

Wie übersetzt man das ?

[Apollonius]

Das ist eine Konstante.

[nitschchedu]

Ah ok :oops: aber jetzt noch mal eine Frage

Code:

typedef struct _NDIS_TCP_LARGE_SEND_OFFLOAD_V1
{

    struct
    {
        ULONG     Encapsulation;
        ULONG     MaxOffLoadSize;
        ULONG     MinSegmentCount;
        ULONG     TcpOptions:2;
        ULONG     IpOptions:2;
    } IPv4;
   
} NDIS_TCP_LARGE_SEND_OFFLOAD_V1, *PNDIS_TCP_LARGE_SEND_OFFLOAD_V1;

Macht das überhaupt sinn eine Struktur in einer Sturktur ... wenn nix weiter kommt !? :gruebel:
Vor allem im Variabelnamen ":2" was soll das :gruebel: :wiejetzt:

[himitsu]

Das mit dem :2 kann ich auch nicht beantworten (konnt jetzt auch im MSDN nicht rauslesen).

Vielleicht kommen ja in den anderen NDIS_TCP_LARGE_SEND_OFFLOAD_V* ja noch weitere Strukturen dazu und die wollten einfach nur bei allen Diesen einen gleichen/ähnlichen Aufbau. :zwinker:
(praktisch nur etwas logischer für den Programmierer, daber sonst hat es keinen wirklichen Sinn)

[nitschchedu]

Ah ok also wenn ich das auch so mache müsste das aber Funktionieren ?

Delphi-Quellcode:

  Tndu_NDIS_TCP_LARGE_SEND_OFFLOAD_V1 = record
     IPv4: record
       Encapsulation: ulong;
      MaxOffLoadSize: ulong;
      MinSegmentCount: ulong;
      TcpOptions: ulong;      //TcpOptions:2;
      IpOptions: ulong;         //IpOptions:2;
    end;
  end;