端口扫描程序（C++语言）

//--------------------------------------------------------------------------- // Finishing CodeFans.net #include <vcl.h> #pragma hdrstop #include "uMain.h" #include "uGetAllList.h" #include "uAbout.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TfrmMain *frmMain; //--------------------------------------------------------------------------- __fastcall TfrmMain::TfrmMain(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TfrmMain::FormCreate(TObject *Sender) { WSADATA wsaData; WORD wVersion = MAKEWORD(2, 2); if(WSAStartup(wVersion, &wsaData)) { MessageBox(Application->Handle, "启动WinSock失败", Application->Title.c_str(), MB_OK | MB_ICONERROR); return; } } //--------------------------------------------------------------------------- void __fastcall TfrmMain::FormDestroy(TObject *Sender) { // 清除Socket WSACleanup(); // 释放获取TCP/UDP连接时所申请的内存 GlobalFree(pTcpTable); GlobalFree(pUdpTable); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::btnRefreshClick(TObject *Sender) { lvList->Items->Clear(); MyGetTcpTable(lvList); MyGetUdpTable(lvList); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::btnDeleteClick(TObject *Sender) { if(lvList->Selected) { if(MyDeleteConnection(lvList->ItemIndex)) btnRefreshClick(Sender); } else MessageBox(Handle, "请先选择一个连接然后再点击删除.", Application->Title.c_str(), MB_OK | MB_ICONINFORMATION); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::btnAboutClick(TObject *Sender) { frmAbout = new TfrmAbout(this); frmAbout->ShowModal(); delete frmAbout; } //---------------------------------------------------------------------------