Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.11.11;
Скачать: [xml.tar.bz2];

Вниз

Как ввести в поток данные с визуальных компонентов   Найти похожие ветки 

 
Yuraz   (2002-10-31 10:17) [0]

мне надо, чтобы поток работал до тех пор, пока не пройдёт все строки например FileListBox"а, т.е. в цикл, перед тем как запустить Execute надо передать массив файлов, и сколько их всего, чтобы потом не обращатся из потока к компоненту. Как это сделать проще?
Элементы типа таких: DirectoryListBox, FileListBox, Memo, и др.


procedure TMyThread.Execute;
begin
{Если Вы хотите, чтобы процедура DoWork выполнялась лишь один раз - удалите цикл while}
while not Terminated do
Synchronize(DoWork);
end;

procedure TMyThread.DoWork;
begin
{Здесь можно уже выполнять те задачи, которые должны быть исполнены процессом}
end;


 
Alex4444444444   (2002-10-31 10:48) [1]

Izvinite, no, po moemu, nemnozhko glupovato delat" OSNOVNUYU rabotu v Synchronize. Zachem zhe togda thread? Nuzhno vnutry Synchronize (ili voobshe do Resume) schitat" dannye is VCL, potom sdelat" raboty, potom vnutry Synchronize obnovit" VCL componenty.



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

Форум: "Основная";
Текущий архив: 2002.11.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.008 c
1-34095
Alex
2002-10-31 13:22
2002.11.11
Внутренний код клавиши пробел


1-34051
Linder
2002-10-30 18:13
2002.11.11
TPageControl


1-34024
Ghost!
2002-10-30 16:50
2002.11.11
нижняя Random граница


14-34194
Anatoly Podgoretsky
2002-10-22 00:45
2002.11.11
Именинники 22 октября


14-34228
Anatoly Podgoretsky
2002-10-23 07:59
2002.11.11
Программист это раса или национальность или это отдельный вид





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский