chinayu2007-CSDN博客

原创 delphi单元文件

想学习delphi，打开IDE，首先看到就是主窗口的单元文件。入门第一步就是搞清楚，这个单元文件的结构。很多书上没说那么清楚。最近学习之后，基本搞清它的结构。这个文件，作为一个单元，基本需要涉及的知识点都有。

2022-09-28 14:28:40 590 1

原创 js数字变量,作为函数参数自动去0

当一个数字变量，想将其作为字符串，如"012"，当作为函数的参数时,会自动去掉前面的0。只是想当字符串使用，并不想去掉0，怎么办呢？

2022-09-08 19:05:41 981

原创 C++Builder发送电子邮件

C++Builder发送电子邮件。

2022-07-15 17:59:48 1034

在Web.config文件中,添加如下内容:<?xml version="1.0"?><configuration> <system.web> <compilation targetFramework="4.0" debug="true"/> .

2022-05-27 10:20:47 365

原创鼠标在控件上的偏移值

当鼠标在控件上点击时，想知道鼠标在控件上的位置，相对控件Left和Top偏移了多少像素 TPoint Pos1 = Mouse->CursorPos;//鼠标光标当前坐标 //将控件在窗体上的坐标转为屏幕坐标 //注意如果控件被包含在其他容器内，需要累加容器的坐标 TPoint p(Button9->Left,Button9->Top); TPoint Pos2 = ClientToScreen(p); int cy = Pos1.x - Pos2.x;/

2022-04-09 10:07:49 425

原创十六进制字符串转成整数

char *pEnd;//字符串中的结束字符long ret = strtol("41",&pEnd,16);//十六进制字符串41转数值//ret为65strtol会扫描字符串，跳过空格开头的字符串，遇到数字和正负符号开始转换，直到遇到字母或\0结束转换。第二个参数是指定主动结束的字符，即遇此字符结束转换。第三个参数是进制，十六进制就是16。...

2022-04-08 09:44:26 1588

原创接收函数返回的二维字符数组

int cnt = 0;//返回字符串数组的行数 //函数内部定义形如char a[][15]二维数组 //初始化char a[][15]={"abc","hello","world"}; char ** p = GetAllYbName(cnt);//获取字符串数组指针, //第一种方法： char rec[21][15]={0}; //预定义足够大的二维数组 memcpy(rec,p,cnt*15); //复制数据 for(int i=0...

2022-03-31 18:52:32 584

原创 TFont字体的Height

字型的Height是指字型不包括内部铅框的高度,用像素表示。C++Builder中用下面的公式计算Height的属性值：Font->Height = -Font->Size * 72 /Font->PixeIsPerInch当在Height属性中中输入正值时，Size属性是负值。反之当Heigth属性输入负值时，Size属性是正值。一个正的Height值，表示包含内部铅框，而负的Height值，则不包括。...

2022-01-19 19:27:28 885

原创 C++Builder智能指针

#include <memory>void __fastcall TForm1::Button1Click(TObject * Sender){ std::auto_ptr<TButton>foo(new TButton(Form1)); foo->Caption = "this Be a Test"; MessageBox(NULL,foo->Caption.c_str(),"提示",MB_OK);}

2022-01-19 19:09:16 587

原创类中的static,const,static const成员初始化

class TSoftWareInfo{ public: const char * SoftwareName; //参数列表中初始化 static int Year; //类外初始化 static const char * Copyright; //类外初始化 static const int Buff[100]; //类外初始化 static const char c = '1'; //.

2021-11-23 21:32:33 245

原创 C++builder中的Format函数

AnsiString str1 = Format("%d%s",OPENARRAY(TVarRec,(120,"hello") ) );ShowMessage(str1);

2021-10-30 15:39:49 448

原创环循数组读取

int c=5; //容量AnsiString a[5]={"G10","G10A","G10.4G","G20","G20.4G"}; //模拟环形区int i = 0;//不断单击按钮,在数组a中循环访问各元素void __fastcall TForm1::Button1Click(TObject *Sender){ Label1->Caption = "第"+AnsiString(i+1)+"个元素:"+a[i++%c]; i=(i==c)?0:i;}...

2021-10-15 17:31:01 121

原创 wchat_t存储一个汉字并显示

wchar_t d = L'中'; WideString str = WideString(d); ShowMessage(str);

2021-09-17 17:10:05 238

原创拼音获取汉字

struct stChineseTable{ char szIndex[10]; char szChinese[300];};struct struct_PY_HZ_DB{ char cLetter; int nCount; struct stChineseTable arrStChinese[50];};extern const struct struct_PY_HZ_DB PY_HZ_DB[23];const struct struct_PY_HZ_DB P.

2021-09-16 16:14:48 135

原创从EXE文件的版本信息中获取指定的信息

AnsiString GetFileVerInfo(AnsiString strKey){//从exe的版本信息中获取指定的信息 TDateTime dt; //要获取版本的文件 char *ExeName = ParamStr(0).c_str(); DWORD dwHandle; //得到版本信息大小 DWORD n = GetFileVersionInfoSize(ExeName, &dwHandle); if (n > 0) { .

2021-06-30 16:28:34 206

原创获取EXE文件的版本号

AnsiString GetFileVer(){//获取本程序版本号 DWORD dwHandle; UINT unCurLen; AnsiString strVer; char lpFileVer[30]={0}; String strFileName=Application->ExeName; DWORD dwVerLen=GetFileVersionInfoSize(strFileName.c_str(),&dwHandle);.

2021-06-30 16:16:54 433

原创连接Access2007数据库

C++Builder中连接Access2007数据库，如下：上述代码是用TADOConnection连接数据库，也可以直接使用TADOQuery的连接字符串属性。

2021-05-22 16:22:33 363

原创 TrackMouseEvent处理鼠标消息

当鼠标在按钮上，按钮可以响应鼠标移动，点击，进入，离开消息。有一个特殊情况，就是按钮处理窗口边缘时，鼠标离开按钮，进入系统其他界面，而不是按钮所在窗口时，就不能响应离开CM_MOUSELEAVE消息。//.h文件bool m_bTrackingMouse; //检测鼠标是否离开标志protected: BEGIN_MESSAGE_MAP VCL_MESSAGE_HANDLER(CM_MOUSELEAVE, TMessage, MouseLeave) VCL_MESSAG

2021-05-21 10:28:08 455 1

原创 c++builder中的字符串分隔处理

c语言中通常用strstok函数进行字符串分隔处理。在C++builder有专用的函数来处理。如下： TStringList* lst = new TStringList; String strSource = "0x21,0x72,0x03,0x04"; TSysCharSet Separators,WhiteSpace; //分隔符,可以指定多种同时使用 Separators <<','; //删除每个字段中.

2021-05-18 16:13:26 936

原创获取文件版本信息

修改了c++builder帮助文件的例子，原例子不完整，编译不能通过。const AnsiString InfoStr[10] = {"CompanyName", "FileDescription", "FileVersion", "InternalName", "LegalCopyright", "LegalTradeMarks", "OriginalFileName", "ProductName", "ProductVersion", "Comments"};//要获取版本的文件char *.

2021-05-18 14:42:39 282

原创获取文件修改时间

获取文件修改时间,包括当前运行的exe程序自身的修改时间,代码如下:TDateTime TForm5::GetFileTime(String sFilename, int TimeType){ //TODO: Add your source code here WIN32_FIND_DATA ffd; WORD fd,ft; DWORD fdt; FILETIME lft,Time; HANDLE H; H = FindFirstFile(sFilenam

2021-05-02 12:49:00 908

原创调用资源中的字体文件

如果不是系统自带的字体，程序想在运行时使用，但又不想将字体文件安装到系统中。如何处理呢？步骤如下：（1）获取字体文件，如阿里的iconfont，可以将图标字体文件下载下来，并查看html中的unicode码。（2）将字体文件生成资源文件，编译到exe文件中去。如字体文件名为f.ttf，已放在当前工程的res文件夹中。用记事本，编写如下内容，保存为1.rcF1 BINARY "\res\iconfont.ttf"将1.rc添加到工程中，会生成res文件，且会被编译到exe文件中去。（3）调...

2021-04-29 10:48:42 1063

原创去掉小数点后多余的0

去掉小数点后,多余0，没有函数处理。因为采用字符串处理，如下：AnsiString TForm5::GetNotZero(float value){ AnsiString formatValue = AnsiString().sprintf ("%0.3f",value); int point = formatValue.Pos("."); for(int i=formatValue.Length();i>0;i--) { if(i >=

2021-04-03 10:46:02 3620

原创在字符串中寻找连续数字子串正则式

要在字符串中(包含中文,英文,数字)寻找出连续数字符串,可用正则表达式实现,如下:#include <regexp.h>AnsiString TForm1::GetDigtal(AnsiString strSource){ char szReg[]="[0-9]+";//正则表达式，表示一个或多个'0'到'9'的字符串 char szStr[20]={0};//待匹配的字符串 strcpy(szStr,strSource.c_str()); std::

2021-03-31 17:30:05 1062

原创禁止TTreeView双击或单击展开折叠

TTreeView控件的名称为tvAreaManage，定义一个bool成员变量:m_bAllow，代码如下：void __fastcall TForm1::tvAreaManageCollapsing(TObject *Sender, TTreeNode *Node, bool &AllowCollapse){ AllowCollapse = m_bAllow;}//-----------------------------------------------

2021-03-08 11:18:59 712

原创 c++builder 编译lua动态库

参考了网上的资料,重新编译lua库,版本为lua-5.4.2,makefile文件内容如下:# Makefile for Borland C++ 5.5# usage:# build lua with dll: make -f makefile.bcc# build lua with static library: make -f makefile.bcc -DSTATIC# write by: Mao yongjun ([email protected])

2021-02-15 17:01:52 261

原创 DLL导出类共享内存

创建一个DLL工程,在cpp中添加如下代码://---------------------------------------------------------------------------#pragma option -zRSHSEG //改变缺省数据段名SHSEG#pragma option -zTSHCLASS //改变缺省数据类名SHCLASS#include <vcl.h>#include <windows.h>#pragma hdrstop/

2021-02-12 17:31:50 381

原创在DLL中包含窗体

在DLL中如何包含窗体,C++Builder6中方法如下:(1)先包含接口文件,这是各个DLL中需要实现的功能,并在主窗口中调用这些接口。#ifndef IDLLControlHPP#define IDLLControlHPP//DLL中的基本接口类,窗口消息处理须继承此类class IDLLObject{public: virtual void __fastcall Initialize(Forms::TApplication* AApp) = 0 ; virtua

2021-01-23 13:54:02 1061

翻译中文乱码转换

采用CJsonObject处理中文时,直接显示为乱码,转为以下两个函数,可以解决。std::string string_To_UTF8(const std::string& str){ int nwLen = ::MultiByteToWideChar(CP_ACP, 0, str.c_str(), -1, NULL, 0); wchar_t* pwBuf = new wchar_t[nwLen + 1]; //一定要加1，不然会出现尾巴 ZeroMemor.

2021-01-11 18:34:25 3716

原创 TIdHttp控件实现post提交

TStringStream * ms;char * lpBuf;TStringList * pParam;try{ //http路径 AnsiString g_Url= m_httpPath+"Basic/SJG/CheckLogin"; //接收返回值 ms = new TStringStream(""); //参数,json格式 pParam = new TStringList(); pParam->Add("{\"LoginName\":2012.

2021-01-11 16:34:09 777

原创 TADOQuery 关联两张表

TADOQuery 关联两张表,实现两张表联动(1)分别准备两组TADOQuery,TDataSource,TDataGrid控件,并关联,两个TADOQuery都要指定连接数据库字符串(2)将第一组作为主表,第二组SQL属性为:select T.BangDanLiuShuiHao,C.ChePaiHaofrom CheLiangInf C,TotalRecord T where C.ChePaiHao = :ChePaiHao(3)两张表都有相同的字段,如ChePaiHao,第一组将自动为参数赋

2020-10-20 11:29:07 209

原创 TStringList的使用方法

TStringList * p = new TStringList(); p->Add("a=hello");//以key和value形式添加字符串,用=分隔 ShowMessage(p->Names[0]);//以索引的形式获取key值 ShowMessage(p->Values["a"]);//以key的形式,获取对应的value值 delete p;...

2020-10-19 15:28:40 488

原创委托调用线程

//创建一个委托static Action test1 = delegate () { Console.WriteLine("委托调用线程");};static void Main(string[] args){ test1.BeginInvoke(null, null); Console.ReadKey();}

2020-10-18 14:05:27 104

原创 _beginthead函数创建线程

//---------------------------------------------------------------------------#include <vcl.h>#include <stdio.h>#include <errno.h>#include <stddef.h> /* _threadid variable */#include <process.h> /* _beginthread, _e.

2020-10-10 10:47:05 217

原创 C++builder调用CnActiveScript脚本组件

在cnPack中找到CnActiveScript的源码,在C++builder中调用//创建一个窗口工程,窗口头文件//---------------------------------------------------------------------------#ifndef mainUnitH#define mainUnitH//---------------------------------------------------------------------------#i

2020-09-26 18:07:24 155

原创 C# 一般处理程序异步编程

using System;using System.Collections.Generic;using System.Linq;using System.Web;using System.IO;using System.Web.SessionState;using System.Threading.Tasks;using System.Data.SqlClient;using DAL.SQLHelper;namespace JZAppServer.Handler{ /// &.

2020-09-18 15:07:49 815

原创 C++Builder参数化查询

SQL参数化查询,即在SQL查询字符串中使用变量,在C++Builder中方法如下:AnsiString strSql2 = "select * from LoginUser where StationID = :a\ and UserID= :b and UserPwd= :c "; m_pAdo->Active = false; m_pAdo->SQL->Clear(); m_pAdo->SQL-&gt.

2020-07-09 18:30:19 423

原创获取TListView选中行的内容

通过鼠标点击获取TListView选中的内容，用的是OnClicked事件，不是OnChange事件，代码如下： TPoint p; GetCursorPos(&p); p = lvLoginUser->ScreenToClient(p); TListItem * pItem = lvLoginUser->GetItemAt(p.x, p.y); if(pItem == NULL)return; m_nID = atoi(pI.

2020-07-02 18:25:24 687

原创 BCB类中的索引属性

类的实例用[]来取值，也就是类实现了索引功能。有两种方法，一种是用关键字__property；另一种是重载[]。如下：class TestInfo{ private: int m_nData[100]; protected: //第一个参数为索引,第二个参数为值 void SetData(int index,int value) { m_nData[index] = value; } .

2020-07-01 18:45:15 207

换肤控件for bcb6

bcb6中,经测试可用

2022-06-16

vclskin皮肤浏览器

vclskin换肤控件的皮肤浏览器,可以查看换肤后的效果

2021-02-20

包含窗体DLL.zip

C++builder6实现在DLL中包含窗口,且此窗口可作为主窗口的一部分显示

2021-01-20

C++builder创建bpl库,并调用

在C++builder中创建BPL库，封装类和共享变量，并给出调用方法

2019-09-12

无边框窗口加阴影

基于VCL的无边框窗口,加上阴影,可用于xp,win10,仅适用于c++builder开发工具

2019-04-07

C++Builder高级界面特效制作百例

C++Builder高级界面特效制作百例pdf,列举了很多编程技巧,不管是初学者,还是老鸟都可以看看,作为工具书使用

2019-03-18

在C++Builder6中编译MFC类

在C++builder6中编译MFC类库，可以实现VCL和MFC类混用，请参考文档和工程.

2017-06-26

VB稳定的多线程

这是一个新的突破,无须tlb,tls,pcode,activex exe,rpc...的VB安全稳定的多线程

2017-05-27

在C++builder中嵌入谷歌浏览器

在BCB程序中嵌入谷歌浏览器，使用的是DCEF3库和控件

2017-05-27

gif动画播放DLL2.0

基于VCL开发，封装多线程和+GDI函数，CPU占用率下。新版本去掉了BCB运行库。仅能用于BCB和Delphi开发工具

2016-09-23

仿360风格按钮DLL插件

仿360按钮，封装成DLL插件，共C++builder和delphi调用

2016-09-17

gif for c++builder

用于BCB和delphi的Gif函数库,采用多线程实现，减少CPU占用。

2016-09-10

C++builder gif动画函数库

VCL多线程+GDI+处理gif动画。封装成dll插件调用。

2016-09-10

DLL封装的gif动画控件

用DLL封装的VCL动画控件，采用多线程+GDI+处理GIF动画，CPU占用较低。仅能被delphi和C++builder调用

2016-09-05

Gif动画播放DLL

用DLL封装的VCL动画控件，采用多线程+GDI+处理GIF动画，CPU占用较低。仅能被delphi和C++builder调用

2016-09-05

仿360按钮功能类

仿360功能按钮类，支持c++builder，由GDI+绘制界面，目前实现点击事件，其他事件和功能，可自行扩充。使用方法见demo代码。

2015-10-20

C++builder自定义消息框

自定义类，用GDI+绘图方式，实现消息对话框，目前可以实现确认，选择，两种功能。调用时，直接调用函数如： ShowMessageBox(this,"请选择您的设备型号","设备型号","icon.png"); 注意，不是系统的ShowMessage函数！！！具体使用见demo代码，支持bcb6开发。可自行扩展其他功能。

2015-10-20