Delphi在win7中怎么调用RegisterServeceProcess或用啥其他函数实现加
Posted
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了Delphi在win7中怎么调用RegisterServeceProcess或用啥其他函数实现加相关的知识，希望对你有一定的参考价值。
Delphi在win7中怎么调用RegisterServeceProcess或用什么其他函数实现加入服务进程，这个到底能实现吗？
参考技术A DWORD RegisterServiceProcess(DWORD dwProcessId,DWORD dwType); 其第一个参数指定为一个服务进程的进程标识，如果是0则注册当前的进程；第二个参数指出是注册还是注销当前的进程，其状态分别为：RSP_SIMPLE_SERVICE和RSP_UNREGISTER_SERVICE。http://hi.baidu.com/lemtech追问
在win7中没有这个函数，怎么办？求大神指教
logutil在java中怎么调用
JS不方便调试，alert这种方式不太友好，比较浪费时间。了解到浏览器内置了Console对象(JavaScript中没有)，但是不同浏览器支持的方法确是不同的。
因此，有必要自己对Console的方法进行封装下，从而适应不同浏览器。
工具类JS源码
//调试工具类
var LogUtil = (function(win, doc)
var LogUtil = win.LogUtil || ;
//默认可以使用
LogUtil.enable = true;
//以下4个方法，IE/Firefox/Chrome/Opera都支持
//console-info 消息
LogUtil.info = function(msg)
LogUtil.doLog(msg,'info');
;
//console-error 错误
LogUtil.error = function(msg)
LogUtil.doLog(msg,'error');
;
//console-warn 警告
LogUtil.warn = function(msg)
LogUtil.doLog(msg,'warn');
;
//console-log,可以显示(Firefox下，在All中显示，错误-警告-消息-调试信息中都不会显示)
LogUtil.log = function(msg)
LogUtil.doLog(msg,'log');
;
//以下是某个或某几个浏览器支持的方法，部分浏览器可能不支持;如果不支持，不会报错，也没有提示
//debug
LogUtil.debug = function(msg)
LogUtil.doLog(msg, 'debug');
;
//用户根据自己的需求，调用某个浏览器特定的方法
LogUtil.doLog = function(msg, level)
var useable = LogUtil.isUseable(level);
//可用才能调用
if(useable)
win.console[level](msg);
;
//console的方法是否可用，IE/Firefox/Chorome/Opera支持的方法是不同的
//IE控制台 log info warn error assert dir clear profile profileEnd
//Firebug控制台 log info warn error debug exception assert dir dirxml
trace
//group groupEnd groupCollapsed time timeEnd profile profileEnd count clear
table notifyFirebug firebug
//Chrom控制台 profiles memory debug error info log warn dir dirxml trace
assert count markTimeline
//profile profileEnd time timeEnd group groupCollapsed groupEnd
//Opera控制台 time timeEnd trace profile profileEnd debug log info warn error
assert dir
//dirxml group groupCollapsed groupEnd count table
//判断某个level的调试是否可用(level=error,warn,info,debug等)
LogUtil.isUseable =function(level)
var useable = LogUtil.enable && win.console &&
win.console[level];
return useable;
return LogUtil;
)(window, document);
测试例子
<html >
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>fansunion-log-demo</title>
<script src="js/fansunion-log.js"></script>
<script type="text/javascript">
function testLog()
//4个“一定”正确的方法，IE/Firefox/Chrome/Opera都支持
LogUtil.info("info");
LogUtil.log("log");
LogUtil.error("error");
LogUtil.warn("warn");
//可选的，Firefox支持，IE不支持
LogUtil.debug("debug");
testLog();
</script>
<body>
</body>
</html> 参考技术A 下面是一个小的例子：
import java.util.logging.*;
public class TestLogger
public static void main(String[] args)
Logger log = Logger.getLogger("lavasoft");
log.setLevel(Level.INFO);
Logger log1 = Logger.getLogger("lavasoft");
System.out.println(log==log1); //true
Logger log2 = Logger.getLogger("lavasoft.blog");
log2.setLevel(Level.WARNING);
log.info("aaa");
log2.info("bbb");
log2.fine("fine");
本回答被提问者和网友采纳 参考技术B 下面是一个小的例子：
import java.util.logging.*;
public class TestLogger
public static void main(String[] args)
Logger log = Logger.getLogger("lavasoft");
log.setLevel(Level.INFO);
Logger log1 = Logger.getLogger("lavasoft");
System.out.println(log==log1); //true
Logger log2 = Logger.getLogger("lavasoft.blog");
log2.setLevel(Level.WARNING);
log.info("aaa");
log2.info("bbb");
log2.fine("fine");
以上是关于Delphi在win7中怎么调用RegisterServeceProcess或用啥其他函数实现加的主要内容，如果未能解决你的问题，请参考以下文章
教程-在Delphi中怎么查看是否有内存泄漏(Delphi2007)+WIN7
delphi2010在win7系统下怎么装Suipack控件
Delphi Tscrollbox 内容 在win7+系统中 最大高度问题
delphi7中调用了fortran编写的dll，之前用XP系统时是可以运行出结果的，但是现在换到win7了，不能用了。