H ht99 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-16 #2 很好做了,可以做成trayIcon程序或service.
C caidao Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-16 #3 也不用TrayIcon。 Service可以在win9X下用吗?可不可以不做成Service?
A app2001 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-16 #5 你就直接做一个程序不显示主窗体,它也能达到你的目的呀??
M Mini菜鸟 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-16 #6 delphi里可以做到没有窗口的程序只有17K,不知道是怎么做的?
I indexhome Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-16 #7 是呀!只要能达到目的,有管什么都可以的呀! 在运行时不显示任务界面出来就OK了,它要什么功能呢?
F fisher70 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #9 仅是不用窗体的程序是容易的。但你要实现一些功能是很麻烦的事,因为你没有可用的VCL。省省吧。
Z zfsfj Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #10 program project1; uses Windows; {$APPTYPE CONSOLE} begin writeln('hello'); end.
C caidao Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #11 fisher70:为什么不用窗口就是不用VCL?这个程序只是需要的一个Timer就行了。我可以引用需要的单元,这样还是不能用VCL? zfsfj:控件台的当然不行哟。
T Tassadar Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #14 方法很多,主要看你的需要。 我这里提一个方法 写一个主线程,把要做的事情放在里面 在project里面写一句话waitforsingleObject 等待主线程结束即可。
J jine Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #15 不用vcl当然可以,自己在程序中动态创建对象就可以了! 那你直接写pas文件算了! 象最早的pascal不就没有form吗!
T Tassadar Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #16 你们怎么都说没有Form就不能用VCL,不懂就别乱说。
C caidao Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #17 Tassadar:这个程序主是就是监视系统有没有异常,也就是说,它随便Windows一起运行,直到关闭系统,否则不得退出。所以。。。 jine:我这样写怎么通不过? Unit UntMain2; interface Uses windows, ExtCtrls; var Timer: TTimer; procedure OnTimer(Sender: TObject); procedure Init; implementation procedure OnTimer(Sender: TObject); begin end; procedure Init; begin Timer := TTimer.Create(nil); Timer.Interval := 1000; Timer.Enabled := true; //Timer.OnTimer := OnTimer; //method pointer and regular procedure end; initialization Init; end.
Tassadar:这个程序主是就是监视系统有没有异常,也就是说,它随便Windows一起运行,直到关闭系统,否则不得退出。所以。。。 jine:我这样写怎么通不过? Unit UntMain2; interface Uses windows, ExtCtrls; var Timer: TTimer; procedure OnTimer(Sender: TObject); procedure Init; implementation procedure OnTimer(Sender: TObject); begin end; procedure Init; begin Timer := TTimer.Create(nil); Timer.Interval := 1000; Timer.Enabled := true; //Timer.OnTimer := OnTimer; //method pointer and regular procedure end; initialization Init; end.
H hongxing_dl Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #18 有错误提示吗? 把 Timer.Enabled := true; //Timer.OnTimer := OnTimer; //method pointer and regular procedure 位置互换一下看。
有错误提示吗? 把 Timer.Enabled := true; //Timer.OnTimer := OnTimer; //method pointer and regular procedure 位置互换一下看。
A app2001 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #19 参考一下这个?? 如何编写小于20K的Windows程序.演示如何使用: CreateWindow,CreateWindowEx,SendMessage and GetMessage TranslateMessage and DispatchMessage, CreateFont 演示如何使用API创建Windows窗口控件 http://www.csdn.net/dev/delphi/Samples/testwin.zip
参考一下这个?? 如何编写小于20K的Windows程序.演示如何使用: CreateWindow,CreateWindowEx,SendMessage and GetMessage TranslateMessage and DispatchMessage, CreateFont 演示如何使用API创建Windows窗口控件 http://www.csdn.net/dev/delphi/Samples/testwin.zip
F fisher70 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-17 #20 caidao,你好,什么叫"VCL",可视组件库。用它来建立界面十分方便。调用API可以自己为程序搭框架,包括按钮,文本框的创建。但这也是可视组件库?不过这没什么可争论的,即止。