Как сделать загрузку в делфи
Программирование на Delphi. Часть 1. Установка Delphi Community Edition (бесплатная версия)
Компания Embarcadero в 2018 году представила Delphi Community Edition — бесплатную версию легендарной среды разработки Delphi. Использовать её могут студенты, стартаперы, небольшие команды, некоммерческие организации. Условия использования: лицензия на использование продолжает действовать до тех пор, пока прибыль физического лица или компании от приложений Delphi не достигнет 5 000 долларов США, или штат команды разработчиков не превысит 5 человек.
С помощью Delphi Community Edition можно разрабатывать мультиплатформенные приложения на Windows, Android, iOS и macOS. В этой статье мы пошагово пройдём процесс установки среды и напишем тестовое приложение под Windows. Delphi всегда был инструментом для быстрого старта в разработке под Windows на языке Pascal, это мы сегодня и проверим.
Примерное время установки: около 40-60 минут.
1. Скачивание бесплатной версии Delphi
Для того, чтобы получить доступ к Delphi Community Edition, пройдите по этой ссылке https://www.embarcadero.com/ru/products/delphi/starter/free-download
Заполните форму, введенный пароль сохраните. В качестве компании я указал один из своих сайтов, телефон реальный, но мне никто пока что не звонил :). Главное: правильно укажите электронную почту.
На почту вам придёт письмо с ключом — его лучше сохранить. После отправки формы начнётся процесс загрузки. Если загрузка не начнётся, ссылка будет также в письме. Письмо вам необходимо — если оно не пришло, проверяйте спам. Если вообще не пришло, регистрируйтесь заново на другой ящик. Я регистрировался дважды на разные email — один на доменную почту, второй на Gmail. Оба раза всё было ок. Вот как выглядит письмо:
2. Установка Delphi Community Edition
Введите Serial number из письма в почте и нажмите Register.
Программа начнёт связываться с серверами Embarcadero и попытается зарегистрировать вашу копию. На одном компьютере у меня всё произошло мгновенно, на другом с третьей попытки. Судя по сообщениям, проблема была с серверами Embarcadero. Если всё получилось, переходите к следующему разделу статьи. Если нет, попробуйте сделать следующее. На скриншоте ниже кликните по ссылке «Trouble connection…»
Создание и работа с текстовыми файлами в Delphi
Когда речь идет о работе программы с текстовым файлом, подразумеваются процедуры ввода данных из файла в программу или, наоборот, запись этих данных в файл программой. Для текстового файла допустима простая работа с файлом без особых дополнительных механизмов, которые применяются для работы со специализированными файлами, такими как при загрузке данных из Excel или работе программы с базой данных. Разумеется, Delphi располагает возможностями работать с файлами с использованием компонентов. Но в данной статье рассматривается механизм прямой работы с текстовым файлом без использования дополнительных компонентов.
Итак, в общем виде, работа с файлом заключается в следующих этапах:
1. подключение к файлу – связь с внешним файлом, указание режима подключения;
2. выполнение операций записи в файл или чтения из файла;
3. завершение работы с файлом.
Подключение к файлу
Для связи программы с файлом используется специальная переменная – «Файловая переменная». Объявляется она так же как и любая переменная в Delphi. Тип это переменной может быть File для типизированных (хранящих данные определенного типа) файлов, а можно указать TextFile, что будет означать тип обычного текстового файла. Объявление переменной:
В исполняемом коде программы выполняется подключение к внешнему файлу:
Команда AssignFile, выполняет связь файловой переменной с внешним файлом. Вторым параметром указывается адрес файла. Он может быть задан относительным или абсолютным. Если указать только имя файла, то программа будет пытаться обнаружить его в той же директории, где она сама и находится. Абсолютный путь указывается от корневого диска:
Использование относительной директории дает возможность не привязываться к конкретным дискам и адресам. Например:
После того как выполнено подключение, выполняется процедура, устанавливающая режим работы с файлом. В основном это режим чтения или записи. Эти режимы назначаются процедурами Reset() ( для чтения) и rewrite() (для записи):
* Для команды Rewrite() следует учитывать, что при ее выполнении, она либо создает файл, указанный в файловой переменной, либо если он уже есть перезаписывает файл заново, удаляя старый без какого-то предупреждения.
Любую из указанных команд можно использовать без команды AssignFile(). Для этого достаточно вторым параметром указать путь к файлу. Таким образом, она сразу выполнит привязку файла к файловой переменной и назначит режим работы с этим файлом:
Операции с файлами
Для чтения из файла, необходимо назначить режим чтения и использовать команду Readln(), которая будет вводить в строковую переменную по одной строке из файла. Затем с этой переменой можно выполнить необходимые действия.
Обычно для загрузки всех строк из файла используется оператор цикла. Для того, чтобы определить, что файл закончился используется функция EOF() (End Of File). Таким образом получается цикл, в котором последовательно в строковую переменную вводятся все строки файла и завершающийся после окончания фала:
Для записи, назначение режим записи в файл и командой Writeln() производится запись по строкам.
Закрытие файла
По завершении работы с файлами, особенно в случае записи в них данных, необходимо корректно завершить работу с файловой переменной. Это делается для того, чтобы сохранить все внесенные в файл изменения.
Примеры работы с текстовыми файлами в Delphi
Чтение в переменную одного значения из файла:
Загрузить все строки файла в компонент Memo:
Следует отметить, что для этой задачи проще воспользоваться командой самого компонента Memo LoadFromFile().
Записать строку в файл:
Записать в текстовый файл все строки из компонента Memo:
Как и для чтения из файла в Memo, так и здесь, имеется специальная команда:
Запуск внешней программы в форме программы
Всем привет 
может Вы меня и не поймете, но не пинайте, я только учусь
Делаю я оболочку для CarPc. И главная затея, сделать или сотворить одну классную вещь, а вещь заключается в том, что можно будет запускать другие внешние программы в форме программы сделанной в делфи.
Допустим я сделал и скомпенсировал форму с одной кнопкой, а при нажатие на кнопку открывается к примеру блокнот в форме где кнопка О_о
. не знаю как объяснить более понятней)))
вот исходник (вложен в сообщение снизу) того что я хочу но он на бейсик вроде бы.
Для чего мне это нужно? PcCar в первую очередь это расширение экрана 800*600 допустим. и в этих 800*600 нужно запустить программу 800*640 (iGo8) а в остальной часть остаются кнопки управления типа закрыть,свернуть,кнопки плеера аудио что бы можно было пользоваться и музыкой и навигации одновременно. По мимо навигации будет много программ таким образом запускаться (Foobar2000,Navitel,,блокнот и т.п.)
P.S. Я не жду 100% просто скажите реально это или нет, если да то куда капать? я не кого не хочу затруднятся в эту минуту голова есть на плечах буду рад исходнику в крайнем случае. За ранние спасибо за ответы.
Вложения
 | open_prog_to_form.rar (49.7 Кб, 374 просмотров) |
Запуск внешней программы
Нашел пример с интернета, подставил свои данные но код не работает, просто тупо ничего не.
Запуск внешней программы с изменением параметров
Здравствуйте уважаемые программисты. Задача такая: У меня есть программа на делфи, это клиент.
Вот только что нашел исходник на языке C# но он так же не подходит, потому что Делфи нужен.
Ура нашел исходник на делфи
Только проблема не могу запустить.
Подскажите где ошибка? компилятор ругается на строчку (CmdLine := ‘»‘ + ‘C:\windows\calc.exe’ + ‘» ‘ + Params;)
Загрузка настроек программы из файла. Delphi
Delphi программирование, создание программ.
Многих интересует вопрос как сделать так что бы программа, написанная на Delphi при закрытии сохраняла свои настройки в файл, а при последующем открытии загружала их от туда. На самом деле делается это очень просто, приведу пример, в котором программа при выходе сохраняет свои размеры и положение окна на экране в файл и при последующем запуске восстанавливает состояние, которое было при выходе. Запускаем Delphi, создаем новый проект, работать будем с формой и нам понадобиться два события это OnShow и OnClose создаем их. Первое событие будет выглядеть следующим образом:
procedure TForm1.FormShow(Sender: TObject);
Var f:file of Integer; // файловая переменная, тип integer
i:Integer; // целочистенная переменная
begin
AssignFile(f, ‘pos.ini’ );
<$I->// Отключаем контроль ошибок
Reset(f);
<$I+>// Включаем контроль ошибок
if IOResult<>0 then Exit;
Read(f,i); //считать из файла значение
Form1.Top:=i; // верхнее положение окна
Read(f,i);
Form1.Left:=i; // левое положение окна
Read(f,i);
Form1.Width:=i; // ширина окна
Read(f,i);
Form1.Height:=i; // высота окна
CloseFile(f);
end;
Здесь при запуске программа загружает нужные настройки из файла pos.ini находящимся в той же папке что и сама программа.
Ну и наконец второе событие оно будет вызываться при закрытии программы и сохранять нужные настройки в файл.
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var f:file of Integer; // файловая переменная, тип integer
begin
AssignFile(f, ‘pos.ini’ ); // Привязываем строку пути файла к файловой переменной
<$I->// Отключаем контроль ошибок
Rewrite(f);
<$I+>// Включаем контроль ошибок
if IOResult<>0 then Exit; // Если ошибка то выходим
Write(f,Form1.Top); // Записываем в файл положение окна по верикали
Write(f,Form1.Left); // Записываем в файл положение окна по горизонтали
Write(f,Form1.Width); // Записываем в файл ширину формы
Write(f,Form1.Height); // Записываем в файл высоту формы
CloseFile(f); // Завершаем работу с файлом
end;
Данный пример подойдет не только для сохранения размера окна программы, но и для сохранения других настроек.
Установка компонентов в среду Delphi 7
Для того чтобы установить компонент в среду Delphi, который идет с файлом [nameComponent].dpk необходимо выполнить следующие действия.
В нем мы видим кнопки Compile, Add, Remove, Install, Options
Кнопка Compile компилирует как это понятно из названия компонент (иногда это требуется перед установкой специфических компонентов)
Кнопка Add добавляет файлы к пакету компонента, а кнопка Remove в свою очеред удаляет файлы из пакета в основном они нужны только для разработчиков компонентов.
Кнопка Install необходима для установки компонента в среду разработки.
Кнопка Options вызывает окно настройки пакета компонента
Пример окна настройки компонента
Можете не пугаться тут нам ни чего менять не нужно если конечно это не описано в руководстве по установке какого либо компонента.
В табличке мы видим файлы и пути к ним. Так же видим, какие библиотеки необходимы для нормальной работы компонента.
Так вот казалось бы и все можно заканчивать разговор об установке ведь при нажатии на кнопку Install у нас все установилось, но ни тут то было)) дело обстоит несколько сложнее.
Для корректной установки компонента нам необходимо выполнить еще пару действий.
Это указать где или в какой директории лежит наш компонент, который мы с вами собираемся установить, это необходимо для того, чтобы среда смогла найти все необходимые файлы для компиляции компонента.
Для того необходимо зайти в Tool->Environment Options
После чего появится окно
В нем необходимо выбрать вкладку Libary как показано на рисунке и в ней уже нажать на кнопку с изображением трех точек напротив Libary path
Откроется окно
В нем уже указать путь до нашего устанавливаемого компонента, вписать путь до компонента и нажать кнопку Add после чего чтобы настройки были сохранены кнопку OK.
После чего нажать на кнопку напротив Browsing Path и сделать тоже самое, что и в пред идущем случае.
После того как вы прописали вроде бы все пути и при нажатии на кнопку install в окне пакета компонента, он не устанавливается следует обратить внимание на, что ругается среда.
Иногда бывает, что не все необходимые файлы для нормальной его работы находятся в папке с фалом компонента [nameComponent].dpk и следует добавить в пути дополнительные папки которые идут вместе с компонентом.
В случае удачной установки вы увидите окно подобное этому
И кнопка Install станет неактивной (больше ее нажать не получиться) по ней можно так же определить устанавливали вы этот пакет или нет. Иногда при установке палитры компонентов идет много пакетов, в которых без труда можно запутаться.
после чего нажимаю кнопку Install и вижу что компонент установлен в палитру компонентов
Создаю новый проект Application во вкладке Samples вижу только, что установленный компонент
Ну в общем то и все.
Для того чтобы узнать куда устанавливается компонент можно просто найти процедуру Register
У pngdelphi она вот такая
по ней можно понять, что вкладка Samples, имя компонента TPNGButton.
Тогда закажите прямо сейчас видеокурс Мастер Delphi PRO на DVD. В нем более 30 часов видеоуроков: