Показать сообщение отдельно
  #1  
Старый 07.02.2017, 12:20
igr37 igr37 вне форума
Прохожий
 
Регистрация: 01.02.2017
Сообщения: 9
Версия Delphi: Delphi 2
Репутация: 10
По умолчанию знак диаметра в Delphi

У меня вопрос как из проги на Delphi вывести в Excel знак диаметра(в базе он обозначен D=)
Код:
stroka:=FieldByName('NAZ_PRICE').AsString; 
while Pos('d=', stroka) > 0 do stroka[Pos('d=', stroka)]:=chr(216); // тут код диаметра 
Sheet.Cells[i,1].value:=stroka
Админ: Пользуемся тегами при оформлении кода!

chr(216) выводит букву Ш в Excel
помогите как ето обойти
Ответить с цитированием