Use VAR structure from VerQueryVersion in Pascal

VerQueryValue from Win32Api can return a pointer to a structure called VAR.

Var {
    WORD  wLength;
    WORD  wValueLength;
    WORD  wType;
    WCHAR szKey[];
    WORD  Padding[];
    DWORD Value[];
};

In the open array Value[] Windows returns the supported Languages and CodePages of the file.

How can I get this information under Delphi 2.01? Or how can I rebuild this structure in Pascal.
fhaehniAsked:
Who is Participating?
 
julio011597Connect With a Mentor Commented:
Value is an array of DWORD's.

I've no access to Delphi here, but this should be how to go:
--//--
var
  P: Pointer;
  v: DWORD;
begin
  P := VarQueryValue(...);
  v := VAR(P)^.Value[0]; // now v holds first element of Value
end;
--//--

HTH.
0
 
fhaehniAuthor Commented:
Thanks a lot. It wasn't exactly what I wanted but this answer opened my eyes. So it's quite useful for me. Thanks again.

Frank
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.