Delphi Получить список установленных приложений на смартфоне через ADBhttps://www.cyberforum.ru/ delphi-beginners/ thread3087867.html Всем привет. Долгое время бьюсь над тем, чтобы получить список установленных приложений с телефона, подключенного к компьютеру. В программе, которую пишу, список устройств отображается, а список приложений- нет. Предпринималось много всего, чтобы таки решить задачу. Ниже привожу текст модуля.
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,...
Delphi Элементы масива, большие 9, заменить на 1 Квесшенс по массивчику для про программистов.
здравствуйте. вот код массива через рандом:
var
N,I: integer;
M: array of integer;
procedure TForm10.Button1Click(Sender: TObject);
begin
Randomize;
Delphi Асинхронная работа с ComPorthttps://www.cyberforum.ru/ delphi-beginners/ thread3087333.html Приветствую великих умов форума, столкнулся с проблемой работы с comPort, а конкретнее я использую модем который поддерживает ComPort и вот больше тут задача моя склоняется к тому как обуздать асинхронность? Я использую компонент https://github.com/CWBudde/ComPort-Library.
Итак суть какая у меня есть ComPort1RxChar и вот он является как понимаю событием при получении символа, а читая я...
Delphi Увеличение размера canvas pixel по нажатия на кнопку в PaintBoxhttps://www.cyberforum.ru/ delphi-beginners/ thread3087285.html Нужно сделать так, чтобы по нажатию на кнопку размер появляющихся пикселей увеличивался.
С каждым последующим нажатием размер появляющихся пикселей должен увеличиваться.
Всего должно быть 4 размера пикселей.
type
TForm1 = class(TForm)
Button1: TButton;
Timer1: TTimer;
PaintBox1: TPaintBox;
Delphi Текстовый редактор И вот, я снова тут, и не думала что у Delphi тут такой большой раздел, это наверное хорошо. Хотя я больше по VB6 и VBA и JS, но в какой-то момент поняла, что не воспринимаю ничего хоть как либо адекватное кроме Dreamweaver и NPP, вот и ищу видео курсы по созданию текстовых редакторов, по VB, JS, пускай и Delphi и исходники... а так же есть исходники AkelPad и NPP, но один на C другой на С++, хоть...
Delphi Исправить ошибку в коде игры "пятнашки"https://www.cyberforum.ru/ delphi-beginners/ thread3087043.html Ошибка в коде пятнашки делпфи Культин
unit Unit1; //СТРАНИЦА 150
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, Vcl.StdCtrls, System.UITypes;
type
Delphi Сравнение двух файлов идёт очень медленноhttps://www.cyberforum.ru/ delphi-beginners/ thread3086881.html Здрасте, сделал сравнение двух файлов на одинаковые строки с дальнейшей записью, почему то сравнивает как то медленно, в качестве поисковика использовал ATStreamSearch из компонентов ATViewer, но пробовал и другие алгоритмы поисков в файле с заявленными быстрыми алгоритмами, не заметил разницы в скорости:
program Project2;
{$APPTYPE CONSOLE}
uses
System.SysUtils,
ATStreamSearch,
Как правильно преобразовать integer в char? Delphi Здрасте, мне нужно размножить рандомную цифру, но никак не получается преобразовать integer в нужный тип char
procedure TForm2.Button1Click(Sender: TObject);
begin
Randomize;
randseed:=strtoint(StringOfChar(char(random(10)), Random(10)));
memo1.Lines.Add(inttostr(Random(500)));
end;
Delphi Как сделать, чтобы объект мог передвигаться в определенную сторону, при этом не выходя за определенную границу?Не ругайтесь, я всего лишь студент) В общем, задание такое:
Запрограммируем кнопку Вверх, которая будет сдвигать Рабочую панель вверх на 10 до тех пор пока расстояние до верхнего края будет больше 10:
if WorkPanel.Top > 10 then WorkPanel.Top := WorkPanel.Top - 10;
Запрограммируйте кнопки Вниз, Влево и Вправо для перемещения Рабочей панели в соответствующие стороны. Рабочая панель не...https://www.cyberforum.ru/ delphi-beginners/ thread3086318.html
Delphi Лаба по DESДобрый день. У меня есть все подпрограммы по des шифрованию, но собрать воедино их не могу. Я не понимаю, как они работают, так как нас разделили на группы и каждый писал свою подпрограмму, чтобы потом собрать их воедино. Но я не могу понять как это сделать. Помогите, пожалуйста.
Задание
-разбить текст на блоки по 8 байт, последний блок дополнить нулями
-разбить блок на биты - и уложить...https://www.cyberforum.ru/ delphi-beginners/ thread3086226.html
Delphi Проверка и сохранение дублирующих строк Я проверяю дубликаты строк до символа =. И если строки есть то сохранить не удаляя дубликаты.
var f, s: TStringDynArray;
i, j, k: integer;
L, L1: TStringList;
index: array of integer;
begin
L := TStringList.Create;
L1 := TStringList.Create;
j := 0;
Delphi Добавление букв из алфавита, следующих да указаннойЗдравствуйте, подскажите пожалуйста как добавить в строку буквы следующие за буквой в строке (9 букв),
например:
s := 'a';
после добавления:
s := 'abcdefghij'
s := 'k';
после добавления:
s
Единственное что удалось сделать это поворот объекта за мышкой. Во что у меня сейчас
Не рисует приведённый код ничего.
---
Метод объекта хранит свои данные в глобальной переменной, процедура поворота стоит отдельно и обращается к глобальной переменной. Почему она не является методом THook?
Добавлено через 4 минуты
Нарисовало. Координаты стрелки выходили за пределы Image.
Добавлено через 2 минуты
Сообщение от Olga28
На одном языке программирования удалось это сделать так как там есть свойства работы с поворотом (rotation), объекта.
Ну а в Delphi 7 такого нет, значит, надо реализовать самостоятельно по такому же принципу, чтобы действовало так же, как и "на одном ЯП".
Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .
В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .
Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .
Введение в параллельное программирование
Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .
В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .
Концепция CQRS и её роль в современной разработке
В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .
CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .
Введение в CI/ CD и Jenkins
В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .
Определение микросервиса, преимущества использования Go/ Golang
Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
Сообщение от Olga28
