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

Вниз

вставка собственного сивола   Найти похожие ветки 

 
Вася   (2006-07-18 12:45) [0]

Возникла такая вот задача:
Требуется записывать в файл строки которым предшествует определенный сивол, т.е. например #178 + "строка", пока это делается так, но требуется вставлять "нужный" символ который отсутсвует в списке стандартных.
Честно говоря незнаю даже и в какую сторону копать. Т.е. по сути надо "нарисовать" нужный символ довать его куда-то(наверно создать собственный шрифт?????) и из этого шрифта его добавлять.
Вообщем может есть у кого какие идеи, или каким макаром это можно сделать.


 
Desdechado ©   (2006-07-18 12:47) [1]

В файл пишутся не символы, а байты.
Поэтому никаких шрифтов для записи не требуется. Шрифты нужны для отображения (если оно тебе вообще нужно). Поэтому вариант #178 + "строка" вполне нормален.


 
IceBeerg ©   (2006-07-19 10:22) [2]

Procedure WriteHemoroyToFile(HemoroyStr,HemoroyFile:String);
Var
HemoroyList:TStringList;
HemoroyNum:Integer;
Begin
HemoroyList:=TStringList.Create;
For HemoroyNum:=1 to 255 do
 HemoroyList.Add(Chr(HemoroyNum)+HemoroyStr);
HemoroyList.SaveToFile(HemoroyFile);
End;


Вызов

procedure TForm1.Button1Click(Sender: TObject);
begin
WriteHemoroyToFile("йцукен+qwerty","c:\hem.txt");
end;


Далее см. c:\hem.txt, еще вопросы есть?


 
Вася   (2006-07-19 13:02) [3]

Да, но допустим строка #149 + "строка", запишет в файл "жирную" точку и строку, и при откурытии блокнотом так и отбразиться, а мне нужно что-бы при открытии тем-же блокнотом отобразился мой символ + строка

to IceBeerg
Ща по-пробую...


 
StriderMan ©   (2006-07-19 13:11) [4]


> IceBeerg ©   (19.07.06 10:22) [2]
> Procedure WriteHemoroyToFile(HemoroyStr,HemoroyFile:String);
> Var
> HemoroyList:TStringList;
> HemoroyNum:Integer;
> Begin
> HemoroyList:=TStringList.Create;
> For HemoroyNum:=1 to 255 do
>  HemoroyList.Add(Chr(HemoroyNum)+HemoroyStr);
> HemoroyList.SaveToFile(HemoroyFile);
> End

HemoroyList надо бы разрушить в конце. И try...finally не повредит.


 
Desdechado ©   (2006-07-19 13:13) [5]

Еще раз повторю. Символы - это всего лишь способ представления. Он зависит от шрифта, от кодировки. Поэтому в блокноте ты увидишь то, что есть в файле с учетом выбранного из меню шрифта и кодировки в нем.
Если инсталлируешь свой шрифт, то сможешь его там выбрать. Но помни, что блокнот показывает все ОДНИМ шрифтом, а не как ворд, у которого каждый символ можно своим шрифтом сделать.
Поэтому #178 в одном шрифте будет иметь один символ, а в другом - другой. Аналогично и с содержимым остальной строки (может оказаться так, что в твоем шрифте будет правильно показываться твой символ и неправильно - остальные).



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

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

Наверх




Память: 0.48 MB
Время: 0.047 c
2-1153305625
Дева
2006-07-19 14:40
2006.08.06
Fireberd


4-1145254631
Brother
2006-04-17 10:17
2006.08.06
Иконки рабочего стола


1-1150961942
webpauk
2006-06-22 11:39
2006.08.06
Определение hyperlink


2-1153376028
oleggar
2006-07-20 10:13
2006.08.06
справочник имен


9-1132081451
Kirill_
2005-11-15 22:04
2006.08.06
DelphiX Sprite.Dead