PROFILE.ASM
上传用户:ys_happy
上传日期:2007-01-09
资源大小:20k
文件大小:1k
源码类别:

汇编语言

开发平台:

Asm

  1. .386
  2. .model flat,STDCALL
  3. include win32.asi           ; some 32-bit constants and structures
  4. include win32.ase
  5. extrn  IntToString : PROC
  6. .data
  7. szfilname db 'fdz.ini',0
  8. szPClass db 'Fractal Designer',0
  9. strbuf db 256 DUP (0)
  10. .code
  11. public StringToProfile, StringFromProfile
  12. StringToProfile PROC
  13. call WritePrivateProfileString,offset szPClass, esi,edi,offset szfilname
  14. ret
  15. StringToProfile ENDP
  16. StringFromProfile PROC
  17. call GetPrivateProfileString,offset szPClass, esi,edi,offset strbuf,256,offset szfilname
  18. lea esi,[strbuf]
  19. ret
  20. StringFromProfile ENDP
  21. public IntToProfile, IntFromProfile
  22. IntToProfile PROC
  23.      call IntToString
  24. call   StringToProfile
  25. ret
  26. IntToProfile ENDP
  27. IntFromProfile PROC
  28. call GetPrivateProfileInt,offset szPClass,esi,eax,offset szfilname
  29. ret
  30. IntFromProfile ENDP
  31. end