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

Вниз

Можно ещё немного помощи   Найти похожие ветки 

 
HDD ©   (2002-04-22 05:46) [0]

var Src, Str:PChar;
begin
Src := Richedit1.Lines.GetText;
CharToOem(Src, Str);
Richedit1.Lines.Text:= StrPas(Str);
end;

Если в тексте есть промежутки между строк то кодировка не меняется, а текст просто изчезает!
Помогите пожалуйста!


 
McSimm ©   (2002-04-22 12:47) [1]

var S: String;
begin
S := Richedit1.Lines.Text;
CharToOem(PChar(S), PChar(S));
Richedit1.Lines.Text:= S;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
3-17473
AlexP
2002-04-10 21:08
2002.05.06
Мастера, подскажите.


14-17690
Sergo
2002-03-23 10:05
2002.05.06
Сеть


7-17712
lamer2000
2002-01-05 00:47
2002.05.06
Shell Explorer


14-17696
Merlin
2002-03-30 06:42
2002.05.06
найдено в инете


1-17596
VJar
2002-04-21 22:44
2002.05.06
Как убрать проект из Alt-Tab в Windows 98???