Не работает DLL

[Crivel]

Написал DLL:

format PE GUI 4.0 DLL
entry DllEntryPoint
include 'INCLUDE\win32ax.inc'

section '.data' data readable writable

formats db "%d",0
temp db 256 dup(?)
OperationFile db 'Open',0

section '.code' code readable executable

proc DllEntryPoint hinstDLL,fdwReason,lpvReserved
	mov	eax,0
	ret
endp

proc NewFile FileName,ExecuteFile
invoke _lcreat,[FileName],0
cmp [ExecuteFile],1
invoke ShellExecute,0,OperationFile,[FileName],0,0,SW_SHOW
.else
mov eax,0
.endif
endp

section '.idata' import data readable writeable

  library kernel32,'KERNEL32.DLL',\
	  user32,'USER32.DLL',\
	  shell32,'SHELL32.DLL'

  include 'INCLUDE\api\kernel32.inc'
  include 'INCLUDE\api\user32.inc'
  include 'INCLUDE\api\shell32.inc'

section '.edata' export data readable

  export 'FMANAGER.DLL',\
	 NewFile, 'NewFile'

section '.reloc' fixups data discardable

Скомпилировалось, но когда в программе написанной на дельфи вызываю NewFile, то выходит ошибка о том что программа не смогла запуститься.

procedure NewFile(FileName : PChar; ExecuteFile : cardinal); stdcall; external 'FMANAGER.DLL';

А вот ошибка:
"Ошибка при иницилизации приложения (0xc0000142). Для выхода из приложения нажмите кнопку "ОК"."

[Crivel]

Я новичок и не пойму где ошибка. Помогите пожалуйста.
Заранее благодарен!

[Ulex]

DllEntry proc hInstDLL:HINSTANCE, reason:DWORD, reserved1:DWORD

mov eax,TRUE
ret

DllEntry Endp

Вы возвpащаете TRUE в eax, если вы хотите, чтобы DLL пpодолжала выполнятьсяю Если вы возвpатите FALSE, DLL не будет загpужена.

(С) Iczelion.

[Crivel]

Спасибо!