為什麼我新建了一個線程後運行時就會報錯(10分)

constructor TXbarRCountThread.Create(CreateSuspended: Boolean);
begin
inherited Create(CreateSuspended);
hCloseEvent := CreateEvent(nil,True,False,nil);

在建立時報錯