Unplug - это для всех (т.е. со сменныи и несменным носителем). При этом происходит логическое отключение устройства.

Я тоже не совсем понял как оно code_9373.txt работает..

#sha
Add(MainForm,4409206,28,35)
{
 Left=20
 Top=105
}
Add(Button,14410281,133,112)
{
 Left=120
 Top=135
 Width=155
 Caption="Отключить диск"
 link(onClick,4427666:doDeviceRemove,[])
}
Add(FSMonitor,4427666,189,112)
{
 link(Drive,15917525:Disk,[])
}
Add(DriveBox,15917525,189,56)
{
 Left=120
 Top=110
 Width=155
 Height=21
}

Вот что-то для Delphi нарыл

Что тебе еще нужно?

Тебе это нужно?

Yuriy, я посмотрю немного позже, возможно пригодится

так там же в zip-е есть готовый exe-файл. Что тебе еще нужно?

а что мешает запустить внешнюю програму из HiAsm ?

Формально для безопасного извлечения USB-накопителя достаточно сделать вызов CM_Query_And_Remove_SubTree() для родительского экземпляра устройства (Device Instance) нужного диска.
Однако проблема получения кода экземпляра устройства по букве диска достаточно нетривиальна.

Один из вариантов решения:
1) получить номер устройства в своём классе по имени устройства:
DeviceIoControl() c кодом операции IOCTL_STORAGE_GET_DEVICE_NUMBER для хэндла,
полученного с помощью CreateFile('\\.\X:', .... ) (где X - имя нужного диска)
Запомним найденный номер, например, в DeviceNumber.

2) Далее, путём перебора всех устройств в классе GUID_DEVINTERFACE_DISK (в случае USB-Flash), определяем номер устройства по имени:
DeviceIoControl() c кодом операции IOCTL_STORAGE_GET_DEVICE_NUMBER для хэндла, полученного с помощью CreateFile(Path, .... )
(где Path - SP_DEVICE_INTERFACE_DETAIL_DATA.DevicePath, которое возвращает SetupDiGetDeviceInterfaceDetail() )
Если полученный номер совпал с DeviceNumber (из п.1), то найденное устройство это то, которое нам нужно - запоминаем код экземпляра в DeviceInstance ( SP_DEVINFO_DATA.DevInst, которое возвращает SetupDiGetDeviceInterfaceDetail() )
Для перебора используем SetupDiGetClassDevs(), SetupDiEnumDeviceInterfaces().

Теперь, имея в наличии DeviceInstance, получаем код экземпляра родительского устройства с помощью CM_Get_Parent(DevInstParent, DeviceInstance) и выполняем CM_Query_And_Remove_SubTree() для DevInstParent.