ODBC Microsoft MS SQL Server 2008. Кодировка

[SQLPowerUser]

Тема довольно популярная в гугле, но нормальное решение находил для MySQL, а у меня MS SQL. Lazarus-1.4.2, fpc-2.6.4 (последние версии на сегодня) Рабочая станция Windows 7 64 bit.
У самой базы коллейшн Cyrillic_General_CI_AS, тип поля – обычный varchar (не юникод)
Выборки через ODBC идут быстро, но русские буквы в Memo отображаются знаками вопросов ????? (в грид выводить не нужно) Где-то нашёл, что для MSSQL, Unicode это значит USC-2 (он же UTF16 little endian), он и хранит и отдает юникодные строки в этом формате.
Добавлял параметр charset=USC-2, не помогло. charset=UTF-8 также без результата. Пробовал Regional=Yes и LANGUAGE=Russian, а также выводил в разные Memo c разными кастами (AsVariant и AsWideString)

Memo1.Lines.Add(SQLQuery1.Fields[0].AsVariant);
Memo2.Lines.Add(SQLQuery1.Fields[0].AsString);
Memo3.Lines.Add(SQLQuery1.Fields[0].AsWideString);

Пробовал и через SQL Native Client 2008 и на сервере делал явный cast(MyField as Nvarchar(500)). Не получается. В принципе, решить можно через AnsiToUtf8(SQLQuery1.Fields[0].AsString), но хотелось бы напрямую, без дополнительных преобразований.

[Stilet]

Для лазаруса это норм. Не стесняйся юзать AnsiToUtf8.

[SQLPowerUser]

ОК. Спасибо!

[xxbesoxx]

У самой базы коллейшн Cyrillic_General_CI_AS, тип поля – обычный varchar (не юникод)

если заменить в таблице поля varchar на NVARCHAR ???

Сообщение от Stilet

Для лазаруса это норм. Не стесняйся юзать AnsiToUtf8.

Тоже не знал, Спасибо Но зачем лазера если есть Delphi

[Utkin]

Но зачем лазера если есть Delphi

Тут как бэ наооборот. Зачем дорогой и монстроузный Делфи, когда есть Лазарус и КодеТайфун нахаляву и официально?

[SQLPowerUser]

>>> если заменить в таблице поля varchar на NVARCHAR ???
Я это тоже пробовал, не помогает... Сейчас тест на скорость забабахал, AnsiToUtf8 работает быстро, проигрыш где-то в 50 ms на 100 тыс. записей с выходной строкой 7 Мб, почти нет проигрыша.

>>> Но зачем лазера если есть Delphi
Чтоб под Линукс компилить, да и бесплатный

[xxbesoxx]

Utkin Зачем дорогой и монстроузный Делфи, когда есть Лазарус и КодеТайфун нахаляву

1) Визуальные компонентов больше , Дела в привычке
2) "нахаляву" или "не нахаляву" обсудить не буду, так как правило не нарушаем .
3) " официально " Знайте мне документ еще не кто не попросил , Если попросить .! выкрутимся как нибудь

[Utkin]

1) Визуальные компонентов больше , Дела в привычке

Да ладно, установи себе Коде Тайфун сначала, так то у него фаллос длинней.

2) "нахаляву" или "не нахаляву" обсудить не буду, так как правило не нарушаем .

Ну вот и я не нарушаю правило - не платить за то, что можно взять бесплатно. ФриПаскаль самое оно и есть.

3) " официально " Знайте мне документ еще не кто не попросил , Если попросить .! выкрутимся как нибудь

Знаете, когда могут попросить будет поздно.

[xxbesoxx]

Utkin Ну вот и я не нарушаю правило - не платить за то, что можно взять бесплатно.

Я тоже не нарушаю , Не плачу на то что можно скачать бесплатно ...

Utkin Знаете, когда могут попросить будет поздно.

Попросить когда я разбогатею из моего проекта .... А так я обычный человек ( Не компания, Не фирма ) еще не разбогател и если попросить .! дадим взятку на чай можно да ?
или сразу буду перепостить код на Laserus е

[Stilet]

зачем лазера если есть Delphi

Современное Делфи - это как на шагающем экскаваторе копать огород.

или сразу буду перепостить код на Laserusе

Не выйдет )

проигрыш где-то в 50 ms на 100 тыс. записей с выходной строкой 7 Мб, почти нет проигрыша.

На Сиквеле, если бы делал, проигрыш был бы почти такой же, так что шило на мыло.
Так то вообше можно попробовать один вариант: Сделать новую БД с юникодовой локалью и nchar-полями и туда пересадить данные. Но это морок.