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

Вниз

BAT-файл   Найти похожие ветки 

 
R@nger ©   (2003-02-27 09:20) [0]

Проблема: пытаюсь создать BAT-файл из Delphi. Делаю так:
AssignFile(F,"Test.bat");
Rewrite(F);
WriteLn(F,"@echo off");
WriteLn(F,"echo Тест...");
WriteLn(F,"Pause");
CloseFile(F);

Так вот: КАК преобразовать "Тест..." в ДОСовскую кодировку?
Заранее спасибо.


 
Palladin ©   (2003-02-27 09:24) [1]

ищи в FAQ


 
R@nger ©   (2003-02-27 09:31) [2]

Я нашел CharToOEM. Делал так:

AssignFile(F,"Test.bat");
Rewrite(F);
WriteLn(F,"@echo off");
s:=DosStr("echo Тест...");
WriteLn(F,s);
WriteLn(F,"Pause");
CloseFile(F);

Function DosStr(Str:string):String;
var
Res:PChar;
Begin
OemToChar(PChar(Str),Res);
Result:=StrPas(Res);
End;

При записи в файл Delphi ругается: I/O Error 103(файл не открыт).


 
dolmat ©   (2003-02-27 09:54) [3]

Я только недавно кинул ответ кому-то целый юнит по перекодировке. Посмотрите ниже.



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
6-29987
alcat
2002-12-18 17:30
2003.03.10
Как закрыть все порты только для одного IP?


14-30029
trotski
2003-02-24 13:29
2003.03.10
Дорвался до инета!


6-29997
Selesty
2003-01-22 23:48
2003.03.10
Как можно получить доступ к регистрам из делфей?


1-29836
Roman Go
2003-02-28 10:20
2003.03.10
Каие параметры у GetShortPath


1-29788
Lord Thunder
2003-02-26 11:24
2003.03.10
CheckListBox... Помогите разобраться...