Сменить текущий принтер

Всем привет!!!
[COLOR=green]У всех наверно весеннее настроение, а у нас снег валит и валит(Краснодарский край - снег, темп -5С).[/COLOR]
Извините, отвлекся.

Вопросик: В сети есть N-е кол-во сетевых принтеров. Как можно програмно, нажатием 1-й кнопки сменить принтер по умолчанию на другой?

Представляю себе это так:
ListBox1->Items = printer->Printers;
ListBox1->ItemIndex = printer->PrinterIndex;
//типа список принтеров с выделенным - по умолчанию

char *newDevice = ((AnsiString)(ListBox1->Items->Strings[ListBox1->ItemIndex])).c_str();
printer->SetPrinterA(new0Device, driver, port, mode);
//типа теперьпо умолчанию другой

НО, почему-то при вызове функции GetPrinterA(device, driver, port, mode) меняются только парарметр device, остальные - никак?!
И соответственно при вызове SetPrinterA() - ошибки...

Может кто знает, подскажите.Плииз.
(А то 5 у.е. за PrintSwicher 3.0 - как то лом отдавать, руки тоже ведь не зря есть)