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

[Dalai]

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