[Multi Duv.]Memory Scanner (fast)

[Inoxybel 51]

Evil te mandei a parte da source, está até que funcionando.

Porém está ocorrendo bugs de EAccess Violation, por favor aponte o que estou errando.

[~EvilCode 93]

Respondido, agora basta seguir os passos e debuggar sua aplicação conforme expliquei.

OBS: Gostaram do meu set novo? *-*

[Inoxybel 51]

Vou tentar, nunca fiz isso *o*

jaja edito.

 

 

@Set

Jaja eu pego o meu *----*

Ficou bacana, bem 'evil' HEUHUHUHUH

[Ryokusei 28]

Voltei!

Diga-me, o problema está onde, agora?

[Inoxybel 51]

Boa pergunta. Lhe enviei a source por pm para analise faz 1 semana.

[Ryokusei 28]

Eu não gosto de PM, mas vou dar uma olhada. Está lá há 1 semana.

[Inoxybel 51]

No aguardo.

E não sei se isso irá alterar em algo, mas o objetivo é que o scanner scaneie um valor do tipo Array of byte

[Ryokusei 28]

No aguardo.

E não sei se isso irá alterar em algo, mas o objetivo é que o scanner scaneie um valor do tipo Array of byte

 

Isso não é problema nenhum. Se você conseguir escanear um DWORD, adaptar pra qualquer tipo de dado é igualmente fácil. Eu, por exemplo, na minha função de escanear memória posso escanear qualquer coisa independente do tipo (Byte, Word, DWORD, QWORD, ANSI string, Unicode string, array of byte, etc.), é só você entender como funciona e adaptar pra si.

 

Está errado usar "data:Array[0..1000] of byte;". Usar 1001 bytes de var local vai foder a stack com overflow. Use uma var global pra isso. Use PInteger se quiser comparar Signed DWORD, se não use PDWORD. Não use StrToInt ali porque a comparação vai ser feita diversas vezes, da mesma forma a string será convertida pra Integer diversas vezes e isso vai deixar tudo lerdo. Faça a conversão antes do loop e guarde numa var, então compare só a var. De resto parece estar certo, você está quase lá.

 

Este vídeo pode te ajudar:

[Inoxybel 51]

Devo usar um Array de que tamanho, apenas 1000 bytes [0..999] ?

 

 

Net agora ta pedindo lenha, se eu carregar essa musica o modem explode.

[~EvilCode 93]

Está errado usar "data:Array[0..1000] of byte;". Usar 1001 bytes de var local vai foder a stack com overflow. Use uma var global pra isso.

Acho que isso já responde.

[Inoxybel 51]

Não li com atenção, efeito colateral do sono.

 

 

Ficou algo parecido com isso:

 

Var global:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Comparação abaixo do ReadProcessMemory

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Mas ainda continua o tal EAccessViolation

[Ryokusei 28]

begin

lst2.Items.Add(IntToStr((PInteger(@data)^)));

end;

 

Pra que isso? Você quer só listar o address, não o valor.

[Inoxybel 51]

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

O erro deve estár na comparação, pois quando da o alerta, a linha da comparação que fica 'setada'

[Ryokusei 28]

Me envie novamente o code como está pra eu avaliar onde pode estar o Access Violation. Deve ser o último problema a se resolver para que fique 100%.

[Inoxybel 51]

Source enviada

[Ryokusei 28]

data:Array[0..1000] of Byte;

 

eadProcessMemory(xxx, xxx, @data, xxx, xxx);

 

Você pode estar escrevendo mais em data do que o buffer pode suportar, e provavelmente está. Use SetLength para definir o tamanho do array igual ao tamanho da região de memória alvo.

Não uso mbi.baseaddress como referência de leitura. Uso adrIni, mas pode ser que funcione aí. Tente resolver o SetLength primeiro e depois pense nisso.