Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
ВнизRichEdit & Charset Найти похожие ветки
← →
ALex44 (2003-02-15 19:22) [0]Privet vsem! Znaet kto-nibud", kak zastavit" dolbanyj RichEdit izmenit" font (tochnee, Charset; menyaetsya vse, krome etogo!) zagruzhennogo texta? V Win98 rabotalo, a teper" perestalo (W2K, richedit 3.0; navernoe, bolee `prodvinutyj"...) Mne ne udalos" pridumat" nichego umnee, krome perezagruzki file"a s ispol"zovaniem takogo `elegantnogo" code:
var S: string;
Stream: TStringStream;
procedure Replace(const Old, New: string);
begin
S := StringReplace(S, Old, New, [rfReplaceAll]);
end;
begin
with FDRichEdit1 do begin
S := FileReadString("C:\!source\rus.txt");
Replace("\", "\\");
Replace("{", "\{");
Replace("}", "\}");
S := AdjustLineBreaks(S, tlbsCRLF);
Replace(#13#10, "\par ");
S := Concat(Format("{\rtf1{\fonttbl{\f0\fcharset%d}}\f0", [Font.Charset]), S, "}");
Stream := TStringStream.Create(S);
try
with Lines do try
BeginUpdate;
PlainText := False;
LoadFromStream(Stream);
Perform(CM_FONTCHANGED, 0, 0);
PlainText := True;
finally
EndUpdate;
end;
finally
Stream.Free;
end;
end;
end;
← →
Романов Р.В. (2003-02-15 19:30) [1]RichEdit.SelStart
RichEdit.SelLength
RichEdit.SelAttributes
← →
ALex44 (2003-02-15 19:39) [2]A Vy sami eto probovali?
with FDRichEdit1 do begin
SelStart := 1;
SelLength := 5;
SelAttributes.Charset := RUSSIAN_CHARSET;
end;
Esli by eto bylo tak prosto, ne bylo by voprosov... Ya uzh dazhe i EM_SETCHARFORMAT emu posylal, vse bez tolku.
Eshe raz, Win2K, Richedit 3.0, Russian locale installirovana, no ne default.
← →
Романов Р.В. (2003-02-15 21:00) [3]Сам не пробовал, т.к. не на чем и не зачем.
← →
ALex44 (2003-02-15 21:07) [4]
> Сам не пробовал, т.к. не на чем
Russian locale installirovana, no ne default
Esli problema v eto, to poprobujte zagruzit" text na lyubom yazyke =/= Russian or English (chtoby byli international characters) i dobit"sya, chtoby on NE pokazyval cyrillics (vmesto, skazhem, &eaccute;)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.02.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c