Форум: "Основная";
Текущий архив: 2002.09.26;
Скачать: [xml.tar.bz2];
Вниз
ReadProcessMemory Найти похожие ветки
← →
Alv (2002-09-15 17:08) [0]Кто-нибудь умеет пользоваться САБЖОМ???
Научите, у меня не получается..............
← →
Юрий Зотов (2002-09-15 22:04) [1]Что конкретно не получается? Из какого процесса нужно читать - своего или чужого? И т.д.
Вот простейший пример - тело строковой константы переносится в Caption через промежуточный буфер.
procedure TForm1.FormCreate(Sender: TObject);
const
HelloWorld = "Hello, world!";
var
BuffSize, Count: cardinal;
Buff: pointer;
begin
BuffSize := Length(HelloWorld) + 1;
GetMem(Buff, BuffSize);
try
ReadProcessMemory(GetCurrentProcess, @HelloWorld[1], Buff, BuffSize, Count);
Win32Check(Count = BuffSize);
Caption := String(PChar(Buff))
finally
FreeMem(Buff, BuffSize)
end
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.09.26;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c
