易截截图软件、单文件、免安装、纯绿色、仅160KB

简单的delphi代码,请老鸟给菜鸟指正!

我的代码,大家帮看下哪里出错了!我是新手请各位高人指教!
var
zbwnd,qtwnd:=hwnd;
st:string;
st:='hao123--我的上网主页 - Microsoft Internet Explorer';
zbwnd:=findwindow(nil,pchare(st));
qtwnd:=GetForegroundWindow;
if zbwnd <> qtwnd then
showmessage('没有装备’);
else
showmessage('装备找到’);
end;
qtwnd:=hwnd; ..
pchare ..
'没有装备’..

if zbwnd <> qtwnd then
showmessage('没有装备’)
else
showmessage('装备找到’);


你的begin哪去了?

else前不能有分号。。。

楼主看一些基础教程没?

没begin,定义变量也错了。。


相关问答:

Python中的Unicode在Delphi如何还原成Gb2312?

已知Python 中:
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢?
找到个方法
......

小弟不会DELPHI,请大侠们帮个忙

这个是拦截按键消息并测试是否为ENTER键。
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

请教下懂delphi多线程的大侠们!

我用 socket 接收到NO ,接收到一个NO就通过Carthread:=TCarthread.create(NO) ;创建一个线程,
是不是接收到多个NO,就会创建多个线程呢?
如果这样的话我接收到NO为EE,于是创建一个线程,过了一会SOCKET又 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号