Нужно сделать переназначение порта LPT2 (LPT3, etc.) на нужное сетевое устройство и посылать через этот фиктивный LPT-порт.

Честно говоря, не знаю... У меня Новелл Клиент стоит, там правой кнопкой по значку в трее - переназначение принтера... Где нет Новелла, там эта опция предлагается при установке с компакт-диска производителя принтера. Где и его нет, использую API:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
//-----------------------------------------------
AnsiString Function_GetPC_Name()
{
char m_buffer[MAX_COMPUTERNAME_LENGTH+1];
DWORD m_size;
m_size = sizeof(m_buffer);
GetComputerName(m_buffer, &m_size);
//Application->MessageBoxA(buffer,"",ID_OK);
return AnsiString(m_buffer);
}
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
if (Function_GetPC_Name().LowerCase()=="bux" || Function_GetPC_Name()=="pc009" || Function_GetPC_Name()=="pc003")
{
Application->Initialize();
Application->Title = "Переназначение LPT2 для бухгалтера";
Application->Run();
_NETRESOURCEA my_netres;
my_netres.lpLocalName = "LPT2";
my_netres.lpRemoteName = "\\\\sveta\\hpsveta";
my_netres.dwType = RESOURCETYPE_PRINT;
my_netres.lpProvider = NULL;
DWORD my_result = WNetAddConnection2(&my_netres,"","",CONNECT_UPDATE_PROFILE);
switch (my_result)
{
case NO_ERROR:
Beep(1500,2000);
Application->MessageBoxA("Переназначение LPT2 - \\\\SVETA\\HPSVETA выполнено","Переназначение принтерного порта",ID_OK);
break;
case ERROR_ALREADY_ASSIGNED:
Beep(500,2000);
Application->MessageBoxA("Уже выполнено!","Переназначение принтерного порта",ID_OK);
break;
default:
Application->MessageBoxA("ОШИБКА! Убедитесь, что компьютер Светы включен и Windows загрузилась до окна ввода пароля.","Переназначение принтерного порта",ID_OK);
}
}
}
catch (Exception &exception){;}
return 0;
}
//---------------------------------------------------------------------------

2arni
Да, точно
net use LPT2 \\server\printer