Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

GetVolumeInformation [D6]


Raiv ©   (2002-06-11 15:09:00) 

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


Raiv   (2002-06-11 15:36:00) [1]

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


Raiv   (2002-06-11 15:31:00) [2]

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


Игорь Шевченко   (2002-06-11 15:26:00) [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:23:00) [4]

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо