其他

一般情況下，移動一個表單需要將滑鼠放置在標題列上才能拖動表單，為 什麼非要使用標題列呢？其實我們可以使用一個巧妙的方法來實現將滑鼠放置在表單上按下就可拖動表單，下面先看實現代碼。 在Form1的“Private”部分聲明過程：在private部分加入下列代碼：代碼 Code highlighting produced by Actipro CodeHighlighter

枚舉進程void CListprocessDlg::OnOK()

文章目錄 Lua例子(FOR 迴圈)背景首先要做的是建立含Lua的DLL添加Lua包含檔案：現在我們需要按如下方式啟動Lua VM現在我們寫Lua 和 C/C++ 結合的函數現在我們需要載入並執行Lua指令碼 什麼是LuaLua是具有簡單資料描述的擴充程式設計語言(動態解析語言)。它提供了非常好的物件導向編程， 函數式編程(functional programming)，資料驅動式編程(data-driven programming)，

在基於MainFrm程式中加入DialogBar很方便，大家都知道，DialogBar有著工具條無法比擬的優越性，它可以任意放置控制項，輕鬆實現如WPS OFFICE的導航功能。但是在基於Dialog的程式怎麼實現這種導航功能呢？本文擬針對這個問題提出解決的辦法，將困擾本人很久的問題的解決方案和大家一同分享。大家都知道，CDialogBar不能在Dialog程式中產生的原因是Dialog中沒有MainFrm，所以我就從CMiniFrameWnd產生了自己的一個類CMyMiniFrm。BOOL

BOOL CMyEdit::OnEraseBkgnd(CDC* pDC) {// TODO: Add your message handler code here and/or call default//************************************************************************************** //取消文字複選this->SetSel(0,0);//設定位元影像背景CBitmap

文章目錄 預定義的註冊表鍵CRegKey 類及主要使用和函數說明 說明註冊表是Windows重要組成部分，註冊表記錄了大量有關電腦軟硬體的資訊。註冊表中的值通過其名稱標識。值名稱由與鍵名相同的字元組成。值本身可以是字串、位元據或者是32位無符號值。在這裡我們主要運用以下技巧：預定義的註冊表鍵註冊表包含了幾個預定義鍵：HKEY_LOCAL_MACHINE

int r=100;int x0=gameRect.left+pt.x;int y0=gameRect.top+pt.y;int x,y;double n=0;MoveTo(x0,y0);while(n < 100){x=x0+r*cos(n);y=y0-r*sin(n);MoveTo(x,y);Sleep(50);if ( GetCursorShape()== _T("6ea90254")){LeftClick();break;}r--;n++;}BOOL

估摸著以後極有可能使用到，於是寫了一個產生隨機字串的函數。可以自訂建置規則，產生字串長度。模仿了MS的函數風格，建置規則使用宏的或且規則，傳回值使用了布爾型。這裡使用布爾返回可能作用不大。直接貼代碼吧，同樣是兩個檔案。#pragma once #define RdAllType 0x07 //′óD?D′oíêy×? #define RdNum 0x01 //êy×? #define

昨天去火車站買票，看到火車站上的跑馬燈文字提示很好玩，就自己編個小程式娛樂了一下~~很簡單的代碼。。。  Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,

ASSERT() ASSERT()被測試它的參數，若參數為0，則中斷執行並列印一段說明訊息。在 Release 版本的程式中它不起任何作用。ASSERT()使用的時候必須保證參數運算式中不能有函數調用（譯者註：ASSERT()宏在 Release 版本中不對錶達式求值），因此對於任何有函數調用的參數運算式，應該使用宏 VERIFY()，以保證運算式中的函數調用在 Release 版本中會被正確求值。斷言(assertion)用帶斷言資訊(程式, 模組, assertion行)的對話方塊執行.

最近編了一個小軟體，需要將Stringgrid中的內容匯出到Excel中。由於使用的是Delphi2010 + Office2010，中間有點小曲折，現把代碼貼出來，供參考。代碼Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->procedure TFormMain.btn3Click(Sender: TObject);var

好東西，收藏一下--------------------------------------------------------------------------------------------------------------------------Motorola S-records 16進位檔案的另一種常見格式，Fujitsu平台的Softune編譯出來就是這種格式這篇文章介紹了一下各個資料記錄的意義。The following fairly complete

有一個E-mail地址：username@***.com，編一個程式，讀出username. Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> 1 {------------------------------------------------------} 2 {               從 ****@###.##中提取出****      

"Addresses" in CANopen In CANopen there are different types of addresses (IDs): • COB ID The CAN Object Identifier addresses the message (= the CAN object) in the list of devices.Identical messages have the same COB ID. The COB ID entries in the

Code highlighting produced by Actipro CodeHighlighter

在python和Delphi中，牽涉到角度計算時，例如：sin(x),cos(x)等，這裡的x都是弧度，而不是直接的角度。因此，在計算對應角度的三角函數時，需要先將角度轉換成弧度再計算。 弧度和角度的轉換公式是：角度=弧度*180.0f/PI弧度=角度*PI/180.0f  例如：計算90度的正弦值，在Python中應該這麼寫：Code highlighting produced by Actipro CodeHighlighter

//視窗抖動執行個體CPoint CurrentPos; //抖完還要回到這個位置，不要亂跑。CRect rect; //這一段計算主要是為了滿足SetWindowPos()的參數要求…不解釋吧GetClientRect(&rect);ClientToScreen(&rect);CurrentPos.x = rect.left;CurrentPos.y = rect.top;int FrameWidth;int FrameHight;int CaptionHight;

最近根據項目需要，需要我去用 vc++6.0 作一個 ActiveX web 組件。自己從來沒有接觸過這方面的編程，這次是頭一遭！所以咱就做了，不過倒很出乎我的意料，比我想象的要快很多就完成了。現將 vc++6.0 操作 word 部分的關鍵代碼部分帖出來，共用給大家。因為我在開發的時候遇到了很多問題，並且網上的資料很少，基本都是最基本的操作。所以帖出來，希望能讓大家在開發的過程少走些彎路！工具： vc++6.0 。關鍵字： c++ ， MFC 。要求：系統安裝 MS OFFICE 2000 。

文章目錄 System Event Notification / test.cpp : Defines the entry point for the console application.//#include "stdafx.h"#include "test.h"#include <Wininet.h>#include <Sensapi.h>#ifdef _DEBUG#define new

procedure TForm1.btn1Click(Sender: TObject);begin{$Define ss} (* 用於定義一個條件符號，一旦定義，條件符號就為真 *){$IFDEF ss} (* 對條件符號進行判斷，為真則編譯源檔案 *) ShowMessage('ss Has defined!!'); Text := 'ss Has defined!!'; Form1.Color := clLime;{$ELSE} (*