169 похожих чатов

Привет, ребята у меня сложности с таймером который должен удалять

объекты созданные в ран-тайме...

Вот у меня есть класс TObj
Tobj = class(TObject)
Form: TForm;
public
constructor Create;
destructor Destroy; override;
end;

Я создаю TObj и помещаю его в LIST_FORMS: TObjectList<Tobj>;

Далее.. К примеру создано несколько таких TObj, как мне их уничтожить с помощью таймера через 10 сек их существования?
К примеру создал 10 TObj.
Теперь мне нужно в таймере отсчитать 10 сек и LIST_FORMS.Delete(x);
Но проблема в том, что создаются TObj не одновременно..

Что бы было проще понять, я пытаюсь сделать уведомления, на подобии qip 2005, когда сбоку выходит окошко с текстом. и через некоторое время это окошко нужно удалить...
Как я и говорил, моя проблема в том, что я не могу понять, как мне отсчитывать допустим 10 сек и удалять окно, которое просуществовало 10 сек. А остальные должны дожидаться своих 10 сек))
Извините если плохо объяснил

7 ответов

17 просмотров

1. добавь к Tobj поле время_добавления_в_список 2. настрой таймер на срабатывание через 1 секунду 3. при срабатывании таймера сравни разницу между текущим временем и время_добавления_в_список каждого объекта. если она 10 и более секунд - удаляй объект PS начинай просматривать свой список перед удалением с конца

JF- Автор вопроса
Viktor Akselrod 💻
1. добавь к Tobj поле время_добавления_в_список 2....

хм, точно)))) пасиб) а почему именно с конца?

потому что бежать по списку ты будешь скорее всего с помощью for/forin и при удалении элемента индексация у тебя собъется (элементы переместятся в начало списка на 1) и ты выйдешь за пределы списка

JF- Автор вопроса
Viktor Akselrod 💻
потому что бежать по списку ты будешь скорее всего...

очень частые и неочевидные для новичка грабли :)

может уведомления пусть сами умирают, так не проще ли, чем список городить и бегать по нему?

Denis K
может уведомления пусть сами умирают, так не проще...

Ну, это ж ты не легаси предлагаешь.. Изыди, лукавый.. 😂🙈

Похожие вопросы

Обсуждают сегодня

Всем привет! Имеется функция: function IsValidChar(ch: UTF8Char): Boolean; var i: Integer; ValidChars: AnsiString; begin ValidChars := 'abcdefghijklmnopqrstuvwxyzABCDE...
Евгений
44
Ну вот просто даже давайте вот как. Какой нибудь конкретный кейс, можете в пример привести, где бч работает и приносит прикладную пользу, а не просто что бы было? Не крипту.
Alexander Andreev
22
объясните пожалуйста, почему функция не работает должным образом? вроде должно брать активное окно сравнивать его размер с размером экрана, и если есть совпадение = true прове...
JF
12
> Копаем глубже > Следующий момент был, когда я спросил его, знает ли он JavaScript. Он ответил, что его учили работать с C#. Я тоже в университете писал на C#, но даже там мн...
Oleg Volkov
4
лучше скажите, причём тут паскаль?
Alexey Kulakov
36
И никого не интересует какие пакеты кто использует. ((% Заходишь на сайт симфони и видишь поддержку Украины - по законам РФ это ж экстремизм. Только никто не отказывается от с...
Am Ambrion
11
Чтобы перехватить все нажимания буков на форме, надо хук ставить? Пробовал на форме ОнКейДаун, оно ловит клаву если фокус не на компоненте с вводом текста
Serjone
15
Народ! Впервые клиенту пришло письмо от РКН, у вас, дескать, есть яндекс метрика, а нигде не написано, что вы ее юзаете. Никто не сталкивался?
Sasha Beep
14
Но, может, есть уже проверенная? Наши требования такие: 1. Сообщения должны приходить из Инста в CRM оду 2. Должна быть возможность подключить несколько экаунтов Инстаграм. Р...
Alexander Sharoiko MSE / Александр Шаройко
8
Вопрос на перед, на следующую пятницу. Сколько строк кода можно вешать на одного программиста, понятно что если проект хорошо написан то можно и миллион. Но есть же где то пре...
AlekseyK Kluchnikov
31
Карта сайта