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

Вниз

Как закодировать данные?   Найти похожие ветки 

 
Knoxville   (2005-02-22 21:59) [0]

Здравствуйте! Подскажите, как можно закодировать текст, который записывается в файл? То есть, чтобы было также, как если открыть bmp файл Блокнотом. А при чтении потом текст был таким же как и сначала.
Спасибо всем.


 
Anatoly Podgoretsky ©   (2005-02-22 22:11) [1]

s[I] := Char(Byte(S[i] -1));


 
Knoxville   (2005-02-22 22:29) [2]

Что такое S?


 
Anton_K ©   (2005-02-22 22:31) [3]

Что такое S?
var S:String;


 
begin...end ©   (2005-02-22 22:32) [4]

> Knoxville   (22.02.05 22:29) [2]

Также учтите, что в [1] имеется синтаксическая ошибка.


 
Knoxville   (2005-02-22 22:34) [5]

А как же тогда из строки 1 вычитать?


 
Knoxville   (2005-02-22 22:35) [6]

И, если это строка, то почему s[i]?


 
begin...end ©   (2005-02-22 22:36) [7]

> Knoxville   (22.02.05 22:34) [5]

s[I] := Char(Byte(S[i]) - 1);


 
Knoxville   (2005-02-22 22:40) [8]

Invalid typecast


 
Anatoly Podgoretsky ©   (2005-02-22 22:44) [9]

begin...end ©   (22.02.05 22:32) [4]
Домашнее задание - исправить ошибку. Но вроде до этого еще далекл.


 
Knoxville   (2005-02-22 22:50) [10]

Ну так как должно быть правильно?
И как можно в функцию Byte() строку передавать?


 
Anatoly Podgoretsky ©   (2005-02-22 22:51) [11]

А где там строка передается, нет этого. Кстати это и не функция.


 
Knoxville   (2005-02-22 22:53) [12]

Извиняюсь, тогда что такое S[i]?


 
Anatoly Podgoretsky ©   (2005-02-22 23:01) [13]

Char



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

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

Наверх




Память: 0.49 MB
Время: 0.043 c
14-1108619304
vajo
2005-02-17 08:48
2005.03.06
cidaemon.exe


8-1100767599
Сергей А
2004-11-18 11:46
2005.03.06
Фармат файлов MIDI


1-1108906887
TeNY
2005-02-20 16:41
2005.03.06
Размер картики в TBitmap?


3-1107334339
Rostislav Rotaru
2005-02-02 11:52
2005.03.06
Помогите написать сложную для меня процедуру или функцию


1-1109140252
Barman
2005-02-23 09:30
2005.03.06
ADO и Delphi8