check this error pls

[SirThornberry]

Please use a Title which describes your problem. With that title, nobody knows the problem by reading it.
If somebody with the same problem will use the search, he/she will not find the result in this thread (because of the title which don't describe the problem).

[Sir Rufo]

Und wer hat die deutschen Kommentare im Quelltext geschrieben?

[user]

@DeddyH: Yeah I will add:

Code:

if not assigned (WinVerifyTrust ) then

Thanks for the correction.

@SirThornberry: Next time I will make the title clearly.

[CCRDude]

That's a widely spread code sample that I've seen in many many places while looking for code to compare to find a bug in my own implementation. And like with a lot of code snippets found on the net, in the end you'll be faster if you implement it yourself.

I'll give you a hint at what to look for:

//Fake Pointer - nötig damit der Speicer wieder freigegeben wird Open up MSDN, compare the data structure, and implement this one correctly to avoid further problems (these fake pointers, where someone misunderstood what unions are, make all following fields invalid / pointing to something else than the name suggests).

[user]

I just searched similar function to verify file trust. I got code by Craig Peterson in StackOverflow.

Code:

type
  PWinTrustFileInfo = ^TWinTrustFileInfo;
  TWinTrustFileInfo = record
    cbStruct: DWORD;                    // = sizeof(WINTRUST_FILE_INFO)
    pcwszFilePath: PWideChar;           // required, file name to be verified
    hFile: THandle;                     // optional, open handle to pcwszFilePath
    pgKnownSubject: PGUID;              // optional: fill if the subject type is known
  end;

  PWinTrustData = ^TWinTrustData;
  TWinTrustData = record
    cbStruct: DWORD;
    pPolicyCallbackData: Pointer;
    pSIPClientData: Pointer;
    dwUIChoice: DWORD;
    fdwRevocationChecks: DWORD;
    dwUnionChoice: DWORD;
    pFile: PWinTrustFileInfo;
    dwStateAction: DWORD;
    hWVTStateData: THandle;
    pwszURLReference: PWideChar;
    dwProvFlags: DWORD;
    dwUIContext: DWORD;
  end;

MSDN say

Code:

typedef struct _WINTRUST_DATA {
  DWORD  cbStruct;
  LPVOID pPolicyCallbackData;
  LPVOID pSIPClientData;
  DWORD  dwUIChoice;
  DWORD  fdwRevocationChecks;
  DWORD  dwUnionChoice;
  union {
    struct WINTRUST_FILE_INFO_  *pFile;
    struct WINTRUST_CATALOG_INFO_  *pCatalog;
    struct WINTRUST_BLOB_INFO_  *pBlob;
    struct WINTRUST_SGNR_INFO_  *pSgnr;
    struct WINTRUST_CERT_INFO_  *pCert;
  };
  DWORD  dwStateAction;
  HANDLE hWVTStateData;
  WCHAR  *pwszURLReference;
  DWORD  dwProvFlags;
  DWORD  dwUIContext;
} WINTRUST_DATA, *PWINTRUST_DATA;

Something like that?

I also get similar function by rllibby and I'll try to compare them.

[CCRDude]

That structure is fine, except that pFile should be a simple Pointer, since depending on dwUnionChoice, it might be something different than PWinTrustFileInfo.

Or, instead of the simple pointer, a Delphi union.