Первод из 16 СЧ в 10 СЧ

[KREGI]

все исправил, нет ошибки, как сделать что бы при открытии файла сразу подсвечивались (выделялись) латиница(то что читаемо)?
и у меня программа зациклисась теперь, все время открывает файл

[Sazary]

ошибка тут

Какая ошибка? У меня компилируется.
Впрочем, лучше измените вот так:

RichEdit1.Text := RichEdit1.Text + c;

[KREGI]

Например строчка:
Options яяяяHideяяяя
PД
надо что бы слова Hide и Options , выделились автоматом(или по нажатию кнопки) допустим синим 9в лбщем что б выделялись)как это сделать?

[Sazary]

Для этого нужно найти это слово (позицию первого символа).
Затем:

RichEdit1.SelStart := эта позиция;
RichEdit1.SelLength := длина слова;

Теперь нужное слово выделено и можно менять стиль.

---------
Боюсь, что мы уже ушли в глубокий оффтоп.
Предлагаю вам самостоятельно разобраться с этим компонентом.

----------

ну допустим позиция с нулевого элемента, значти будет

SelStart - начало выделения
SelLength - "длина" выделения (то есть сколько символов от позиции SelStart нужно выделить).

[KREGI]

ну допустим позиция с нулевого элемента, значти будет

RichEdit1.SelStart := 0
RichEdit1.SelLength := длина слова;(нем ного не понял)?

я ведь не могу определить за ране длину слова

[KREGI]

procedure TForm1.Button3Click(Sender: TObject);
begin
if RichEdit1.SelStart := 0
RichEdit1.SelLength := 10;
 then
 begin
  RichEdit1.SelAttributes.Style := [fsBold];
 end;
end;

конечно я понимаю что офф топ, но посмотрите я правильно понял?

[Sazary]

посмотрите я правильно понял?

Вы хоть посмотрели, что написали?

procedure TForm1.Button3Click(Sender: TObject);
begin
RichEdit1.SelStart := 0;
RichEdit1.SelLength := 10;
  RichEdit1.SelAttributes.Style := [fsBold];
end;

Экспериментируйте. И все поймете.

[KREGI]

да да да , я там накасячил =) все понял по выделению...