Разработка многопоточных приложений. Рудалев В.Г - 4 стр.

       2. С о здан ие п о то ко в средствам и API

       И сп ользование б иб лиотекиAPI Win32 – наиб олее мощ ны й иуниверсаль-
ны й сп особ раб оты сп отоками наб ольш инстве язы ков п рог раммирования [6].
И мею щ иеся в Delphi сп ециализированны е классы являю тся надстройкой над со-
ответствую щ имиф ункциямиAPI.
       П оток создается сп омощ ью ф ункцииAPI, возвращ аю щ ей дескрип тор п о-
тока

       function CreateThread (
         Attr: Pointer;        // Адрес атрибутов безопасности
         Stack: Dword;           // Размер стека для потока
         Start: Pointer;         // Начальный адрес потока
         par: pointer;           // Аргументы потока
         flag: Dword;            // флаг создания
         var ID: Dword // Возвращаемый идентификатор потока
       ): THandle;     // Результат функции – дескриптор потока

        П араметр Attr об ы чно задается равны м Nil, что соответствуетатриб утам
б езоп асностип о умолчанию (б олееп одроб но см. раздел Win32 Programmer’s Ref-
erence в сп равочной системеDelphi).
        П араметр Stack задаетразмер стекадля п отока. Е слион равен нулю , то
размер стекасовп адаетсразмером стекаос       новног о п отокап рилож ения.
        П араметр Start – основной. Ч ерезнег о п ередается адресф ункции, вы зы -
ваемой п ри зап уске п отока. Э та ф ункция об язана возвращ ать результат тип а
longint, иметь один п араметр тип аPointer. П риоп исанииф ункциинеоб ходимо
указы вать атриб утstdcall (см.листинг ), оп ределяю щ ий стандартны й для API сп о-
соб вы зоваф ункции(зап ись арг ументов в с    тек в п орядке сп рава-налево, очистка
стекап ризаверш ениираб оты самой п одп рог раммой).
        П араметр Par – указатель наструктуру (зап ись), содерж ащ ую арг ументы ,
п ередаваемы ев п роцедуру п отока. Е слиPar=Nil, то арг ументы отсутствую т.
        Е сли задать ф лаг с оздания flag, равны й нулю , то п оток сразу начнетраб о-
ту, аеслиуказать константу CREATE_SUSPENSED, то п оток начнетраб оту толь-
ко п ослевы зоваф ункции

       function ResumeThread (hThread: THandle): Dword;

       Здесь hThread – дескрип тор созданног о п отока.
       П риостановить п оток мож но сп омощ ью ф ункции

       function SuspendThread (hThread: THandle): Dword;

       Ч тоб ы досрочно заверш ить п оток, следуетвы звать ф ункцию Suspend-
Thread , азатем - ф ункцию

       function CloseHandle(hThread: THandle): Dword;

4