bcjq034.txt

c++ builder 的一些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           
                       
                         
                       
                     
                   
                 
                 
                   
                     
                       
                         
                           
                             
                               
                  当前位置
    
                    ：
    
                    编程技巧            
                            
                          
                        
                        
                        
                          
                            
                              
                    用BCB编一个“桌面写字板”        
                          
                    
                      
                        
                          
                          前段时间，我在网上发现一个很有趣的小程序，名字就叫“桌面写字板”。该程序的功能很有意思：当程序运行后，它就显示当前桌面，但是在这个桌面上你什么都做不了，只能按住鼠标左键在桌面上写字、画图，除非你有密码。它很适合用于你暂时离开计算机时，用来保护你的计算机不被别人乱动。下面我们就来看看这个程序是怎么实现的。打开C++Builder，新建一个工程。然后在Unit1.h的public部分添加以下代码。
            int x1,y1;
  
            把Form1的BorderStyle和WindowState属性分别改为bsNone和wsMaximized。增加一个TImage控件Image1。
  
            在Unit1.cpp中添加以下代码。
  
            #include <vcl.h>
  
            #pragma hdrstop
  
            #include "Unit1.h"
  
            #pragma package(smart_init)
  
            #pragma resource "*.dfm"
  
            TForm1 *Form1;
  
            __fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
  
            {
  
            }
  
            void __fastcall TForm1::FormCreate(TObject *Sender)
  
            {
  
            void *dsdc;
  
            void *dxwnd;
  
            Form1->Height=Screen->Height;
  
            Form1->Width=Screen->Width;
  
            Image1->Top=0;
  
            Image1->Left=0;
  
            Image1->Height=Form1->Height;
  
            Image1->Width=Form1->Width;
  
            dxwnd=GetDesktopWindow();//取得桌面句柄
  
            dsdc=GetDC(dxwnd);
  
            BitBlt(Image1->Canvas->Handle,0,0,Form1->Width,Form1->Height,dsdc,0,0,SRCCOPY);
  
            ReleaseDC(dxwnd,dsdc);
  
            x1=-1;
  
            y1=-1;
  
            SystemParametersInfo(SPI_SCREENSAVERRUNNING,true,(void *)1,0);//禁用系统热键
  
            }
  
            void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState   
            Shift,int X, int Y)//在桌面上做图,写字
  
            {
  
            if(Shift.Contains(ssLeft))
  
            {
  
            if(x1==-1&&y1==-1)
  
            {
  
            x1=X;
  
            y1=Y;
  
            Image1->Canvas->Pen->Color=clRed;
  
            Image1->Canvas->Pen->Width=5;
  
            Image1->Canvas->MoveTo(x1,y1);
  
            Image1->Canvas->LineTo(X,Y);
  
            }
  
            else
  
            {
  
            Image1->Canvas->Pen->Color=clRed;
  
            Image1->Canvas->Pen->Width=5;
  
            Image1->Canvas->MoveTo(x1,y1);
  
            Image1->Canvas->LineTo(X,Y);
  
            x1=X;
  
            y1=Y;
  
            }
  
            }
  
            }
  
            void __fastcall TForm1::Image1MouseDown(TObject *Sender,TMouseButton   
            Button, TShiftState Shift, int X, int Y)
  
            {
  
            if(Button==mbRight)//按鼠标右键就退出
  
            {
  
            SystemParametersInfo(SPI_SCREENSAVERRUNNING,false,(void *)1,0);//启用系统热键
  
            Close();
  
            }
  
            }
  
            void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton   
            Button,TShiftState Shift, int X, int Y)
  
            {
  
            if(Button==mbLeft)
  
            {
  
            x1=-1;
  
            y1=-1;
  
            }
  
            }
  
            现在保存并执行它。怎么样，效果不错吧！把它偷偷的装到你朋友的电脑里，保证会吓他一跳！当然，你还可以进一步完善它，比如加上密码功能，只有知道密码才能退出等等。本程序在Win97，BCB3.0中编译通过。
  
            ---陈寒秋---     
                             
                           
                               
                       
                             
                               
                             
                  if (ad==1) {document.write(''+'');}             
                  if (ad==2) {document.write(''+'');}             
                  if (ad==3) {document.write(''+'');}             
                                               
                             
                           
                         
                       
                  
                   
                     
                       
                     
                     
                         
                     
                   
                      
                    
                  
                
              
              
                
                  
                    
                      
            C++ Builder开发者®           
              2000年06月01日 站长：唐朝