📄 bcjq096.txt
字号:
C++ Builder开发者:程序员之家
var how_many_ads = 3;
var now = new Date()
var sec = now.getSeconds()
var ad = sec % how_many_ads;
ad +=1;
首页
| 控件天堂 | 控件使用
| 编程技巧
| 源代码 | 编程工具 |
系统补丁 | 电子书籍 | 技术论坛
| 相关链接
if (ad==1) {document.write(''+'');}
if (ad==2) {document.write(''+'');}
if (ad==3) {document.write(''+'');}
var marqueecontents=''+scroll_text+''
if (document.all)
document.write(''+marqueecontents+'')
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers){
setTimeout("window.onresize=regenerate",450)
intializemarquee()
}
}
function intializemarquee(){
document.cmarquee01.document.cmarquee02.document.write(marqueecontents)
document.cmarquee01.document.cmarquee02.document.close()
thelength=document.cmarquee01.document.cmarquee02.document.height
scrollit()
}
function scrollit(){
if (document.cmarquee01.document.cmarquee02.top>=thelength*(-1)){
document.cmarquee01.document.cmarquee02.top-=speed
setTimeout("scrollit()",100)
}
else{
document.cmarquee01.document.cmarquee02.top=marqueeheight
scrollit()
}
}
window.onload=regenerate2
当前位置
:
编程技巧
完善C++
Builder4.0动态软件封面
运行时自动装入内存的,程序结束时自动销毁。不希望窗体自动创建的,把它从Auto-create
froms框中移入Available froms框。非自动创建的窗体必须在运行时由程序实例化.在View菜单中选第一项Project
Manager,可以看到所有的cpp文件及Form的列表,选中Form窗体中的.cpp文件,单击一下,转入代码编辑器,输入代码。源程序如下:
# include<vc1.h>
C++ Builder4.0是Borland公司推出的功能强大的应用程序开发语言软件,尽管已有的介绍C++
Builder4.0的书中有介绍运用C++ Builder4.0开发动态封面的例子,但一般都不完善,且介绍不详细。笔者结合实际,参阅了不下四本有关的书,并亲自上机调试通过,现将创建方法及源程序介绍给广大的电脑编程爱好者。
1。激活"File/New
Application"创建一个新的工程文件,并建好一个主窗体如Form1,当然也可以利用已建好的窗体。
2。在工具栏中选择New
Form 生成一个新的窗体,如Form2(可设ClientHe-ight
300,ClientWidth 400)
3。从Additional组件中选择Image控件并把它放在Form2上。在Object
Ins- pector中单击该按钮的属性Picture,弹出Picture
Editor对话框。选择Load装入相应的图像文件(如:.bmp.jpg)可设置其Align为Alclient。
4。选择Project项,弹出Option对话框,选择其中的Form项,将其中的Form2移出Auto-creat
forms,移入Available forms。(注)此项可设置那一个为主窗体,设置那些窗体自动创建。自动创建的窗体是程序:
# include"Unit2.h"//因Form2是以该文件名存盘。
# pragma hdrstop
USERES("project1.res");
USEFORM("Unit1.cpp",Form1);//因Form1是以该文件名存盘。
USEFORM("Unit2.cpp",Form2);
//----------------------------------------------------------------------
WINAPI
WinMain(HINSTANCE,HINSTANCE,LPSTR,int)
{
try
{
Application->Initialize();
Form2=new
TForm2(Application);
Form2->Position=poScreenCenter;
Form2->Show();
Form2->Update();
Application->ProcessMessages();
Sleep(1000);//暂停程序的执行,使动态封面即Form2停留足够的时间(毫秒)
Application->CreatForm(_classid(TForm1),&Form1);
Form2->Hide();
delete
Form2;
Application->Run();
}
catch(Exception & exception)
{
Application->Show
Exception(& Exception);
}
return 0;
}
//---------------------------------------------------------------------
另外,还可设置窗体的BorderStyler属性为bsNone达到取消窗体边界和取消系统
菜单及控制图标的目地,设置窗体的Position属性为PoScreenCenter使窗口居中显示。请注意,本实例中的源程序只有一小部分需要输入!
2000-05-27·
刘译星
if (ad==1) {document.write(''+'');}
if (ad==2) {document.write(''+'');}
if (ad==3) {document.write(''+'');}
C++ Builder开发者®
2000年06月01日 站长:唐朝