📄 timeset.~cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <Winsock2.h>
#include "TypeDefine.h"
#include "CommandID.h"
#include "TimeSet.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
#pragma pack(1)
TForm6 *Form6;
extern ClientIDInfo CliIDInfo[512];
//---------------------------------------------------------------------------
__fastcall TForm6::TForm6(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm6::BitBtn1Click(TObject *Sender)
{
SOCKET ServerSocket;
WSADATA wsaData;
int iErrorCode;
struct sockaddr_in Server_IP_Addr,Client_IP_Addr;
ReqSetDateTime TimeData;
if (WSAStartup(MAKEWORD(2,1),&wsaData)) //调用Windows Sockets DLL
{
ShowMessage(AnsiString("设置时间网络初始化失败!\n"));
WSACleanup();
}
else
{
}
TimeData.head.reqType = SET_DATE_TIME_CMMD_ID;
TimeData.head.hilength = 0;
TimeData.head.length= sizeof(ReqSetDateTime);
TimeData.year = ComboBox1->Text.ToInt();
TimeData.month = ComboBox2->Text.ToInt();
TimeData.day = ComboBox4->Text.ToInt();
TimeData.hour = ComboBox3->Text.ToInt();
TimeData.minute = ComboBox5->Text.ToInt();
TimeData.second = ComboBox6->Text.ToInt();
TimeData.head.cid = CliIDInfo[ClientSelectNum].CliID;;
Client_IP_Addr.sin_family = AF_INET;
Client_IP_Addr.sin_port=htons(CLIENT_RECV_SIGNAL_PORT); //监听端口
Client_IP_Addr.sin_addr.s_addr = CliIDInfo[ClientSelectNum].ClientIP;
Server_IP_Addr.sin_family = AF_INET;
Server_IP_Addr.sin_port=htons(CLIENT_RECV_TIME_SET_PORT); //监听端口
//Server_IP_Addr.sin_addr.s_addr=inet_addr("192.168.1.6"); ///本机
Server_IP_Addr.sin_addr.s_addr = htonl(INADDR_ANY);
ServerSocket = socket(AF_INET, SOCK_DGRAM, 0);
sendto(ServerSocket, (char *)&TimeData, sizeof(ReqSetDateTime), 0,(struct sockaddr *)&Client_IP_Addr,sizeof(struct sockaddr));
ShowMessage(sizeof(ReqSetDateTime));
ShowMessage(Client_IP_Addr.sin_addr.s_addr);
closesocket(ServerSocket);
}
//---------------------------------------------------------------------------
void __fastcall TForm6::BitBtn2Click(TObject *Sender)
{
Form6->Close();
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -