在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中新增匿名線程。
