Поток на WIN API

// создание потока
void TObj::Run(DWORD bytes, void (*pfun)(BYTE *, DWORD))
{
    TParam param1;
    param1.bytes = bytes;
    param1.pf = pfun;
 
    DWORD dwThreadId;
    hThread = CreateThread(NULL,   // атрибут защиты по умолчанию
                                  0,      // память под поток выделяется компоновщиком
                                  ThreadFunction, // адрес функции потока
                                  (PVOID)&param1, // параметры передаваемыме функции потока
                                  0,      // тип запуска потока
                                             // 0 - поток начинается немедленно
                                             // CREATE_SUSPENDED - система создает поток, инициализирует его и приостанавливает
                                  &dwThreadId);   // адрес переменной кода возврата потока
}
//---------------------------------------------------------------------------
// функция потока
DWORD WINAPI ThreadFunction(PVOID pvParam)
{
    TParam *param2;
    param2 = (TParam *)pvParam;
    DWORD n = param2->bytes;
 
    BYTE test;
    BYTE *buf = new BYTE[n];
        for (DWORD i = 0; i < n; i++) {
            test = random(256);
            buf[i] = test;
        }
        param2->pf(buf, n);
    delete [] buf;
    return 0;
}
//---------------------------------------------------------------------------