работа с памятью

← →
John (2005-02-12 22:41) [0]

Const
WindowTitle = "prog test";
Address = $7D7558;
pokevalue=(edit1.Text); Подскажите как сделать чтоб работало!
NumberOfBytes =1;

← →
Kerk © (2005-02-12 22:47) [1]

John (12.02.05 22:41)
pokevalue=(edit1.Text); Подскажите как сделать чтоб работало!

оно не будет работать

← →
John (2005-02-12 22:49) [2]

а че написать чтоб работало, а?

← →
Kerk © (2005-02-12 22:50) [3]

const pokevalue = "blablabla";
...
edit1.text := pokevalue;

то что ты пишешь.. работать В ПРИНЦИПЕ не будет.

← →
john (2005-02-12 22:53) [4]

жаль

← →
Kerk © (2005-02-12 22:54) [5]

а зачем тебе такой изврат?

← →
John (2005-02-12 22:57) [6]

Да нандо вводить значение в Edit 1, значение которое нужно записать в память.

Как то же ето можно сделать?

← →
Kerk © (2005-02-12 22:58) [7]

John (12.02.05 22:57) [6]

var pokevalue: string; begin pokevalue := edit1.text;

?

← →
juhn (2005-02-12 23:01) [8]

во! щас проверю!

← →
John (2005-02-12 23:04) [9]

var
WindowName : integer;
ProcessId : integer;
ThreadId : integer;
buf : PChar;
HandleWindow : Integer;
write : cardinal;
pokevalue:string;
Const
WindowTitle = "prog test";
Address = $7D7558;
NumberOfBytes =1;
begin
pokevalue:=edit1.Text;
WindowName := FindWindow(nil,"GTA: Vice City");
If WindowName = 0 then begin
MessageDlg("12345", mtwarning,[mbOK],0);
end;
ThreadId := GetWindowThreadProcessId(WindowName,@ProcessId);
HandleWindow := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
GetMem(buf,1);
buf^ := Chr(PokeValue); ///пишет incompatible types
WriteProcessMemory(HandleWindow,ptr(Address),buf,NumberOfBytes,write);
FreeMem(buf);
CloseHandle(HandleWindow);

← →
Kerk © (2005-02-12 23:05) [10]

John (12.02.05 23:04) [9]
buf^ := PChar(PokeValue); ///пишет incompatible types

← →
Kerk © (2005-02-12 23:06) [11]

buf := PChar(PokeValue);

← →
John (2005-02-12 23:08) [12]

Неее, не работает /////incompatible types: pchar и pansichar.

вотневезет

buf := PokeValue;

P.S. сплю я уже.. :)

← →
John (2005-02-12 23:11) [14]

buf := PChar(PokeValue);
вроде работат, спасибо. Спокойной ночи, малыши!

John (12.02.05 22:57) [6]
может не в "память", а в переменную, в памяти?
- тогда [7] )))

работа с памятью Найти похожие ветки