Вниз
Скачать: CL | DM;

считывание файлов в несколько потоков   Найти похожие ветки 

← →
s_ilnar ©   (2005-01-26 11:32) [0]

обьясните пжлста как можно считывать сразу 3-5 файлов
и загонять чать содержимыш скажем с StringGrid

В потоках я не разбираюсь если можно то с кодом

Заранее блогадарен


← →
ShimON ©   (2005-01-26 11:41) [1]

Простейший пример потока.


type
   TConnectThread = class(TThread)
   private
     BProverka: boolean;

   protected
     procedure Execute; override;
     procedure RefreshIcon;

   public
     property Proverka: boolean read BProverka write BProverka;
   end;

procedure TConnectThread.Execute;
begin
 If BProverka then
   Form1.Edit1.Text:= "Yes!!!";
 Synchronize(RefreshIcon);
end;


Прости, что не про файлы, но если умеешь работать с файлами то поймешь как применить


← →
begin...end ©   (2005-01-26 11:47) [2]

> [1] ShimON ©   (26.01.05 11:41)

Неправильный пример потока. Небезопасный.


← →
ShimON ©   (2005-01-26 11:49) [3]

Объясни пожалуйста...


← →
Miralex ©   (2005-01-26 11:52) [4]

while not Terminated do
begin
{ Place thread code here }
end;


← →
begin...end ©   (2005-01-26 11:55) [5]

> [3] ShimON ©   (26.01.05 11:49)

Нельзя обращаться к VCL-компонентам (Form1.Edit1.Text:= "Yes!!!") в методе Execute. Можно обращаться только в процедуре, используемой для синхронизации. В данном случае такой процедурой является RefreshIcon.


← →
ShimON ©   (2005-01-26 11:57) [6]

Но если у меня есть собственный невизуальный компанент, то можно????


← →
begin...end ©   (2005-01-26 12:03) [7]

> [6] ShimON ©   (26.01.05 11:57)

A Form1 - это Ваш собственный невизуальный компонент?

См. в справке: threads -> VCL/CLX objects.


← →
ShimON ©   (2005-01-26 12:07) [8]

Нет, конечно, это я для примера написал, у меня в экзекуте используется так: ConnEct.OpenUrl(...). Так можно??



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
4-1103546335
grigory
2004-12-20 15:38
2005.02.06
Поиск файла в директории!


1-1106220131
BVV
2005-01-20 14:22
2005.02.06
Атрибуты


3-1104826284
sergg
2005-01-04 11:11
2005.02.06
Очистка таблицы ACCESS 2000


1-1106230840
Алексей
2005-01-20 17:20
2005.02.06
Работа со строками


14-1106127463
syte_ser78
2005-01-19 12:37
2005.02.06
Обьясните о правильном завершении работы с БД




   Наверх