Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.30;
Скачать: [xml.tar.bz2];

Вниз

Текст   Найти похожие ветки 

 
pvb   (2004-05-14 19:42) [0]

Тут такая беда. Я открываю файл assign"ом для записи. Записовую русский и английский текст. Как понимаю он толкает всё в юникоде. При дебаге работает нормаль, но после билда половина русского текста пропадает.
Я использую Delphi 8.


 
KilkennyCat ©   (2004-05-14 20:08) [1]

assign"ом не открывают. он лишь сопостовляет имя файла с файловой переменной. Приведите код записи в файл, чтения и дальнейшего вывода.


 
pvb87   (2004-05-14 21:06) [2]

Хорошо assign в сочетание с rewrite.


 
Goida ©   (2004-05-14 22:37) [3]

Лучше приведи часть кода, где ты открываешь файл, записываешь в него данные и, конечно, типы всех переменных. А по тому, что ты сказал можно только гадать на кофейной гуще, в чем у тебя проблема.


 
pvb   (2004-05-15 08:34) [4]

Подобие находится в моем Unit"е


Procedure X(Const S:String);
var F:TextFile;
Begin
assign(F,"output.txt");
rewrite(F);
Writeln(F,"English text");
Writeln(F,"English text");
Writeln(F,"English text");
Writeln(F,S);{Этот текст не пропадает}
Writeln(F,"English text");
Writeln(F,"X Какой-то другой текст который пропадает X");
Writeln(F,"English text");
close(F);
end;


 
KilkennyCat ©   (2004-05-15 15:24) [5]

Замечательно. Хотя, если так, то лучше использовать append.
Вопрос: пропадает - как Вы это узнаете? смотрите сторонним редактором, или уже в своей проге? если второе - код чтения где?


 
pvb   (2004-05-16 11:27) [6]

Я смотрю и блокнотом и Dos Navigator"ом.


 
Anatoly Podgoretsky ©   (2004-05-16 11:45) [7]

Настрой блокнот


 
Iraizor ©   (2004-05-16 14:19) [8]

pvb

если у тя не консольное приложение , то нады не assign a assignfile

второе , я бы писал не textfile , а просто text.

если будешь использовать text , то объявляй переменную типа текст не в локальных а в глобальных иначе не скомпилит(delphi7)


 
GuAV ©   (2004-05-16 14:41) [9]


> Как понимаю он толкает всё в юникоде


> Я смотрю и блокнотом и Dos Navigator"ом.

Посмотри точно в какой он толкает кодировке

> Writeln(F,"X Какой-то другой текст который пропадает X");

Напиши этот текст в дос-кодировке тем же DN


 
pvb   (2004-05-20 10:55) [10]

От этой строки остается только "X   X"



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

Форум: "Основная";
Текущий архив: 2004.05.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.033 c
3-1084367422
Pul
2004-05-12 17:10
2004.05.30
Сортирвка по Blob полю


6-1081634875
OrbitAl
2004-04-11 02:07
2004.05.30
Простенький LAN-чат


1-1084283285
Delphi5.01
2004-05-11 17:48
2004.05.30
Thread1Execute (При этом не происходит RePaint формы)


3-1083421788
Mishenka
2004-05-01 18:29
2004.05.30
Данные в таблицах.


1-1084612942
KillOfCats
2004-05-15 13:22
2004.05.30
Опять DElphi и HTML





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский