IsMultiThread
Adam Boduch
IsMultiThread
Moduł: System
Przykładowa aplikacja:
program Bar;
{$APPTYPE CONSOLE}
uses Classes;
type
TMyFoo = class(TThread)
end;
var
Foo : TMyFoo;
begin
Foo := TMyFoo.Create(True);
if IsMultiThread then
Writeln('Tak, aplikacja uruchamia wątki...');
Foo.Free;
Readln;
end.
Po uruchomieniu aplikacji, na ekranie konsoli wyświetlony zostanie tekst: Tak, aplikacja uruchamia wątki...
Zobacz też: