код для Delphi

[nokius2011]

Здравствуйте,
Помогите написать код
Чтобы когда нажимаешь на кнопку значение в MPHexEditor по адресу 0x027 менялось на AA

MPHexEditor2.Lines.Add

такое не прокатывает((
Спасибо
С уважением Alex

[Serge_Bliznykov]

ОМГ!

Какого типа MPHexEditor ?
Если Вы хотите поменять какое-то значение, то при чём здесь ДобавитьСтроку ( Lines.Add ) ?
Что Вы вообще хотите сделать?! (я не закрыл Вашу тему с таким "пустым" названием, только потому, что хочу понять, что Вы хотите запрограммировать... )

[nokius2011]

я хочу сделать так чтобы когда нажал на кнопку значение поменялось вместо одного встало другое
сделал так

  procedure TForm1.btnOKClick(Sender: TObject);
begin
  MPHexEditor2.SetFocus;
	MPHexEditor2.SelStart := 39;
  MPHexEditor2.SelCount := 1;

end;

теперь надо выделенное поменять на AA

[Serge_Bliznykov]

Вы так и не сказали, какого типа у Вас MPHexEditor2 ...

так, наугад, предполагая, что MPHexEditor2 - TMemo,
выкиньте весь код с SelStart и напишите примерно так:

procedure TForm1.btnOKClick(Sender: TObject);
var s : string;
begin
  s := MPHexEditor2.Lines.Text;
  s[40] := 'A'; {нумерация в строке идёт от единицы, поэтому 39-й с нулевой - это 40-й, если считать от единицы}
  MPHexEditor2.Lines.Text := s;
end;

[nokius2011]

Сообщение от Serge_Bliznykov

Вы так и не сказали, какого типа у Вас MPHexEditor2 ...

так, наугад, предполагая, что MPHexEditor2 - TMemo,
выкиньте весь код с SelStart и напишите примерно так:

procedure TForm1.btnOKClick(Sender: TObject);
var s : string;
begin
  s := MPHexEditor2.Lines.Text;
  s[40] := 'A'; {нумерация в строке идёт от единицы, поэтому 39-й с нулевой - это 40-й, если считать от единицы}
  MPHexEditor2.Lines.Text := s;
end;

Странно у меня компилятор ругается на s := MPHexEditor2.Lines.Text;

[Alex11223]

Тогда может быть вы все-таки ответите, что такое у вас MPHexEditor2?)

[nokius2011]

http://www.torry.net/vcl/edits/diffedits/hexedit.zip
качал от сюда MPHexEdit2 2 версия

[Asinkrit]

  MPHexEditor1.SelectionAsText:='test';

[nokius2011]

Asinkrit спасибо работает