Зачем использовать потоки? Проще говоря, чтобы некоторые новички вроде меня не поняли, когда вы закончите программировать программу, например, программу, которая читает файлы, если файл, который вы читаете, большой, ваша программа будет такой. не выполняется через потоки, каков будет результат при перемещении окна программы, читающей файл? «Мертвый экран» означает, что вашу программу вообще невозможно перетащить и она не может продолжать делать другие вещи, ха-ха, если вы используете потоки. , Все проблемы решены, так что перестаньте нести чушь и прочитайте следующую статью, если хотите узнать.
Прежде всего, конечно, откройте Delphi 6, нажмите «Файл-Новые-Другие» в строке меню, появится окно метки, выберите новую метку, затем найдите объект потока, вот и все, дважды щелкните его, Появится окно с именем класса. Введитеmyread, конечно, имя можно выбрать самостоятельно. В это время программа автоматически создает модуль. Вот модуль2. Теперь посмотрим на модуль.
блок Unit2;
интерфейс
использует
Классы;
тип
мифread = класс (TThread)
Частный
{Частные заявления}
защищенный
процедура Выполнить;
конец;
выполнение
{ Важно: методы и свойства объектов в VCL или CLX можно использовать только
например, в методе, вызываемом с помощью Synchronize,
Синхронизировать(UpdateCaption);
и UpdateCaption могут выглядеть так:
процедура myread.UpdateCaption;
начинать
Form1.Caption := 'Обновлено в теме';
конец; }
{прочитанный миф}
процедура myread.Execute;
начинать
{ Разместите здесь код темы }
конец;
конец.
Среди них обратите внимание на процедуру myread.execute;. Вы должны были ее найти. Даже я ее видел. Это поток, который вы только что создали. Затем нам нужно добавить код для фонового выполнения. быть добавлено туда? Нет, конечно, добавится.
начинать
//Здесь добавляется программный код
конец;
Если вы хотите вызвать элемент управления в модуле 1, вы можете просто добавить модуль 1 к использованию в модуле 2. Помните, что необходимо добавить использование модуля 2 после реализации в модуле 1, чтобы вы могли ссылаться на поток в модуле 1. Метод ссылки очень прост. просто, это, это, ладно, я не собираюсь об этом задумываться, это миф.Create(false);. ОК. Это ветка в Delphi, ха-ха.
Я только что изучил Delphi. Если я говорю что-то неправильное, вы можете покритиковать и указать на это. Мой контактный адрес электронной почты — [email protected]. Спасибо!