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

Вниз

Динамический массив, поток и High   Найти похожие ветки 

 
Zergling   (2002-12-02 11:23) [0]

Здраствуйте! Такая вот проблема!
В потоке прокручиваю элементы динамического массива. Если найден элемент массива отвечающего заданному условию то выполняется такоето действие. Проблема такая: Находя первый элемент массива отвечающему условию выполняется MyProcedure. Во время выполнения MyProcedure в динамический массив успевает добовлятся еще несколько элементов. Но фактически выполняется MyProcedure вызванная на первом элементе массива. Далее пргграмма идет в Destroy потока. Со статическим массивом ни каких проблем нет, но хотелось бы реализовать все это с помощью динамического массива (что бы программа была более гипкая в работе и не зависила жестко от количества элементов статического массива). Заранее всем благодарен!

Procedure TMyThread.Execute;
var I:Word;
Begin
I:=0;
while I<=High(A) do
Begin
if A[I]:="X" then MyProcedure;
Inc(I);
End;
End;

Procedure TMyThread.Destroy;
Begin
A:=Nil;
End;


 
FreeLancer   (2002-12-02 11:28) [1]

Читай Arrays, Dynamic Arrays. Нужно управлять размером Dynamic Array


 
VaS   (2002-12-02 12:20) [2]

TThreadList однозначно.



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

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

Наверх




Память: 0.44 MB
Время: 0.004 c
14-36393
Дмитрий Бердников
2002-11-21 13:20
2002.12.12
Работа...


1-36287
Snap
2002-12-01 12:08
2002.12.12
ListBox


1-36134
Manulo
2002-12-03 14:33
2002.12.12
RichEdit


1-36090
IronHawk
2002-12-01 02:52
2002.12.12
Запуск ЕХЕ-шника с параметром?


1-36264
Netcoder
2002-12-02 13:59
2002.12.12
Подцветка текста как в редакторе кода Delphi и HTML редакторах





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский