|
|
 |
发送电子邮件 |
热 ★★★★ |
|
发送电子邮件 |
|
作者：闵涛 文章来源：闵涛的学习笔记 点击数：2826 更新时间：2009/4/23 18:35:31  |
|
|
关键字：任务条;发送电子邮件
怎样隐藏应用程序的任务条图标
首先，请看看这些术语。系统托盘是一个在任务条右角的小方框，在托盘了应用程序可以显示小图标 。任务条是可以在屏幕上伸展的工具栏。它就是程序图标所在的位置。想隐藏程序的任务条图标，你可以应用ShowWindow函数并传给它Application->Handle窗口句柄。
ShowWindow(Application->Handle, SW_HIDE);
若想让任务条图标再出现，只需将SW_HIDE改为SW_SHOW。
ShowWindow(Application->Handle, SW_SHOW);
注: 你可以设置主窗口的Visible属性为false来隐藏它。
注: 通过ShowWindow来隐藏窗口的任务条图标是不持久的。某些动作会使任务条图标重现。你可以将隐藏的应用程序窗口设为Tool Window来移走程序的任务条图标而避免它再次出现。Tool windows永远不会有任务条图标。 使应用程序窗口成为一个Tool Window有一个副作用：当用户按下Alt-TAB时它将不在程序列表中出现。你可以调用API函数GetWindowLong和SetWindowLong来使应用程序窗口成为一个Tool Window。
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) {
DWORD dwExStyle = GetWindowLong(Application->Handle, GWL_EXSTYLE); dwExStyle |= WS_EX_TOOLWINDOW; SetWindowLong(Application->Handle, GWL_EXSTYLE, dwExStyle);
try {
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
} catch (Exception &exception) {
Application->ShowException(&exception);
}
return 0;
}
注：程序启动后要隐藏主窗体，则可以在WinMain中添加如下代码：（Project->View Scource）
ShowWindow(Application->Handle,SW_HIDE);
Application->ShowMainForm=false;
当你想显示程序时执行下面这两行代码：（记住，如果代码定位在主窗口类的一个方法中，Application->MainForm->Visible=true可以用Visible=true 来代替。）
ShowWindow(Application->Handle, SW_SHOW);
Application->MainForm->Visible = true;
发送电子邮件
2000年第一期的《电脑报》刊登了题目为《自己动手编写电子邮件软件》的文章，文章讲述了如何用VB编写一个简单的电子邮件发送程序。其实，如果你是一个C＋＋Builder爱好者，完全可以更快、更简捷地编写出这类软件。请听我下文分解：
与E－mail密切相关的两个协议是POP3和SMTP，POP3是Post Protocol 3的缩写，用于从POP3服务器接收电子邮件，SMTP是Simple Mail Transfer Protocol的缩写，用于通过SMTP服务器发送电子邮件。这两个协议本身是很复杂的，但C＋＋Builder从NetManage公司引进了POP、SMTP控件，这样，我们完全可以不去管那些收发邮件的机理，只要设置好这些控件就可以编出一个C＋＋Builder的发送邮件程序了。下面介绍SMTP控件：
SMTP控件位于控件栏的Internet页面上，名称为：NMSMTP。SMTP的主要属性有：
Host属性，用来指定SMTP服务器的主机名。
Port属性，用于指定SMTP服务器的端口号，一般设为25。
UserId属性，登录SMTP服务器时用于设置用户名。
PostMessage属性，此属性非常重要，从以下它的内容你就可以看出来了：
FromName 用于指定发件人的名称。
FromAddress 用于指定发件人的e－mail地址。
LocalProgram 用于指定发件人所使用的邮件客户程序。
ToAddress 收件人的地址。
Body 邮件正文。
Subject 邮件主题。
SMTP控件的方法：
Connect函数，用于登录到SMTP服务器，使用此函数前，Host、Port、UserId等属性必须已设好。
Disconnect函数，用于断开与SMTP服务器的连接。
SendMail函数，用于向SMTP服务器发送邮件。知道了这些，我们就可以写程序了。
新建应用程序，将工程名保存为sendmail，在Form1上加入NMSMTP控件，Host属性添入SMTP服务器的名称，如：“smtp.yeah.net”,UserId属性添入你在此邮箱申请的用户名,其它属性保持默认值；加入4个Label控件，将其Caption分别设为：“发件人名称”、“收件人地址”、“邮件主题”和“邮件正文”；加入4个Edit控件，将其Name分别设为：“Name1”、“Address1”、“Subject1”和“Body1”；一个SpeedButton控件，Caption为：“发送”(以上属性均不含引号)，Click事件代码为：
NMSMTP1－>Connect();
NMSMTP1－>PostMessageA－>FromName=Name1－>Text;
NMSMTP1－>PostMessageA－>FromAddress=〃superlink@yeah.net〃;
NMSMTP1－>PostMessageA－>ToAddress－>Add(Address1－>Text);
NMSMTP1－>PostMessageA－>Subject=Subject1－>Text;
NMSMTP1－>PostMessageA－>Body－>Add(Body1－>Text);
NMSMTP1－>PostMessageA－>LocalProgram=〃SendMail〃;
NMSMTP1－>SendMail();
Application－>MessageBoxA(〃发送完成!〃,〃邮件系统〃,MB_OK);
NMSMTP1－>Disconnect();
完成！有人不禁要问：“就这么简单？”，的确就这么简单。不过，NMSMTP控件还有大量的功能没在此一一列出，同时还有NMPOP3控件可用来编写接收邮件的程序，如果喜爱C＋＋Builder的朋友感兴趣，完全可以写出象OutLook Express、FoxMail这样的电子邮件软件。
C++builder编程修改注册表的问题
RootKey是注册表的根键值，比如运行regedit后看到的HKEY_USERS,HKEY_LOCAL_MACHINE就是RootKey,在TRegIniFile中缺省的RootKey是HKEY_USERS.
下面的例子是TRegistry的，TRegIniFile也差不多
void __fastcall TfrmMainForm::WriteToMyRegistry(int table_count)
{
//TODO: Add your source code here
TRegistry *MyRegistry=new TRegistry;
MyRegistry->RootKey=HKEY_LOCAL_MACHINE; //改变缺省Rootkey
if(!MyRegistry->OpenKey("Software\\Microsoft\\Windows\\Current\Version\\Run",true)) { //打开主键
//这样双引号里面的东西就变成了CurrentKey
Application->MessageBox("注册表内容无效", "读取注册表出错",MB_ICONERROR);
MyRegistry->CloseKey();
delete MyRegistry;
return;
}
MyRegistry->WriteString("myrun","c:\\sthvcd\\sthvcd.exe");
MyRegistry->CloseKey();
delete MyRegistry;
}
怎样隐藏应用程序不让它出现在CTRL-ALT-DEL对话框中
把你的应用程序从CTRL-ALT-DEL对话框中隐藏的一个简单办法是去应用程序的标题。如果一个程序的主窗口没有标题，Windows不把它放到CTRL-ALT-DEL对话框中。清除标题属性的最好地方是在WinMain函数里。
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try{
Application->Title = "";
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
另一种方法是：调用RegisterServiceProcess API 函数将程序注册成为一个服务模式程序。 RegisterServiceProcess是一个在Kernel32.dll里相关但无正式文件的函数。在MS SDK头文件里没有该函数的原型说明，但在Borland import libraries for C++ Builder里能找到。很显然，这个函数的主要目的是创建一个服务模式程序。之所以说很显然，是因为MSDN里实质上对这个函数没有说什么。
下面的例子代码演示了在Windows95/98下怎样通过使用RegisterServiceProcess来把你的程序从CTRL-ALT-DEL对话框中隐藏起来。
//------------Header file------------------------------
typedef DWORD (__stdcall *pRegFunction)(DWORD, DWORD);
class TForm1 : public TForm
{
__published:
TButton *Button1;
private:
HINSTANCE hKernelLib;
pRegFunction RegisterServiceProcess;
public:
__fastcall TForm1(TComponent* Owner);
__fastcall ~TForm1();
};
//-----------CPP file------------------------------
#include "Unit1.h"
#define RSP_SIMPLE_SERVICE 1
#define RSP_UNREGISTER_SERVICE 0
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
hKernelLib = LoadLibrary("kernel32.dll");
if(hKernelLib){
RegisterServiceProcess =(pRegFunction)GetProcAddress(hKernelLib,"RegisterServiceProcess");
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),RSP_SIMPLE_SERVICE);
}
}
__fastcall TForm1::~TForm1()
{
if(hKernelLib){
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),RSP_UNREGISTER_SERVICE);
FreeLibrary(hKernelLib);
}
}
windows启动时运行程序
如果希望在windows启动时运行某个程序，可以通过向注册表中加信息来实现，下面就一个例子说明：
首先在源文件(cpp)中加#include <Registry.hpp>
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Tregistry *Reg;
Reg=new TRegistry();
Reg->RootKey=HKEY_LOCAL_MACHINE;
Reg->OpenKey("SOFTWARE\\MICROSOFT\\WINDOWS\\CURRENTVERSION\\RUN",FALSE);
Reg->WriteString("start","d:\\Oicq\\QQ.exe");
}
客户/服务器远程数据传输处理技巧
在实际的MIS系统中，远程数据库访问大多通过Modem连接，出于通信费用及速度方面的考虑，往往采用先将数据保存在本地，然后集中传送到远端的办法。远程数据传送可以有多种方案，最常见的是先将要传送的数据打包成文件，在利用文件传输形式传送到目的地，在目的地对数据恢复后添加到本地数据库中。这种方法普遍地应用于证券交易系统，其优点是速度快，并且可事先对数据压缩，更大限度地节约传送时间及费用。但这种方案也有其不足之处：由于利用文件传输机制，无法利用数据库本身的特性如完整性约束、数据一致性、回滚机制等，因此在比较复杂的数据库系统中较少采用。另一种方法是直接将两端处理成"客户/服务器"模式，将数据传送看成是向Server提交数据。由于这种方案充分利用了数据库服务器的特性，并且实际操作基本与局域网方式一致，因此本文将详细介绍这种方案。
由于传输速度的原因，当传送大量数据时绝对不赞成逐条记录地向服务器提交数据，而应批量地向Server提交，Delphi/CBuilder中提供了一个TBatchMove控件专门用于批量传送数据，利用它可极大减少网络负担，提高传送速度。遗憾的是，TBatchMove控件只提供了简单的错误控制功能，没有提供显示传送进度、用户终止传送等重要功能。然而TBatchMove所依赖的BDE却提供了一种"回调机制"可以完成上述两个功能。所谓"回调"过程是这样的：当BDE执行某种操作时，比如从一张表向另一张表拷贝大量数据的过程中，每过一段时间（如需要显示拷贝进度时），BDE会调用一段你自己写的函数（回调函数），以帮助你更完全地控制程序。这种做法有点想DLPHI中的Event（事件）及事件处理函数--某个具体的操作动作会让VCL触发某个事件，从而调用一段你写好的事件处理函数，不同的事件会触发不同的处理函数。
为了让BDE能正确地与你的函数协同工作，你必须事先"注册"你的函数，让BDE知道某个事件发生时应调用（回调）你的某段代码。BDE提供了一个DbiRegisterCallBack注册函数，不幸的是，BDE的联机帮助中的说明不能适合于Delphi/CBuilder，按照该说明编写的程序根本不能通过编译！笔者通过实践找到了正确使用BDE回调函数的方法，下面将详细介绍该机制的使用。BDE回调机制包含以下几个步骤：
1）按BDE的预定格式编写你的回调函数
2）调用DbiRegisterCallBack函数注册你的回调函数，这样当你执行相关数据库操作时就自然地触发你的回调函数。
3）执行相关数据库操作，比如BatchMove1->Exectue();
4）注销该回调函数
其中最关键的是正确注册你的回调函数，因此先介绍第二步。(注册与注销都调用同一函数，只是最后一个参数略有不同)
首先你应知道在哪类"事件"发生时调用你的回调函数，其次你应明白与该事件相关的参数及数据结构-----这一切都发生在调用DbiRegisterCallBack函数注册时，所以下面先介绍DbiRegisterCallBack的正确用法及说明：
在原BDE帮助中该函数的原形（C）是这样的
DBIResultDBIFNDbiRegisterCallBack(hCursor,ecbType,iClientData,iCbBufLen,pCbBuf,pfCb);
要使用该函数必须include头文件，问题是Delphi/CBuilder中根本没有提供该文件，取而代之的是"BDE.HPP"，但是在包含进该文件后程序仍然不能编译通过，因为该文件中没有DBIFN等的说明。一个简单的方法是在代码中去掉DBIFN。函数中各参数解释如下：hCursor是一个BDE中对象的句柄，如果这个参数为NULL，则表示注册的回调函数适合于所有BDE任务；第二个参数ecbType是指回调函数的触发条件的类别，有很多种类型可以选择，其中cbGENPROGRESS表示当需要显示一个长操作的进度时触发这个回调函数；第三个参数iClientData是传递给回调函数的某个数据结构的指针，在我们的例子中为NULL；第四个参数iCbBufLen是指回调Buffer的大小，该大小随第二个参数的不同而不同，比如sizeof(CBPROGRESSDesc)；第五个参数pCbBuf是回调Buffer的指针，该指针类型随第二个参数变化，比如cbGENPROGRESS的数据结构是CBPROGRESSDesc；最后一个参数是回调函数的地址指针，当该参数为NULL时表示注销该类型的回调函数。关于回调函数将在稍后详细介绍。下面是注册执行长操作时显示进度的回调函数的格式：
intrst=DbiRegisterCallBack(
NULL,//适合于任何进程
cbGENPROGRESS,//回调类型：显示长操作的进度
NULL,//没有数据
sizeof(CBPROGRESSDesc),//数据结构的大小
&aCBBuf,//数据的内存地址
ApiCallBackFun//回调函数的地址
);
接下来就应该完成第一步：编写回调函数
在C中，回调函数应如下声明：
CBRType__stdcallApiCallBackFun(
CBTypeecbType,//回调类型
intiClientData,//回调数据（指针）
void*pCbInfo//回调数据结构指针
)
第一个参数是回调类型；第二个参数是回调数据，其解释同DbiRegisterCallBack的第三个参数；第三个是回调数据的指针，该数据的结构随回调类型的不同而不同。比如进度指示cbGENPROGRESS的数据结构是CBPROGRESSDesc，其定义如下：
structCBPROGRESSDesc{
shortiPercentDone;//进度的百分比
charszMsg[128];//进度的文本信息
};
该结构的两个域同时只有一个起作用，第一个表示操作的进度百分比，当[1] [2] [3] [4] 下一页
没有相关教程
|
|
| 教程录入：mintao 责任编辑：mintao |
|
|
上一篇教程： 开发一个基于DCOM的局域网聊天室（三）
下一篇教程： 增强MIDAS的安全性 |
|
|
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
|
 注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] |
| 网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！） |
| |
|
|
|
|
|
 |
同类栏目 |
 |
|
赞助链接 |
|
|
500 - 内部服务器错误。
|
|
|
|
|
|
