Code:

DLLFUNC var ErrorEx(STRING* inhalt)
{
int hResult;
hResult = MessageBox(ev->hWnd,"Error",inhalt->chars,MB_OK | MB_ICONERROR);

return(_VAR(-1));
}