Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как создать текстовый файл с кодовой страницей 866? [D7, WinXP]


Zaq123 ©   (2006-04-20 12:45:00) 

Как создать текстовый файл с кодовой страницей 866?


balepa   (2006-04-21 08:16:00) [1]

Вместо charToOem(PChar(s),PChar(s));
попробуй AnsiToOem(PChar(s),PChar(s));


Dmitrij_K   (2006-04-20 14:04:00) [2]

Почитай, полезно будет
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1206&mode=print


Zaq123   (2006-04-20 13:54:00) [3]

Если можно, то поподробней. было бы лучше если бы ты кусок кода привел в пример


MBo   (2006-04-20 13:13:00) [4]

для константной строки именно в таком виде не сработает, но можешь вторую строку использовать для приемника (предварительно SetLength не забудь)


Zaq123   (2006-04-20 13:09:00) [5]

Вызывает ошибку

procedure TForm1.b5Click(Sender: TObject);
var
  f:textfile;
  s:string;
begin
  assignfile(f,'c:\1.txt');
  rewrite(f);
  s:='ёпрст';
  charToOem(PChar(s),PChar(s));      
  write(f,s)
  close(а);
end;


han_malign   (2006-04-20 12:51:00) [6]

CharToOem(PChar(str),PChar(str));
Writeln(F, str);


Zaq123   (2006-04-20 12:50:00) [7]

Да. мне нужно преобразовать кодировку windows to dos. как это сделать?


balepa   (2006-04-20 12:47:00) [8]

DOS'овский ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо