delphi怎么新增匿名线程

在Delphi中，可以使用TThread类来创建和控制线程。要创建匿名线程，可以使用匿名方法来定义线程的执行代码。

以下是一个示例代码，演示如何在Delphi中新增匿名线程：

procedure TForm1.Button1Click(Sender: TObject);
var
  Thread: TThread;
begin
  Thread := TThread.CreateAnonymousThread(
    procedure
    begin
      // 在这里编写线程的执行代码
      // 可以在这里访问UI组件，但需要使用Synchronize或Queue方法进行线程同步
    end
  );
  Thread.Start;
end;

在示例代码中，使用TThread的CreateAnonymousThread方法创建了一个匿名线程。匿名方法定义了线程的执行代码。

你可以在匿名方法中编写线程的执行代码。请注意，在匿名方法中访问UI组件时，需要使用Synchronize或Queue方法进行线程同步，以避免多线程访问UI组件导致的问题。

最后，调用线程的Start方法启动线程。

这样就实现了在Delphi中新增匿名线程。