Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
ВнизПомогите пожалуйста! Найти похожие ветки
← →
KS (2002-01-31 09:14) [15]to: Андрей Сенченко © (30.01.02 15:50)
Чтож Вы HDD запретили с RichEdit1.Lines.Text работать
(он же именно Text пытался использовать)
А с ним вроде бы красивее получается (если конечно в длину
string-а поместимся :о) )
var
S: string;
begin
S := RichEdit1.Lines.Text;
if Length(S) > 0 then begin
OEMToChar(PChar(S), PChar(S));
RichEdit1.Lines.Text := S;
end;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c