-
-
各位,我用这个代码取C盘的卷标,怎么取不到呢(DELPHI7代码)
-
发表于:
2008-1-3 13:04
4565
-
各位,我用这个代码取C盘的卷标,怎么取不到呢(DELPHI7代码)
procedure TForm1.Button1Click(Sender: TObject);
var
szname:array[1..32] of char;
d1,d2:cardinal;
begin
fillchar(szname,sizeof(szname),#0);
GetVolumeInformation('c:',@szname,32,nil,d1,d2,nil,0);
messagebox(0,@szname,nil,0);
end;
[课程]Linux pwn 探索篇!