Собственно уровень в дэлфи у меня на 3 ) Сейчс учусь работать с памятью процессов и столкнулся с жесткой непоняткой.Пробую читать из памяти игры строку текста в 5 символов.Если на форме присутствует тольк о 2 компонента,такие как Edit и Button то все замечательно,НО! стоит запихнуть в форму еще один компонент,притом не важно какой,будь-то еще одно окно редактирования Edit или еще одна кнопка или панель инструментов,не важно,появляется в моем поиске какая-то странная палка в конце.Что это не имею немалейшего понятия...Смотрите скрины)

И кстате вод код обработчика :

Код:
procedure TForm1.Button1Click(Sender: TObject);
Var
 HandleWindow : integer;
 ProcessId : integer;
 WindowName : integer;
 buf : PChar;
 read  : cardinal;
Const
 WindowTitle = 'Имя окна';
 Address = $0987D852;
begin
WindowName := FindWindow(nil,WindowTitle);
GetWindowThreadProcessId(WindowName,@ProcessId);
HandleWindow := OpenProcess(PROCESS_ALL_ACCESS,False,ProcessId);
GetMem(buf,5);
ReadProcessMemory(HandleWindow,ptr(Address),buf,5,read);
Form1.Edit1.Text := buf;
FreeMem(buf);
CloseHandle(HandleWindow);
end;

Отредактировано Человек?! (2009-10-03 20:38:10)