Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.24;
Скачать: CL | DM;

Вниз

GetVolumeInformation   Найти похожие ветки 

 
Raiv ©   (2002-06-11 15:09) [0]

Как считать серийный номер с помощью GetVolumeInformation, параметр lpVolumeSerialNumber не могу задать.


 
Игорь Шевченко ©   (2002-06-11 15:13) [1]

А остальные можете ? :-)


 
Raiv ©   (2002-06-11 15:23) [2]

Я не знаю как ставить указатели и адреса на Паскале (пишу на СРР)


 
Игорь Шевченко ©   (2002-06-11 15:26) [3]


function GetVolumeInformation(lpRootPathName: PAnsiChar;
lpVolumeNameBuffer: PAnsiChar; nVolumeNameSize: DWORD; lpVolumeSerialNumber: PDWORD;
var lpMaximumComponentLength, lpFileSystemFlags: DWORD;
lpFileSystemNameBuffer: PAnsiChar; nFileSystemNameSize: DWORD): BOOL; stdcall;

следовательно:
var
RootName : String;
VolNameBuffer : array[0..255] of char;
VolumeSerialNumber : DWORD;
...
GetVolumeInformation(PChar(RootName), VolNameBuffer, SizeOf(VolNameBuffer), @VolumeSerialNumber, ...


 
Raiv ©   (2002-06-11 15:31) [4]

Что означет на паскале знак @ ?


 
Raiv ©   (2002-06-11 15:36) [5]

Все!!! Спасибо - разобрался.



Страницы: 1 вся ветка

Текущий архив: 2002.06.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-77390
koks
2002-06-13 15:28
2002.06.24
Все как по учебнику - а не работает....


14-77581
Dimka Maslov
2002-05-20 16:08
2002.06.24
UBPFD


14-77565
den_c
2002-05-20 15:59
2002.06.24
Кто шмонает на тему лицензионого программного обеспечения


1-77404
PTE
2002-06-13 20:42
2002.06.24
как записать и считать из ini CheckBox


7-77627
KPOT
2002-03-27 16:09
2002.06.24
Delphi 6 Update Pack 2