Главная страница
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.009 c
1-17645
drnet
2002-04-22 16:51
2002.05.06
Форма не стандартной формы. HELP!!!!!


4-17732
a_k_v
2002-01-22 08:36
2002.05.06
OPC + Delphi + SafeArray =???


1-17574
SaperXL
2002-04-22 09:38
2002.05.06
PaintBox


1-17560
ATLANTIDO
2002-04-20 20:55
2002.05.06
Класс окна


4-17726
mrvovik
2002-02-27 12:39
2002.05.06
Господа, как обрубить запуск exe-шника