在Delphi中，可以通過以下方法傳遞參數給線程：

1. 使用構造函數：可以在線程的構造函數中添加參數，然后在創建線程時傳遞參數。例如：

type
  TMyThread = class(TThread)
  private
    FParam: Integer;
  public
    constructor Create(Param: Integer);
    procedure Execute; override;
  end;

constructor TMyThread.Create(Param: Integer);
begin
  inherited Create(True);
  FParam := Param;
end;

procedure TMyThread.Execute;
begin
  // 使用 FParam 做一些操作
end;

// 創建線程并傳遞參數
var
  MyThread: TMyThread;
begin
  MyThread := TMyThread.Create(123);
  MyThread.Start;
end;

2. 使用屬性：可以在線程中添加一些公共屬性，然后在創建線程后設置屬性的值。例如：

type
  TMyThread = class(TThread)
  private
    FParam: Integer;
  public
    property Param: Integer read FParam write FParam;
    procedure Execute; override;
  end;

procedure TMyThread.Execute;
begin
  // 使用 Param 做一些操作
end;

// 創建線程并設置參數
var
  MyThread: TMyThread;
begin
  MyThread := TMyThread.Create(True);
  MyThread.Param := 123;
  MyThread.Start;
end;

這兩種方法都可以用來傳遞參數給線程，在線程的 Execute 方法中可以使用傳遞的參數進行操作。