VolumeMountPoints

[davtix]

Zitat von Neutral General:

Hi,

Ich verzweifel noch. Kann mir jemand eindeutig erklären wie ich SetVolumeMountPoint aufrufe?
Bei MSDN steht zwar ein Beispiel aber sonst stehts im Internet immer anders. Klappen tut beides nicht.

Delphi-Quellcode:

SetVolumeMountPoint('W:\','\C:\Test\') // oder
SetVolumeMountPoint('\C:\Test\','W:\')

GetLastError:

Zitat:

Falscher Parameter.

Delphi-Quellcode:

SetVolumeMountPoint('W:\','\C:\Test')  // oder
SetVolumeMountPoint('\C:\Test','W:\')

GetLastError:

Zitat:

Die Syntax für den Dateinamen, Verzeichnisnamen oder die Datenträgerbezeichnung ist falsch

Delphi-Quellcode:

GetVolumeNameForVolumeMountPoint(PChar('C:\\'),@Buffer[0],SizeOf(Buffer));
SetVolumeMountPoint('\C:\Test\',Buffer)

Delphi-Quellcode:

GetVolumeNameForVolumeMountPoint(PChar('C:\\'),@Buffer[0],SizeOf(Buffer));
SetVolumeMountPoint(Buffer,'\C:\Test\')

GetLastError:

Zitat:

Das Verzeichnis ist nicht leer.

Und wie das leer ist! -.-

In Buffer steht immer sowas (oder so ähnlich halt):

\\?\Volume{dafc6733-ff88-11d9-b411-806d6172696f}\ Was is da jetzt noch falsch dran ?-.-

Gruß
Neutral General

hi Neutral General ,
hast du nu rausgefunden wie du die GUID herrausbekommst???

bei mir kommt immer ne fehlermeldung der ntdll.dll.

Delphi-Quellcode:

  Function GetVolumeNameForVolumeMountPoint(
             lpszVolumeMountPoint: PAnsiChar;
             lpszVolumeName: PAnsiChar;
             cchBufferLength: DWORD): Boolean;
             stdcall;
             external 'C:\Windows\SysWOW64\kernel32.dll' name 'GetVolumeNameForVolumeMountPointA';

Delphi-Quellcode:

procedure TForm1.Button21Click(Sender: TObject);
var
  vmp : PAnsiChar;
  vn : PAnsiChar;
  i : cardinal;

begin
  vmp := ('D:\\');
  //GetVolumeNameForVolumeMountPoint(vmp, vn, i);

  GetVolumeNameForVolumeMountPoint(vmp,vn, i);

//  GetVolumeNameForVolumeMountPoint(PChar('C:\\'),@Buffer[0],SizeOf(Buffer));

 ListBox2.Items.Add( string( vn));
end;

[Neutral General]

Hallo,

Habs grad ausprobiert und bei mir gehts so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Buffer: Array[0..100] of AnsiChar; // Je nachdem wie viel du willst/kannst/sollst
begin
  GetVolumeNameForVolumeMountPoint('D:\\',@Buffer[0], Length(Buffer));
  Caption := Buffer; // \\?\Volume{6f55826c-bfa1-11e1-86d0-20cf30e33243}\
end;

Der Fehler war, dass du für den Volume name Speicher bereitstellen musst. Bei mir sind es die 101 Bytes/AnsiChars des "Buffer"-Arrays. Im 3. Parameter musst du die länge des Buffers übergeben den du bereitstellst. Da hast du einfach das uninitialisierte "i" übergeben in der irgendeine beliebige Zahl drin stehen kann.
Daher hat Windows versucht in nicht angeforderten Speicher zu schreiben, was mit einer Exception geendet hat.

[davtix]

ein RIESIGEN DANK AN DICH... endlich , hab seit 5 tagen probiert und gelesen.