Einzelnen Beitrag anzeigen

Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.680 Beiträge
 
Delphi 5 Professional
 
#1

Bool(ean)-Wert in PByte kopieren [gelöst]

  Alt 4. Apr 2014, 15:24
Delphi-Version: 5
Hallo Leser und Wissende .

Ich hab mal wieder ein kleines Problem, das ich aufgrund fehlenden Wissens, Verständnisschwierigkeiten und mangelnder Suchergebnisse nicht selbst lösen kann.

Gegeben ist eine Funktion
Delphi-Quellcode:
function FsContentGetValue(FileName: PChar; FieldIndex, UnitIndex: integer;
                            FieldValue: PByte; maxlen, flags: integer):integer; stdcall;
Im Parameter FieldValue können verschiedene Typen zurückgegeben werden: Strings, Boolsche Typen, Numerische Typen, Datumsangaben usw. Strings sind ja kein Problem, denn PChar und PByte kann man hier einfach "einander zuweisen", Beispiel:lstrcpyn(PChar(FieldValue), PChar(svc.ServiceName), maxlen);

Aber wie kann ich einen Boolschen Wert zuweisen/kopieren? Ich hab verschiedene Varianten probiert, unter anderem:
Delphi-Quellcode:
PBOOL(FieldValue):= PBOOL(LongBool(svc.OwnProcess));
PBOOL(FieldValue):= PBOOL(svc.OwnProcess);
Leider kommt dabei immer FieldValue = True raus.

In C++ würde man einfach schreiben:
Code:
*((BOOL*)FieldValue) = (svc->Interactive);
Kann mir jemand auf die Sprünge helfen?

MfG Dalai
  Mit Zitat antworten Zitat