Процедура кнопки

[xRamzeSx]

Привет всем.
Я создаю програмку, и уменя возникает одна небольшая проблемка.
Всё дело в том, что я хочу сделать кнопку, которая будет изменять значение по указанному адресу в процессе.

Вот исходный код моей программы:

...

Вот такой небольшой код.

Процедура "TfmMain.Timer1Timer(Sender: TObject)" выполняет считывание значения, а я хочу сделать процедуру, чтобы значение считывалось из Edit1 и отправлялось в указанный адресс: $000000...

Если кто-нибудь может что-либо подсказать, напишите пожалуйста

[Stilet]

а я хочу сделать процедуру, чтобы значение считывалось из Edit1

А write_value на что?
В цикле побайтно передавай ей из эдита.
или опиши что-то вроде:

procedure write_value2(address:cardinal;value:string);
var wb:Cardinal;
begin
 WindowName := find(windowtitle);
 ThreadId := GetWindowThreadProcessId(WindowName,@ProcessId);
 HandleWindow := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
 WriteProcessMemory(HandleWindow,ptr(Address),value[1],length(value),wb);
 CloseHandle(HandleWindow);
end;

byte:byte;

А вот это уже можно быдлокодерством назвать. Не рекомендуется имена из набора зарезервированных имен.

[xRamzeSx]

Зачем изменять write_value2? При той, что вы мне написали, программа отказывается запускаться.

[Stilet]

xRamzeSx

Я писал с потолка, просто предложив механизм записи строк.

[xRamzeSx]

procedure TfmMain.Button1Click(Sender: TObject);
var
res:int64;
begin
res:=0;
write_value($49DE9C,4,res);
end;

Программа считывает значение из res:=0 и отправляет его в адрес, а мне нужно, чтобы отправлялось то, что в Edit1. Можно ли как-нибудь вставить его сюда?

[Stilet]

Нарушение целостности топика. Тема потеряла свой якорь. Закрываю.