Einzelnen Beitrag anzeigen

Horst0815

Registriert seit: 23. Mai 2011
Ort: Görlitz
149 Beiträge
 
Delphi XE Starter
 
#3

AW: Umgang mit PSafeArray

  Alt 15. Sep 2014, 16:50
na PSafeArray is so:

Delphi-Quellcode:
 

 PSafeArray = ^TSafeArray;
  {$EXTERNALSYM tagSAFEARRAY}
  tagSAFEARRAY = record
    cDims: Word;
    fFeatures: Word;
    cbElements: LongWord;
    cLocks: LongWord;
    pvData: Pointer;
    rgsabound: array[0..0] of TSafeArrayBound;
  end;
  TSafeArray = tagSAFEARRAY;
definiert


Kann ja nicht gehen heist ja nicht umsonst PSafeArray


aber

Delphi-Quellcode:
 
  CopyMemory(@Safe,DiscRecorder2.VolumePathNames,DiscRecorder2.VolumePathNames.CbElements);
 For I := 0 To DiscRecorder2.VolumePathNames.CbElements - 1 Do
  Begin

    Memo1.Lines.Add(' Mount Point: ' + (Safe[I]));
  End;
führt zu
[dcc32 Fehler] Main.pas(115): E2149 Klasse besitzt keine Standardeigenschaft
Miniaturansicht angehängter Grafiken
unbenannt.jpg  

Geändert von Horst0815 (15. Sep 2014 um 17:25 Uhr)
  Mit Zitat antworten Zitat