пример получения хвида:
procedure GetHardwareID(HardwareID : PChar);stdcall;
begin
LocalHardwareID := HardwareID;
end;
exports GetHardwareID;
т.е. экпортируешь фунцию, ее вызовет обертка
Добавлено через 3 минуты
обертку генеришь эзпротектом. можно обернуть что экзешник что длл. в обоих...