Delphi多线程有用吗？

[YuYo]

在Delphi中使用多线程，创建一个线程后它的占用Cpu率很高都是100%
如何是好？它自带的例子如下：
procedure TMyClientThread.Execute;

var
TheStream: TWinSocketStream;
buffer: string;
begin
{ create a TWinSocketStream for reading and writing }
TheStream := TWinSocketStream.Create(ClientSocket1.Socket, 60000);
try
{ fetch and process commands until the connection or thread is terminated }
while (not Terminated) and (ClientSocket1.Active) do
begin
try
GetNextRequest(buffer); { GetNextRequest must be a thread-safe method }

{ write the request to the server }
TheStream.Write(buffer, Length(buffer) + 1);
{ continue the communication (eg read a response from the server) }
...
except
if not(ExceptObject is EAbort) then
Synchronize(HandleThreadException); { you must write HandleThreadException }
end;
end;
finally
TheStream.Free;
end;
end;

[liangjiang]

找一本操作系統的書看看

[njhhack]

kkk

[Larky]

线程需要有阻塞条件的，如果线程里是一个死循环的话占用CPU肯定是100％
多线程是很有用的！

[51Passion]

你如果一直没用过多线程，或者觉得多线程用处不大，那你肯定没做过值得一用的程序

[YuYo]

在写Excute时，如上所写进入循环后Cpu占用率100%，怎么解决呢？

[我不懂电脑]

降低线程优先级

[zhuxiaojun]

我沉得zhuxiaojun(delphi高插)　应得20分

[dana]

线程主要用于长时间的计算,为使程序不让用户等待可采用线程.
其它的操作就没多大的用处,线程要合理使用,不能滥用.

[安优小青和他的程序生活]

没用，你别用了
要不你用delphi6看看如何

[Babylon5]

怎么会没用?关键是怎么用。
多线程写数据库？多线程winsock通信？多线程界面处理？...
ok! no problem.

我一直用它，线程, 用起来挺好的。:)

[zhuxiaojun]

当然有用， 我打个比方，你现在需要查询一个数据库中的数据，但这个数据库中的数据非常宠大，哪你必须做一个进度条，让客户知道计算机工作进程。要想知道进程的详细，先给点分再说。