你是的计算代码是?不给出代码,很难知道怎么去执行你想要的结果哦.

你要计算什么东西？看不明白

线程

  while () do
  begin
   （数据计算……）

    if pause then
    begin
        while pause do
        begin
          Application.ProcessMessages;
        end;
    end;
  end;

这个可以吗？

主线程创建一个枚举变量，状态就3个。
eStart,ePause,eStop

在工作线程，每个循环都判断一下这个枚举变量的状态，根据状态，这个线程作出响应的反应。
while True do
    begin
    if 枚举变量＝开始 then
    else if 枚举变量＝暂停 then
    else if 枚举变量＝停止 then
    .....
        
    end;

建立一个线程对象
启动就是建立线程并开始运行
停止中断线程释放对象
暂停就是挂起线程