Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.02.19;
Скачать: CL | DM;

Вниз

Перевод проекта с Delphi 7 в Delphi XE. Проблема с ShortString   Найти похожие ветки 

 
I_D ©   (2011-11-09 12:12) [0]

Добрый день, гуру!
Подскажите, пожалуйста в таком вопросе.
Перевожу проект с Delphi 7 в Delphi XE.
В старом проекте был тип

type
 DataFile = record
   BegCyc: TDate;
   Colday: 0..31;
   NoteCyc: string[255];
 end;

На основание тип создал переменную

FData: file of DataFile;

Пишу в файл с помощью AssignFile

В Delphi 7 все работало как часы.
А вот в  Delphi XE в поле записи NoteCyc все символы, которые выходят за пределы "стандартной символьной таблицы" заменяются на "?"
Подскажите, пожалуйста, какая альтернатива для string[255] что бы юникод поддерживал.
Спасибо.


 
clickmaker ©   (2011-11-09 12:16) [1]

> какая альтернатива для string[255]

string или WideChar[0..254]


 
I_D ©   (2011-11-09 12:48) [2]

спасибо. буду пробовать с WideChar[0..254],
string - не совсем подходит для записи в типизированный текстовый файл нужно указать размер.


 
RTFM   (2011-11-11 07:58) [3]

Можно в String перевести в UTF8 и результат записать в NoteCyc. При чтении - наоборот.

Разумеется, длина строки уменьшится.

Ну или массив WideChar-ов, да. Оптимально.


 
Anatoly Podgoretsky ©   (2011-11-11 10:53) [4]


> RTFM   (11.11.11 07:58) [3]
> Можно в String перевести в UTF8 и результат записать в NoteCyc.
>  При чтении - наоборот.
>
> Разумеется, длина строки уменьшится.

Разумеет длина строки увеличиться!
Кроме того длина строки переменная, а FData: file of DataFile; требует фиксированую длину.

Только array [x..y] of widechar



Страницы: 1 вся ветка

Текущий архив: 2012.02.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
15-1319715427
Бездомный
2011-10-27 15:37
2012.02.19
Как лучше называть ключевое (и не только) поля таблиц?


15-1319915898
DVM
2011-10-29 23:18
2012.02.19
Забавная картинка


6-1250621874
cerber
2009-08-18 22:57
2012.02.19
Отправить Ctrl+A, Ctrl+V в окно webbrowser


13-1127735614
MeF Dei Corvi
2005-09-26 15:53
2012.02.19
Получение информации о системе


15-1319418009
RGV
2011-10-24 05:00
2012.02.19
Посоветуйте хороший смартфон/комуникатор