Я хочу преобразовать число в формат штрих-кода, оно работает хорошо, и файл шрифта находится в папке программы, но ни один компьютер не установил в него файл ttf, когда преобразование печатает его пустым
Dim path = Application.StartupPath & "\IDAutomationHC39M.ttf" '
pfcbarcode.AddFontFile(path)
Dim br As CrystalDecisions.CrystalReports.Engine.TextObject = cr.Section5.ReportObjects("br")
br.ApplyFont(New Font(pfcbarcode.Families(0), 12, FontStyle.Regular))
br.Text = "*" & srchcombopatient.SelectedValue & "*"
я пробую обычный шрифт, например, time new roman, и работаю, но штрих-код не работает, если мы не установим файл ttf внутри машины, файл ttf существует вместе с программой на другом компьютере