procedure TForm2.PrinterSetup1Click(Sender: TObject);
begin try
play_snd(1);
PRNSTP1.Execute;
abfApplicationProperties1Restore(Sender);
except
on E : Exception do _log_entry_error(E.ClassName,E.Message,'E50000');
end;End;