Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi C++ zu Delphi (kleinere Probleme) (https://www.delphipraxis.net/99475-c-zu-delphi-kleinere-probleme.html)

WordsBG 12. Sep 2007 17:47


C++ zu Delphi (kleinere Probleme)
 
Leider bin ich nicht zu geübt in C++ und behersche nur Grundlagen. So kommt es aber doch, dass ich einen Quelltext von C++ in Delphi nutzen möchte und ihn deshalb konvertieren muss. Hierbei gibt es Probleme:

Wie übersetzt man folgende Dinge? (Was ich denke was es heißt steht dahinter)
Dabei gilt:
unsigned long Value;
unsigned char Temporal;

Value <<= 7; (Value = Value shl 7; // Value: Word;?)
Value |= Temporal&0x7F; (Value = ((Temporaland 0x7F) or Value); // Value: Word;?)
aber das größte Fragezeichen für mich:
while (Temporal&0x80) (Keine Ahnung... heißt das <> 0 oder so?!)

Hoffe mir kann da jemand helfen ...

Neutral General 12. Sep 2007 18:00

Re: C++ zu Delphi (kleinere Probleme)
 
|= weiß ich jetzt nicht aber

&x7F = and $7F

while Temporal and $80

heißt der ausschnitt der while schleife aber die Bedingung ist meiner Meinung nach noch nicht fertig. Oder es ist vielleicht sowas wie while Boolean(Temporal and $80).

Gruß
Neutral General

Robert Marquardt 12. Sep 2007 18:06

Re: C++ zu Delphi (kleinere Probleme)
 
unsigned long = Cardinal
unsigned char = Byte

Value = Value shl 7;
Value = Value or (Temporal and $7F);
while (Temporal and $80) <> 0 do

In C gibt es keinen eigenen booleschen Typ. Alle Zahlen ungleich 0 entsprechen True, 0 entspricht False.

while Temporal > $7F do
ist aequivalent.

WordsBG 12. Sep 2007 18:09

Re: C++ zu Delphi (kleinere Probleme)
 
Wow, vielen Dank :thumb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:16 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz