Bitweise Operatoren von C++ in Delphi übersetzen

[MisterNiceGuy]

Hi, ich sitze gerade an folgender If-Bedingung die ich von C++ in Delphi übersetzen möchte:

Code:

(m_dwUsage & D3DUSAGE_DYNAMIC) ? D3DLOCK_DISCARD : 0

Ich kann das ganze schon folgendermaßen auflösen:

Delphi-Quellcode:

if (m_dwUsage AND D3DUSAGE_DYNAMIC) then
  result := D3DLOCK_DISCARD
else result := 0;

So, jetzt muss ich nurnoch das m_dwUsage AND D3DUSAGE_DYNAMIC verstehen... Weiß jemand wie ich das übersetze?

FYI: m_dwUsage ist vom Typ DWORD.

[Apollonius]

Einfach <> 0 ergänzen. In C kann man das weglassen.

[DeddyH]

Delphi-Quellcode:

if (m_dwUsage AND D3DUSAGE_DYNAMIC) = D3DUSAGE_DYNAMIC then
  result := D3DLOCK_DISCARD
else result := 0;

[MisterNiceGuy]

Echt? Das wär ja wunderbar einfach ;) Danke!

[himitsu]

Code:

x = (m_dwUsage & D3DUSAGE_DYNAMIC) ? D3DLOCK_DISCARD : 0;

Delphi-Quellcode:

x := IfThen(m_dwUsage and D3DUSAGE_DYNAMIC <> 0, D3DLOCK_DISCARD, 0);

[himitsu]

Zitat:

Zitat von MisterNiceGuy

Echt? Das wär ja wunderbar einfach ;) Danke!

Welchen Wert haben eigentlich diese Konstanten?
Gibt da eventuell noch 'nen anderen "Trick".

[schöni]

Hallo,

Zitat:

Zitat von hinitsu

Welchen Wert haben eigentlich diese Konstanten?
Gibt da eventuell noch 'nen anderen "Trick".

Das könnte so sein (Prinzip ist wichtig, nicht der wirkliche Wert der Konnstanten):

Delphi-Quellcode:

const
  m_dwUsage         = $00080;
  D3DUSAGE_DYNAMIC  = $00081;

  //Die und Verknüpfung ergibt das:
  //                  01000
  //                  01001
  //                  -----
  //                  01000

Damit aber eine Abfrage sinnvoll ist, muss m_dwUsage nicht eine Konstante, sondern eine Variable im Programm sein, die also verschiedene Werte annehmen kann. In meinem Beispiel wäre die Bedingung erfüllt, wenn Bit 3 gesetzt ist.

[himitsu]

jupp, also im Prinzip

Delphi-Quellcode:

VAR and CONST = CONST

Fogendes geht nur, wenn CONST nur aus einem Bit besteht
da ist dann ein is_not_zero-TEST meist schneller/kleiner, als ein Integer-CMP

Delphi-Quellcode:

VAR and CONST <> 0

und wenn man übereinstimmende Bitsequenzen hat (1 oder mehrere Bits), dann geht auch sowas

Delphi-Quellcode:

D3DUSAGE_DYNAMIC = $00080;
D3DLOCK_DISCARD  = $00800;

//if m_dwUsage and D3DUSAGE_DYNAMIC <> 0 then x := D3DLOCK_DISCARD else x := 0;
x := (m_dwUsage and D3DUSAGE_DYNAMIC) shl 4;