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

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

FileRead [D6, Win95/98]


Ospa ©   (2002-12-20 13:26:00) 

При выделении дочернего узла происходит сл.действие:
открываю файл для записи. Записываю в него имя выделенного дочернего узла. Почему он зааисывает в непонятном виде? Нельзя, чтобы записывались руссские слова,т.е. открываю файл и вижу русски слова а не знаки всякие.


procedure TFName.N5Click(Sender: TObject);
var stt,stt1:string;
h:integer;
begin
H:=FileOpen("rus.txt",fmOpenReadWrite);
stt1:=TreeView1.selected.text;
begin
FileWrite(H,stt1,sizeof(integer));
end;
FileClose(H);


sask   (2002-12-20 13:37:00) [1]

ну и конечно же:
FileWrite(H,stt1[1],length(stt1));


ZrenBy   (2002-12-20 13:29:00) [2]

>>FileWrite(H,stt1,sizeof(integer));

FileWrite(H,stt1[1],sizeof(integer));


sask   (2002-12-20 13:29:00) [3]

А это смотря чем потом просматриваешь.
В файле инфа сохраняется в Win-кодировке.


Наверх

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