Скачать: CL | DM;

Как изменить кодировку в TXT   Найти похожие ветки 

← →
LEXX_55   (2005-09-05 07:32) [0]

Здравствуйте господа мастера.
Есть текстовый фаил в DOS кодировке. Может кто нить знает как изменить кодировку на Win. Если подкинете пример кода, буду признателен.

---

← →
NightLord ©   (2005-09-05 07:44) [1]

var s:array [0..255] of Char;
   WindowEdit,DosEdit:string;
begin
 CharToOem(PChar(WindowEdit), s);
 DosEdit:=s;
//OemToChar - в обратном направлении
end;

---

← →
LEXX_55   (2005-09-05 08:02) [2]

> DosEdit:=s;

это как? строковой переменной масив?!

---

← →
Lamer@fools.ua ©   (2005-09-05 08:21) [3]

>>NightLord ©   (05.09.05 07:44) [1]

Строк длинее 255 символов в природе не существует?

---

← →
LEXX_55   (2005-09-05 08:44) [4]

Да, кстати, а если у меня строка будет длинее 256. Тогда как? Если я буду исполизовать Longstring или WideString как мне задать массив?

---

← →
isasa ©   (2005-09-05 08:57) [5]

array of char  ???

---

← →
ANB ©   (2005-09-05 09:24) [6]

> LEXX_55   (05.09.05 08:44) [4]
- NightLord ©   (05.09.05 07:44) [1] дал абсолютно правильный пример. Дальше сам думай, как его использовать для твоего случая.

---

← →
LEXX_55   (2005-09-05 10:05) [7]

> ANB ©   (05.09.05 09:24) [6]

Все работает. Только обрежет если строка будет длинее. А с безразмерным массивом работать не хочет. Возмущеатся, что строковой переменной присваиваю массив.
Большое спасибо NightLord ©!

---

← →
ANB ©   (2005-09-05 10:50) [8]

> LEXX_55   (05.09.05 10:05) [7]
- а куда ты файл засунул ?

---

← →
LEXX_55   (2005-09-05 11:03) [9]

> ANB ©   (05.09.05 10:50) [8]

я его по строкам читаю, делаю небольшие операции сложения и записываю по строкам (отредактированным) в другой фаил.

---

← →
ANB ©   (2005-09-05 11:04) [10]

> LEXX_55   (05.09.05 10:05) [7]
- примерчик надо бы модифицировать под большие строки :
function OEMToChar_String(S : String) : String;
var R : String;
begin
SetLength(R, Length(S));
CharToOem(PChar(S), PChar(R));
Result := R;
end;

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.022 c