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

Вниз

Как изменить шрифт в richedit.   Найти похожие ветки 

 
multik ©   (2003-02-18 01:19) [0]

Привет!!! Столкнулся с проблемой, которую даже информатик не смог решить. Когда я пишу:

richedit1.lines.loadfromfile(expandfilename("file.rtf"));
fontdialog1.Execute;
richedit1.font:=fontdialog1.font;
richedit1.lines.savetofile(expandfilename("file.rtf"));

В этом случае шрифт изменяется и сохраняется. А вот если сделать массив а и
его элементы будут содержать список имён файлов, и написать следующий код:

fontdialog1.Execute;
for i:=1 to n do
begin
richedit1.lines.loadfromfile(expandfilename(a[i]));
richedit1.font:=fontdialog1.font;
richedit1.lines.savetofile(expandfilename(a[i]));
end;

то изменений в шрифте не происходит. Почему и как это можно исправить. заранее спасибо.


 
[NIKEL] ©   (2003-02-18 03:12) [1]

попробуй перед
richedit1.lines.loadfromfile(expandfilename(a[i]));
поставить другой фонт, а нетот который ты выбрал в ФонтДиалог
и загружать следующий файл и ставить нужный фонт т.е

fontdialog1.Execute;
for i:=1 to n do
begin
richedit1.font:=какой то другой фонт;B>
richedit1.lines.loadfromfile(expandfilename(a[i]));
richedit1.font:=fontdialog1.font;
richedit1.lines.savetofile(expandfilename(a[i]));
end;





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

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

Наверх




Память: 0.46 MB
Время: 0.018 c
14-87686
Павел
2003-02-11 16:25
2003.02.27
Программисты


1-87555
$Hic0
2003-02-17 12:46
2003.02.27
Запись чисел по указанному адресу


14-87663
Дмитрий К.К.
2003-02-11 07:46
2003.02.27
TColor


1-87544
smok_er
2003-02-15 15:47
2003.02.27
Работа c TFileStream


1-87502
andwcomm
2003-02-16 13:20
2003.02.27
Как программно отключить клавишу Win ?