Текущий архив: 2003.11.03;
Скачать: CL | DM;
Вниз
DOS Кодировка Найти похожие ветки
← →
Алексей Петухов (2003-10-21 13:40) [0]Здравствуйте, уважаемые Мастера.
Подскажите пожалуйста, как мне записать в текстовый файл русские буквы в DOS кодировке.
Заранее благодарен.
← →
Zacho © (2003-10-21 13:44) [1]Точно так же, как и в любой другой. А для преобразования DOS в win1251 и обратно смотри CharToOem, CharToOemBuf, OemToChar, OemToCharBuff
← →
Алексей Петухов (2003-10-22 09:06) [2]Благодарю. Пойду пробовать.
← →
Anatoly Podgoretsky © (2003-10-22 09:12) [3]Zacho © (21.10.03 13:44) [1]
DOS в ANSI, а не в win1251
иначе надо использовать таблицы перекодировки!
← →
Алексей Петухов (2003-10-22 09:23) [4]Просьба:
Помогите примерчиком, пожалуйста.
← →
Zacho © (2003-10-22 10:08) [5]
> Anatoly Podgoretsky © (22.10.03 09:12) [3]
Естественно.
> Алексей Петухов (22.10.03 09:23) [4]
А пример есть прямо на этом сайте, в FAQ.
http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988619604&n=19
← →
panov © (2003-10-22 11:20) [6]CharToOem(PChar(s),PChar(s));
← →
Алексей Петухов (2003-10-22 12:07) [7]Сходил по ссылке.
Вот нужная мне часть из данного примера:
procedure WinToDos;
var
Src, Str:PChar;
begin Src := Memo1.Lines.GetText;
CharToOem(Src, Str);
Memo2.Lines.Text := StrPas(Str);
end;
Но: в строкеCharToOem(Src, Str);возникает ошибкаAccess Violation.
Что делать?
← →
Zacho © (2003-10-22 12:12) [8]
> Алексей Петухов (22.10.03 12:07) [7]
Выделить память под Str. PChar - это всего лишь указатель на строку.
← →
Алексей Петухов (2003-10-22 12:19) [9]Спасибо.
Выделил память функцией StrNew.
Str:=StrNew("");
Но ведь память потом освобождать надо, ведь так?
Как тогда это сделать?
← →
Zacho © (2003-10-22 12:23) [10]
> Алексей Петухов (22.10.03 12:19) [9]
> Но ведь память потом освобождать надо, ведь так?
> Как тогда это сделать?
StrDispose естественно, в хелпе на StrNew даже пример есть :)
← →
sniknik © (2003-10-22 12:25) [11]Алексей Петухов (22.10.03 12:19) [9]
используй строку, и делай как
panov © (22.10.03 11:20) [6]
все выделится и освободится автоматом.
← →
Алексей Петухов (2003-10-22 12:25) [12]Извините.
Я сначала спросил, а потом смотреть пошел.
Страницы: 1 вся ветка
Текущий архив: 2003.11.03;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.015 c
