1. Сделай
Код:
ShowMessage(Printer.Printers[Printer.PrinterIndex]+', '+Printer.Title);
после
Код:
Printer.PrinterIndex:=sComboBox1.ItemIndex
2. Проверь диалог настроек принтера в системе, у него может быть более высокий приоритет, чем у твоей программы.