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

Вниз

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

 
serko   (2004-11-28 20:32) [0]

Помогите! У меня прога находится на рабочем столе, и когда я использую GetDir(0, sPath); , то в sPath вместо русских букв иероглифы! Как избежать этого?


 
begin...end ©   (2004-11-28 21:48) [1]

> serko   (28.11.04 20:32)

Не знаю, а с GetCurrentDirectory тоже иероглифы получаются?


 
OneFragLeft ©   (2004-11-28 22:29) [2]

Странно... У меня вот это:
procedure TForm1.Button1Click(Sender: TObject);
var sPath:String;
begin
GetDir(0, sPath);
ShowMessage(sPath);
end;

Нормально работает с рабочего стола.
Система и Дельфи - такие же.


 
serko   (2004-11-30 00:12) [3]

Я это в консоли делаю!


 
Yanis ©   (2004-11-30 00:42) [4]

Вот это орех!


 
Yanis ©   (2004-11-30 00:52) [5]

В консоли кодировка DOS. Воспользуйся CharToOEM (см. Пример)


var
 DStr:array[0..255] of char;
 s:String;
begin
 GetDir(0,S);
 CharToOEM(PChar(S),DStr);
end;


 
serko   (2004-11-30 01:04) [6]

Нет БАТЕНЬКА это ты орех, всерано не идет!


 
Defunct ©   (2004-11-30 07:34) [7]

serko   (30.11.04 01:04) [6]

keyrus запусти. или настрой страницу кодировки 866.



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

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

Наверх




Память: 0.47 MB
Время: 0.039 c
14-1100727843
Marser
2004-11-18 00:44
2004.12.12
Отбор на ЧМ-2006


3-1100182085
}|{yk
2004-11-11 17:08
2004.12.12
Инвалидность объектов в Firebird


14-1100918516
fayzut
2004-11-20 05:41
2004.12.12
Delphi 7


14-1100996643
Soft
2004-11-21 03:24
2004.12.12
Open Source обречен?


6-1087306299
Григорьев Антон
2004-06-15 17:31
2004.12.12
Прошу оценить статью про сокеты