![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нужны нормальные букуы в командной строке. [D7, WinXP]
elfebet © (2006-04-13 17:15:00)показываю путь к программе в командной строке, а он русские делает иероглифами. Есть ли функция, чтоб кодировку поменяла с win-1251 на DOS?
palva (2006-04-13 23:16:00) [1]
var BatchFileName : PChar;
s: String;
. . .
s:= ExtractFilePath(ParamStr(0))+ '$$336699.bat';
CharToOem(PChar(s), PChar(s));
WriteLn(s);
elfebet (2006-04-13 17:48:00) [2]разьясни пожалуйста, а то выдает ошибку.
я деляют так:
var BatchFileName : PChar;
...
BatchFileName := Pchar(ExtractFilePath(ParamStr(0))+ '$$336699.bat');
CharToOem(BatchFileName);
Johnmen (2006-04-13 17:20:00) [3]CharToOEM
OEMToChar