Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   FreePascal (https://www.delphipraxis.net/74-freepascal/)
-   -   function set_fAckReq? (https://www.delphipraxis.net/186817-function-set_fackreq.html)

DualCoreCpu 2. Okt 2015 12:08

function set_fAckReq?
 
Hallo,

die im Titel genannte Funktion gibt es in zwei überladenen Versionen:

Delphi-Quellcode:
const
   bm_DDEUP_fAckReq = $8000;
   bp_DDEUP_fAckReq = 15;

type
  DDEUP = record
       flag0 : word;
       cfFormat : SHORT;
       rgb : array[0..0] of BYTE;
    end;


  function fAckReq(var a : DDEUP) : word;
    begin
       fAckReq:=(a.flag0 and bm_DDEUP_fAckReq) shr bp_DDEUP_fAckReq;
    end;

  procedure set_fAckReq(var a : DDEUP; __fAckReq : word);
    begin
       a.flag0:=a.flag0 or ((__fAckReq shl bp_DDEUP_fAckReq) and bm_DDEUP_fAckReq);
    end;
Nun frage ich mal, wofür ist diese Funktion da?

Ich frage, weil ich ein Programm übersetzen will und den Fehler:

error:can't create object file <meineunnit>

erhalte und der Compiler an der zweiten Funktion anhält.

Wo wird diese Funktion aufgerufen?

Ich verwende jene Includedatei in meiner Unit, welche diese Funktion enthält.


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:36 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