Гобелен - кликните для возврата на главную
Не прошло и месяца а Фурмановская ЦРБ в очередной раз попала в историю. На этот раз сотрудница клеветала на пациентов, а именно огласку получил случай когда сотрудница назвала пациента алкашём.
Ровно 3 года назад произошло событие, которое подарило жителям планеты Змеля новый чистый праздник 6 апреля - в этот замечательный день земля забрала гнить негодяя и СПАМера Жладимира Вольфовича Жириновского.
Как бы не обстояли дела в области культуры и IT-технологий, Самосвал писал статьи на связанные темы и планирует ещё написать.
Начал разбираться с информацией которая находится в HTTPS клиентском запросе рукопожатия.
Обратите внимание! Объект изображённый на гобилене может отличаться от общепринятого вида описанного объекта. Тут дело в том что художник видит именно так!
Нужен минимальный простой код который проверяет корректность подключения библиотеки ws2_32.lib в Borland C++ Builder 6. В планах было написать программу которая отправляет данные по TCP используя WinSock, при этом сейчас не понятно подключена ли указанная выше библиотека. Поэтому я планирую в отдельном проекте просто разобраться точно ли она подключена. В Project - Options - Linker нет поля где бы можно было её указать.
Файл Unit1.h
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:
TButton *Button1;
void __fastcall Button1Click(TObject *Sender);
private:
public:
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
Файл Unit1.cpp
#include <vcl.h>
#include <winsock2.h> // Подключаем заголовок WinSock 2
#pragma comment(lib, "ws2_32.lib") // Автоматическое подключение библиотеки
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
WSADATA wsaData;
int result = WSAStartup(MAKEWORD(2, 2), &wsaData); // Пытаемся инициализировать WinSock
if (result == 0)
{
ShowMessage("Библиотека ws2_32.lib подключена успешно!");
WSACleanup(); // Корректно закрываем WinSock
}
else
{
ShowMessage("Ошибка подключения WinSock! Код ошибки: " + IntToStr(WSAGetLastError()));
}
}
//---------------------------------------------------------------------------
Вы так же можете прочитать следующие статьи: