Databases
StackOverflow2013
Postsdbo
POProblems with extracting file summary information
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POProblems with extracting file summary information
    primarykey
    data
    text
    <p>I apologize for my English, it's not good, but I hope you will understand my question. I have problem with usage of WinAPI function <code>StgOpenStorageEx</code>. I need to get file's summary information. I found some solutions, but in all of them I need to use <code>StgOpenStorageEx</code>. Because it is not in standard modules, I declared it myself as exported from ole32.dll like this</p> <pre><code>function StgOpenStorageEx ( const pwcsName : POleStr; //Pointer to the path of the //file containing storage object grfMode : LongInt; //Specifies the access mode for the object stgfmt : DWORD; //Specifies the storage file format grfAttrs : DWORD; //Reserved; must be zero pStgOptions : Pointer; //Address of STGOPTIONS pointer reserved2 : Pointer; //Reserved; must be zero riid : PGUID; //Specifies the GUID of the interface pointer out stgOpen : //Address of an interface pointer IStorage ) : HResult; stdcall; external 'ole32.dll'; </code></pre> <p>Next I need to use this function like this</p> <pre><code> var res, open: hresult; stg: IStorage; PropSetStg: IPropertySetStorage; PropStg: IPropertyStorage; FileName: string; const IID_IPropertySetStorage : TGUID = '{0000013A-0000-0000-C000-000000000046}'; FmtID_SummaryInformation: TGUID = '{F29F85E0-4FF9-1068-AB91-08002B27B3D9}'; function StgOpenStorageEx ( const pwcsName : POleStr; //Pointer to the path of the //file containing storage object grfMode : LongInt; //Specifies the access mode for the object stgfmt : DWORD; //Specifies the storage file format grfAttrs : DWORD; //Reserved; must be zero pStgOptions : Pointer; //Address of STGOPTIONS pointer reserved2 : Pointer; //Reserved; must be zero riid : PGUID; //Specifies the GUID of the interface pointer out stgOpen : //Address of an interface pointer IStorage ) : HResult; stdcall; external 'ole32.dll'; ... implementation ... FileName:=OpenDialog1.FileName; res:=StgOpenStorageEx(PWideChar(FileName), STGM_READ or STGM_SHARE_DENY_WRITE, STGFMT_FILE, 0, nil, nil, @IID_IPropertySetStorage, stg); OleCheck(res); PropSetStg := Stg as IPropertySetStorage; open:=PropSetStg.Open(FmtID_SummaryInformation, STGFMT_FILE or STGM_READ or STGM_SHARE_EXCLUSIVE, PropStg); //open=-2147287038 OleCheck(open); // EOleSysError "%1 could not be found ... </code></pre> <p>On instruction <code>OLECheck(Open)</code> I have an EOleSysError "%1 could not be found". <code>Open</code> returns -2147287038 </p> <p>Please tell me what I'm doing wrong <a href="http://www.tek-tips.com/viewthread.cfm?qid=992447" rel="nofollow">Article with full function code</a></p> <p>IDE: Embarcadero® Delphi® XE Version 15.0.3890.34076 </p>
    singulars
    1. PO
      singulars
      1. PTAnswer
    1. This table or related slice is empty.
    1. PTQuestion
    1. USalax_rosh
    1. USalax_rosh
    plurals
    1. This table or related slice is empty.
    1. PL
      singulars
      1. LTLinked
    1. This table or related slice is empty.
    1. PO
      singulars
      1. PTAnswer
    1. VO
      singulars
      1. POProblems with extracting file summary information
      1. This table or related slice is empty.
      1. VTModeratorReview
    2. VO
      singulars
      1. POProblems with extracting file summary information
      1. This table or related slice is empty.
      1. VTUpMod
    3. VO
      singulars
      1. POProblems with extracting file summary information
      1. This table or related slice is empty.
      1. VTUpMod
    1. CO1) what is value of FileName ? 2) what is value of StgOpenStorageEx *before* OleCheck is called ? 3) do you import StgOpenStorageExA or StgOpenStorageExW ?
      singulars
      1. POProblems with extracting file summary information
      1. USArioch 'The
    2. CO1) FileName store filepeth to existing (100%) file. I need to get summary from this file
      singulars
      1. POProblems with extracting file summary information
      1. USalax_rosh
    3. COi don't like "%1" Please, DO show how you do declare FileName and how do you assign it value. Also please DO add tag showing you delphi version. That might be important. Discard the 3rd question about nameA or nameW - it seems be n/a to OLE
      singulars
      1. POProblems with extracting file summary information
      1. USArioch 'The
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload