sailorcgh-优快云博客

原创往SQL Server中存入word文档,然后用bcb把它读出

存入 TStream *nrStream; m_adoTable->Edit(); nrStream->LoadFromFile(strFromPath); tmpField = (TBlobField *)m_adoTable->FieldByName("StwordCon"); tmpField->LoadFromStream(nrStream);

2012-04-28 15:36:47 362

原创 DBGrid多行选择

DBGrid多行选择(1)属性设置Options ->dgMulitSelect 设置为 true(2)void __fastcall TForm1::Button1Click(TObject *Sender){ if (DBGrid1->SelectedRows->Count > 0) { AnsiString s = ""; TDataSet

2012-04-28 15:35:57 526

原创 ftp查找文件

ftp查找文件怎样实现在一个ftp服务器的特定目录下查找一个指定的文件是否存在？ #include #include #include #include // compile for release with // cl /MT

2012-04-28 15:35:03 1214

原创关于播放列表的循环

用Tstringlist记录播放列表，用一个整形变量储存位置，每播放一首就INC(位置)，当位置>Tstringlist.count时位置=0，其实这种方法很容易想到，我在初学的时候已经会用这种方法。 delphi_zm2001-9-9 12:45:00先定义notify事件，在notify事件判断媒体状态为播放完毕。 procedure TForm1.MediaPlaye

2012-04-28 15:30:06 410

转载 c++ builder:如何转换全角字符到半角字符？

我们知道，在windows中，中文和全角字符都占两个字节，并且使用了ASCII　Chart 2 (codes 128–255)。我们可以凭这一点来一个个检测用户输入的是否是中文和全角字符。实际上，全角字符的第一个字节总是被置为163，而第二个字节则是相同半角字符码加上128（不包括空格）。如半角A为65，则全角A则是163（第一个字节）、193（第二个字节，128+65）。而对于中文来讲，

2012-04-28 15:28:29 474

转载 Chart 图表一例

Chart 图表一例　　Chart组件的例子很少，让一些使用者用起来找不到头绪，现把我以前看过的一个比较好的例子拿出来与大家共同学习。程序代码如下：//---------------------------------------------------------------------------#include #pragma hdrstop#include "Te

2012-04-28 15:25:43 335

原创大小写转换

#include #include const char mnUnit[3]={"点\0"};const char OtherWords[2][3]={"整\0","负\0"};const char hzUnit[8][3]={"拾\0","佰\0","仟\0","万\0","拾\0","佰\0","仟\0","亿\0"};const char hzNum[10][3]={"零

2012-04-25 10:27:32 313

转载利用C++Builder自定义Windows窗体“系统菜单”

安徽合肥智能机械研究所张建军在开发Windows应用程序时，软件人员希望所编制的程序具有风格独特的用户界面,为此不惜采用一些占用系统内存资源颇多的第三方OCX控件，结果导致程序运行速度变慢或者打包后的安装程序体积太大的缺点。其实，如果我们仔细研究一下Windows提供的几百个WinAPI，就不难发现，通过直接调用API函数，发送、接收或者拦截系统消息等方法，同样可以实现在某些情况下只

2012-04-25 10:27:09 845

原创窗口最大化、最小化及关闭的消息

窗口最大化、最小化及关闭的消息是什么编号：QA002502建立日期: 2000年1月29日最后修改日期：2001年8月9日所属类别： C/C++ - 窗体与菜单borui: 编程工具: c++builder 操作系统: windows98 窗口最大化、最小化及关闭的消息是什么？如何截获？回答: 最大化、最小化将发送WM_

2012-04-25 10:26:44 629

转载如何捕获VCL没有处理的Windows消息

如何捕获VCL没有处理的Windows消息--- C++ Builer的VCL提供了对大多数Windows消息的处理机制，这对于一般应用程序是足够了，但VCL也不是无所不包的，对于那些VCL没有处理的Windows消息，在需要时如何进行捕获呢？C++ Builder采用了消息映像表机制，通过消息映像表将特定的Windows消息与代码中的函数联系起来，当窗口捕获到消息时就会调用这个函数，这其实和

2012-04-25 10:26:16 314

原创 DBGrid,StringGrid设置列宽行距

StringGrid1->ColCount=5; StringGrid1->RowCount=17; StringGrid1->Row = 0; StringGrid1->Col = 0; StringGrid1->Cells[0][0] = "通道号"; StringGrid1->Col = 1; StringGrid1->Cells[1][0]

2012-04-25 10:24:51 760

原创利用API函数实现隐藏和显示桌面图标

利用API函数实现隐藏和显示桌面图标源代码如下： Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Declare Function ShowWin

2012-04-25 10:24:05 580

转载利用C++Builder 中OLE自动化功能实现调用Word进行报表制作

利用C++Builder 中OLE自动化功能实现调用Word进行报表制作一、概述　　在我们利用C++Builder进行报表设计和打印处理时，我们往往是用C++Builder自己所提供的QReport组件页中的组件进行报表的设计和输出。但这样输出的表格都是事先设计好，并且不容易修改的表格，在系统移植后和需要对表格进行修改时就显得非常麻烦。那么，有什么好的解决方法来实现既可以自动生成报表，同时

2012-04-25 10:22:24 490

转载用C＋＋Builder实现Word 97自动化

用C＋＋Builder实现Word 97自动化江西南昌华东交大控制信息工程研究所(330013)刘遵雄 ----要在应用程序中控制Word 97的运行，首先必须在编制自动化客户程序时使其头文件中包含文件ComObj.hpp，写入＃include。编程工具C＋＋Builder的开发者把调用Word 97自动化对象的功能大致包装成了几个Ole object class函数，应用程序设计人

2012-04-25 10:21:57 328

转载 Borland C++ Builder输入法的自动切换

摘要本文介绍了在C++ Builder中自动切换输入法的实现。就其原理和方法进行论述，并给出了一个简化的实例。　　关键字界面，切换技术，C++　　Auto-switch input method in Borland C++ Builder　　 Deng Shigang Zu0 Xiaohui　　 Computer Science Department ,Xuzhou Nor

2012-04-25 10:21:09 1175

原创如何在C++ Builder程序中运行数据库Sql脚本，建Sql Server 2000数据库。

如何在C++ Builder程序中运行数据库Sql脚本，建Sql Server 2000数据库。 ADOQuery->SQL->LoadFromFile(Your SQL File); 1.先创建数据库，数据库中脚本如下：use master create database YourDataBaseName2.就可以由导出的脚本创建表，脚本如下：use YourDataBa

2012-04-24 16:03:27 644

原创 BCB5里如何让程序暂停几秒

BCB5里如何让程序暂停几秒1.void __fastcall TForm1::Button1Click(TObject *Sender) { ::Sleep(5000); ShowMessage("lvjack wake up"); } 2.可以这样 WINAPI WinMain(

2012-04-24 16:02:57 393

原创遍历文件夹取文件名

遍历文件夹取文件名#include "stdio.h"#include AnsiString s_filename[100];int i=1;TSearchRec sr;AnsiString sAppPath; sAppPath=ExtractFilePath(Application->ExeName); sAppPath=sAppPat

2012-04-24 14:58:28 228

原创 ADO动态创建数据库

ADO动态创建数据库#include Variant CreateAccess ; //通过建立ADOX(Microsoft ActiveX(R) Data Objects Extensions)对象进行访问 CreateAccess=CreateOleObject("ADOX.Catal

2012-04-24 14:58:04 499

转载 word 宏代码编写的问题

word 宏代码编写的问题：关于 .Find.Execute replace:=wdReplaceOne ，我在cb写了：Find.OleFunction("Execute", "replace:=wdReplaceOn楼主zjsxszj（沈智江）2003-11-20 15:47:07 在 C++ Builder / 基础类提问Sub replace()

2012-04-24 14:56:06 348

原创用OLE直接替换WORD中指定字符串怎么办?

用OLE直接替换WORD中指定字符串怎么办?#include enum TWordReplaceFlag {wrfReplaceAll, wrfMatchCase, wrfMatchWildcards}; typedef Set TWordReplaceFlags; bool Word_String

2012-04-24 14:55:14 347

原创目录下搜索文件

[code=C/C++][/code]#include "Unit1.h"//---------------------------------------------------------------------------#pragma package(smart_init)#pragma resource "*.dfm"TForm1 *Form1;//-------

2012-04-24 14:54:26 253

原创获取汉字的拼音索引

获取汉字的拼音索引C/C++ code //---------------------------------------------------------------------------bool __fastcall In(int LowPosition, int HighPosition,int Value){ return ((Value=LowPosition))

2012-04-24 14:53:39 280

原创采用二个 TStringList ，一个是尚待查找的文件夹列表，另一个是找到的文件列表

我都是采用二个 TStringList ，一个是尚待查找的文件夹列表，另一个是找到的文件列表然后采用线程或循环查找。void __fastcall BrowDir(TStrings * path /* in */,TStrings *file /* out */) { TSearchRec sr; while (path->Count) {

2012-04-24 14:52:47 278