Как вызвать CreateThread внутри Form?

Question

[mIka01]

Здраствуйте, у меня вопрос из за незнания языка программирования.
Не могу понять как вызвать функцию CreateThread внутри формы Form.
Вызываемая строчка выглядит так.

CreateThread(NULL, NULL, (LPTHREAD_START_ROUTINE)ClientHandler_second, NULL, NULL, NULL);

Cама функция выглядит так void ClientHandler_second() { ... }
Моё предположения, что я просто не там объявляю функцию.

Как я могу вызывать поток и объявлять функцию без ошибок?

Заранее благодарю.

Answer 1

[Mercury13]

Tony сказал правильно, но есть ещё одна вещь.
CreateThread использовать ЗАПРЕЩАЕТСЯ. Точнее, можно — но для этого нужно знать, что делаешь. А так для прикладного прогера правило — надо перевести библиотеку времени выполнения в многопоточный режим, и для этого вызвать аналог из этой самой библиотеки. В Си++ для этого используется функция beginthreadex(), в Delphi — BeginThread.

Answer 2

[none7]

Пример

#include <Windows.h>

DWORD WINAPI ThreadProc(LPVOID param); // строчка необходима, чтобы весь код выше реализации функции её видел
public ref class Form1 : System::Windows::Forms::Form {
    System::Windows::Forms::Button^ button1;
    System::Windows::Forms::Label^ label1;

    void InitializeComponent() {
        this->button1 = gcnew System::Windows::Forms::Button();
        this->label1 = gcnew  System::Windows::Forms::Label();
        this->SuspendLayout();

        this->button1->Location = System::Drawing::Point(205, 95);
        this->button1->Name = "button1";
        this->button1->Size = System::Drawing::Size(75, 23);
        this->button1->TabIndex = 0;
        this->button1->Text = "button1";
        this->button1->UseVisualStyleBackColor = true;

        this->label1->AutoSize = true;
        this->label1->Location = System::Drawing::Point(218, 153);
        this->label1->Name = "label1";
        this->label1->Size = System::Drawing::Size(44, 16);
        this->label1->TabIndex = 1;
        this->label1->Text = "label1";

        this->AutoScaleDimensions = System::Drawing::SizeF(8.0, 16.0);
        this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
        this->ClientSize = System::Drawing::Size(485, 292);
        this->Controls->Add(this->label1);
        this->Controls->Add(this->button1);
        this->FormBorderStyle = System::Windows::Forms::FormBorderStyle::FixedSingle;
        this->MaximizeBox = false;
        this->Name = "Form1";
        this->Text = "Form1";
        this->ResumeLayout(false);
        this->PerformLayout();
    }
public:
    static Form1^ myform;
    Form1() {
        InitializeComponent();
        myform = this;
        button1->Click += gcnew System::EventHandler(this, &Form1::button1_Click);
    }
    void SetLabel(System::Int32 i) {
        label1->Text = i.ToString();
    }
private:
    void button1_Click(System::Object^ sender, System::EventArgs^ e) {
        ::CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)ThreadProc, NULL, 0, NULL);
    }
};
DWORD WINAPI ThreadProc(LPVOID param) {
    for (int i = 1; i <= 5; i++) {
        ::Sleep(1000);
        // Invoke вызывает указанный метод в потоке окна. MS не обещает синхронизацию
        // потоков для gui-кода. Если не использовать данный метод, то в худшем случае приложение
        // упадёт внутри небезопасных библиотек
        // то есть никаких нормальных исключений не будет. Только хардкорный SEH.
        Form1::myform->Invoke(gcnew System::Action<System::Int32>(Form1::myform, &Form1::SetLabel), i);
    }
    return 0;
}
int main(array<System::String^>^ args) {
    System::Windows::Forms::Application::EnableVisualStyles();
    System::Windows::Forms::Application::SetCompatibleTextRenderingDefault(false);
    System::Windows::Forms::Application::Run(gcnew Form1());
    return 0;
}

Comments

[mIka01]

none7 ,У меня вылезает ошибка.

[none7]

mIka01, Вы этот код как то изменили?

[mIka01]

none7 , Вот у меня ваш пример так выглядит - https://dropmefiles.com/cRkxf

[none7]

У меня VS2022 и проект не собрался из за отсутствия в нём функции main, добавил её в MyForm.cpp. После добавления всё собралось. Так же добавил функционал из своего примера https://dropmefiles.com/Cww7N тут изменённые файлы и .exe.

[mIka01]

none7 Все заработало, сейчас буду интегрировать в свою лабу.
Большое спасибо за помощь.

Answer 3

[Tony]

https://docs.microsoft.com/en-us/previous-versions..."
Прототип функции потока выглядит так:
DWORD WINAPI ThreadProc( LPVOID lpParameter );

Comments

[mIka01]

А как в коде выгладить будет?

[Tony]

mIka01, замените ThreadProc в моём сообщении на имя вашей функции потока.

[mIka01]

У меня не срабатывает.
Вот пример. Выводить должно последовательно линии в PictureBox который я назвал My_Field.

[mIka01]

Или надо так ? Но это вызывает ошибку.

[Александр Ананьев]

mIka01, надо объявлять функцию MyThreadFunction вне класса или как дружественную функцию. Однако работать с UI из другого потока все равно не получится.

[mIka01]

Александр Ананьев, А какое из реализаций верное ?
Можете прописать что писать в кнопке и как вызывать функцию правильно. Или я не правильно понял и вообще потоком пользоваться не получится.?

[Евгений Шатунов]

mIka01, зачем ты размещаешь код в скриншотах?

[mIka01]

Я понял, исправлюсь.

[mIka01]

У меня все равно не получается.
Пример кода. (тестовый)

private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e) {

		CreateThread(NULL, NULL, (LPTHREAD_START_ROUTINE)MyThreadFunction, NULL, NULL, NULL);
		Sleep(100);
		hhh f;
		f.aaa = 10;
	}
	};


	DWORD WINAPI MyThreadFunction(LPVOID lpParam)
	{
		hhh f;
		f.aaa = 5;

		return 0;
	}

Пример класса.

#pragma once
ref class hhh
{
public:
	static int aaa;

};

[Александр Ананьев]

mIka01, покажи весь код

[mIka01]

Александр Ананьев, Это сложно будет сделать. Я вечером конечно могу на git залить, но если честно, то можешь лучшее свой пример.
P.s. Я пишу лабораторное задание с определённым т.з. В кратце мне нужно поток для считывания с скокета. Так как по т.з. сокет не может иметь модификации не виснуть пока не примет данные. Естественно он у меня виснет. Хочу решить проблему через поток.
P.p.s. Я еще делал для этой лабы. сервер где использовал потоки и они работали. Но приложение контрольное, а здесь аналогия не сработала.

[Александр Ананьев]

mIka01, сделайте минимально полный пример кода, в котором у вас не получается использовать CreateThread для того, чтобы понять в каком месте ошибка.