100分求教 多线程序数据共享问题

Question

我在程序里开了7个线程,一个线程读数据库数据,然后轮流发给各个线程序,请问怎么实现,分不够还可以再加for i := 0 to Query.RecordCount - 1 do
begin
  for j := 0 to ThreadCount - 1 do
  begin
    发数据到各个线程
    query.next
  end;
end;

Answer 1

去看看进程通信方面的资料,csdn上应该比较多。帮你顶

Answer 2

欢迎大家加入DELPHI程序员群1805366，一起进步！

Answer 3

可以使用共享内存区保存数据
然后通过 PostThreadMessage 来通知数据更新

Answer 4

我觉得可能为那7个线程各自配一个TList对象，你读取记录后就放到这些List中就可以了。当然要注意使用
TCriticalSection

Answer 5

jinhaiwu(※※※※※※※※※※)  请问怎么实现呢?

Answer 6

to qrlvls(空 气) 请问有例子吗?

Answer 7

to flexitime(我喜欢写程序) 可以发个例子到