![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как просмотреть текст DOS? [D5, Win95/98, WinME, NT4, Win2k, WinXP]
b69 © (2002-12-29 17:09:00)Как просмотреть текст DOS RichEdit"ом(без помощи функции OemToChar)? Ставлю Font.Charset:=OEM_CHARSET и ничего не происходит.
b69 (2002-12-30 08:22:00) [21]С Terminal всё нормально, почему OemToChar не работает?
Anatoly Podgoretsky (2002-12-29 20:32:00) [22]Если у тебя с этим шрифтом не показывает, то значит у тебя проблемы с локализацией системы, проверить можешь если используешь стиль Terminal
b69 (2002-12-29 20:07:00) [23]У меня Courier New, а вообще мне нужно для любого шрифта. А функция OemToChar или OemToCharBuff или CharToOem
procedure TForm1.Button2Click(Sender: TObject);
var Src, Str:PChar;
begin
Src := RichEdit1.Lines.GetText;
OemToCharBuff(Src, Str,Length(Src));
RichEdit1.Lines.Text := StrPas(Str);
end;
вызывают "Access Violation...". В чём дело?
Anatoly Podgoretsky (2002-12-29 19:11:00) [24]Тебе виднее какой у тебя стоит
b69 (2002-12-29 18:58:00) [25]Какой шрифт?
Anatoly Podgoretsky (2002-12-29 17:36:00) [26]Может у тебя на юникод шрифт