ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
10.03.2009, 08:58
|
|
Постоянный
Регистрация: 26.03.2008
Сообщений: 311
Провел на форуме:
3799424
Репутация:
479
|
|
Сообщение от ProTeuS
как понимаю примерно так
while true do
begin
1) OpenProcess
2) ReadProcessMemory
3) Sleep(60);
end;
примеры
http://forum.ztu.edu.ua/showthread.php?t=1893
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_20998829.html
по первой ссылке не нашел
а по второй предлагают оплатить мемберство)
можешь наброски накатать?
|
|
|
10.03.2009, 12:48
|
|
Участник форума
Регистрация: 15.11.2006
Сообщений: 259
Провел на форуме:
2589211
Репутация:
151
|
|
#Wolf#, там на примере сапера показано считывание из памяти (по первой ссылке). Плохо искал 
В твоём случае будет примерно так.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var hwn:hwnd;
pid,hPr,dwR:dword;
buf:byte;
begin
hWn := FindWindow(nil, PChar('заголовок окна'));
if IsWindow(hwn) then begin
showmessage('хэндл найден');
GetWindowThreadProcessId(hWn, PID); //ищем pid
hPr := OpenProcess(PROCESS_VM_READ, False, PID);
ReadProcessMemory(hPr, ptr($232D7E68), @buf, 1, dwR); //читаем память
CloseHandle(hPr);
end;
end;
|
|
|
|
10.03.2009, 18:21
|
|
Познающий
Регистрация: 01.03.2008
Сообщений: 99
Провел на форуме:
613745
Репутация:
51
|
|
Помогите заполнить массив в таком вот порядке
Код:
1 3 4 10
2 5 9 11
6 8 12 15
7 13 14 16
То есть по диагонали заполняется. Размеры массива могут быть любыми, массив квадратный. |
|
|
|
10.03.2009, 21:05
|
|
Познающий
Регистрация: 22.07.2008
Сообщений: 62
Провел на форуме:
304390
Репутация:
172
|
|
Сообщение от lll6
Помогите заполнить массив в таком вот порядке
Код:
1 3 4 10
2 5 9 11
6 8 12 15
7 13 14 16
То есть по диагонали заполняется. Размеры массива могут быть любыми, массив квадратный. что простите????? вы хотите?????
|
|
|
|
10.03.2009, 22:48
|
|
Постоянный
Регистрация: 26.12.2007
Сообщений: 353
Провел на форуме:
905389
Репутация:
332
|
|
народ немного глупый вопрос но всетаки прошу ответить с полной серьёзностью..
в чем различие м/у типом ^Byte и просто Byte для чего служит ^
да и еще почему его ставят по разному например если ставят рядом с типом то получается ^Byte, а если ставят рядом с переменной то ставят после pt^
Последний раз редактировалось KIR@PRO; 10.03.2009 в 22:52..
|
|
|
|
11.03.2009, 00:01
|
|
Новичок
Регистрация: 08.09.2008
Сообщений: 2
Провел на форуме:
34862
Репутация:
0
|
|
Ну так сказать это некий аналог * в с++...
|
|
|
|
11.03.2009, 00:30
|
|
Познающий
Регистрация: 22.07.2008
Сообщений: 62
Провел на форуме:
304390
Репутация:
172
|
|
Сообщение от svyd
Ну так сказать это некий аналог * в с++...
 объяснил...
|
|
|
|
11.03.2009, 01:47
|
|
Постоянный
Регистрация: 26.12.2007
Сообщений: 353
Провел на форуме:
905389
Репутация:
332
|
|
я не просил аналоги называть я же попросил объяснить.... а твой ответ к сожелению даже подобием объяснения не является.....
или ты знаеш что в С++ означает * ? и желаеш объяснить? я вижу ты хорошо С++ знаеш 
вопрос более не актуален ответ смотри ниже
Последний раз редактировалось KIR@PRO; 11.03.2009 в 13:14..
|
|
|
|
11.03.2009, 02:17
|
|
Познающий
Регистрация: 22.07.2008
Сообщений: 62
Провел на форуме:
304390
Репутация:
172
|
|
Я фигею с вас народ, гугл нахрен отменили, что ли?....
|
|
|
|
11.03.2009, 02:23
|
|
Постоянный
Регистрация: 20.06.2008
Сообщений: 323
Провел на форуме:
1240829
Репутация:
165
|
|
Указательный тип! Pointer.
Объявление переменной как указателя на тип Integer - P: ^Integer;
P^ := 10; - присвоение значения указателю
http://www.rsdn.ru/article/Delphi/Delphi_7_02.xml - 2.15.1. Понятие указателя
Последний раз редактировалось cremator (c); 11.03.2009 в 02:30..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
