[Função]Pegar Texto de um Arquivo

por **Vector** Sáb Abr 14, 2012 11:17 pm

Bom, a algum tempo postei uma dúvida sobre ler arquivos com Assembly, pois é, agora eu já sou expert(nem tanto) nisso, e estou postando uma função que eu fiz para pegar todo o texto de algum arquivo...Espero que gostem

Código:
GetFileText proc FileName : LPSTR invoke CreateFile, FileName, GENERIC_READ or GENERIC_WRITE, FILE_SHARE_READ or FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_ARCHIVE, NULL ;Abrimos o arquivo .if (EAX == INVALID_HANDLE_VALUE) jmp CleanUp ;Se der erro, pulamos para o final .endif push EAX ;jogamos o handle do arquivo na pilha, iremos pega-lo depois invoke GlobalAlloc, GMEM_MOVEABLE or GMEM_ZEROINIT, 65535 ;Alocamos um espaço global para usar o ReadFile .if (EAX == NULL) jmp CleanUp ;Se der erro no GlobalAlloc pulamos para o final .endif push EAX ;Jogamos o handle da memória alocada na pilha invoke GlobalLock, EAX ;"trancamos" nossa memória alocada .if (EAX == NULL) jmp CleanUp ;Se o globalLock der erro, pulamos para o final .endif

Créditos:
Vector - Por Postar Aqui.
FioDuMaLL - Créditos do Post e do Código
Fonte:DP