ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Сохранение указателя Delphi (WinApi)
  #1  
Старый 28.02.2010, 19:14
Faost
Новичок
Регистрация: 11.07.2009
Сообщений: 20
Провел на форуме:
39998

Репутация: 2
Отправить сообщение для Faost с помощью ICQ
По умолчанию Сохранение указателя Delphi (WinApi)

Здравствуйте, имеется процедура, в которую один раз на вход передается указатель на структуру, который после окончания работы процедуры естественно затирается.
Так вот, нужно его как-нибудь сохранить, чтобы уже при повторном вызове процедуры, когда ей этот указатель не передается, процедура могла достать его и работать с ним.
Глобальные переменные прямо использовать нельзя, т.к. эта процедура внедряется в посторонний процесс; писать на диск/в реестр тоже не вариант, т.е. нужно этот указатель сохранить в памяти самого процесса. Может есть в винде какие-нибудь функции для этого? (Что-то типа своеобразного контейнера).
Думал еще прямо ссылаться на указатель, а в момент внедрения процедуры в другой процесс "перебить" его (а верней адрес, который ему будет присваиваться) на новый адрес структуры, который я в последствии получаю. Но как его отыскать во внедренной функции, не представляю.
Пробовал также с дельта-смещением пошаманить, но не смог совместить асм-код с делфийским.
Код:

type
TMyStruct = record
...
...
...
end;

function ThisFunction(N: pointer = nil): Integer; stdcall;
begin
...?
with TMyStruct(N^) do
...
end;

//где N передается 1 раз при

var X: TMyStruct;
N, Proc: pointer;

...
begin
...
Внедряю структуру;
N:= Указатель на внедренную X;
Внедряю процедуру;
Proc:= Указатель на внедренную ThisFunction;
CreateRemoteThread(OtherProcess, nil, 0, Proc, N, 0, TID);
end.
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Литература Delphi Sams С/С++, C#, Delphi, .NET, Asm 2 19.03.2010 19:46
WinAPI в Delphi DiffiT С/С++, C#, Delphi, .NET, Asm 20 19.02.2010 21:47
Books PSalm69 Избранное 248 27.10.2009 04:52
Virus.Win32.Induc.a или "Снова записки новичка" _=(mac)=_ Защита ОС: вирусы, антивирусы, файрволы. 5 24.08.2009 23:34
Помогите с WinAPI в Delphi EST a1ien С/С++, C#, Delphi, .NET, Asm 13 12.10.2006 11:06



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ