|
|
Другие темы раздела | |
Delphi Обработка подключения флешки Использую данный код для обработки подключения/отключения флешки, подскажите ,пожалуйста, как узнать метку(F:, E:) подключенной/отключенной флешки? Сам код: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, https://www.cyberforum.ru/ delphi-beginners/ thread2684396.html |
Delphi Не могу написать программу Не могу написать программу, есть начало программы, нужна небольшая помощь в написании некоторых функций и операций |
Delphi Объявление массива
https://www.cyberforum.ru/ delphi-beginners/ thread2684035.html Подскажите пожалуйста возможно ли как-то на Delphi сделать что-то типа этого: var StringArray: array of String = ('String1', 'String2', 'String3'); Т.е. объявить некий динамический/открытый массив, где компилятор сам вычислит количество элементов и этот массив тут же задать значения элементам массива. |
Delphi Найти форму на TTabSheet Hi 8-), на каждой создаваемой вкладке создаётся форма с кнопкой (BitBtn1), как найти форму этой вкладки при переходе на неё? это нужно что бы потом обратиться к кнопке BitBtn1. ... NTab := TTabSheet.Create(PageControl1); ... with TForm3.Create(NTab) do begin Caption:= 'Dynamic Form #' + IntToStr(n); Parent:=NTab; end; Пожалуйста помогите :thank_you: https://www.cyberforum.ru/ delphi-beginners/ thread2683942.html |
Объединить 2 процедуры в одну Delphi Ребят, есть 2 процедуры: 1я - не даёт закрыть, свернуть, развернуть форму; 2я - добавляет 2 дополнительных меню в правой кнопки мыши; Если объявить обе эти процедуры: Procedure WMGetSysCommand(var Message : TMessage); message WM_SYSCOMMAND; procedure WMSysCommand(var Msg:TWMSysCommand); message WM_SYSCOMMAND; то делфи ругается так как и там и там Message; Если объявить только (var... |
Delphi DELPHI + VK API + Synapse
https://www.cyberforum.ru/ delphi-beginners/ thread2683841.html Скрипт для постинга в группу. Если в memo2.text текст сплошой, то публикуется нормально, если есть пробелы , то сразу ошибка 400 Bad Request. Подскажите пожалуйста , как исправить. procedure TForm1.Button1Click(Sender: TObject); var zapros:string; begin... |
Delphi Заданные действительные числа а1,а2.а е-нное
https://www.cyberforum.ru/ delphi-beginners/ thread2683727.html Заданные действительные числа А1,А2,...,An. Разработать программу, которая определяет номера чисел в этой последовательности j1,j2,...,jn такие, что выполняется условие Aj1 >= Aj2 >=...>= Ajn. |
Повторить процесс и куча переменных Delphi Доброго времени суток! Я к Вам опять со своими картинками. Всё позабывал как-что делается, всему чему у Вас пытался перенять. В общем за помощью! Дабы было более менее понятно о чем я: Цель работы программки: 1) Появление картинок с условиями - их на данный момент 152 пускай они все будут на форме, со своими пикчами. 3) Условие появление картинок - рандомное число равное имени картинки... |
Delphi Как убрать пространство образующееся после сокрытия панели задач? Вот такой код полностью скрывает панель задач, но все равно программу не получится растянуть до низу. У меня форма имеет свойство Align := alRight. При сокрытии панели задач внизу остается пространство равное высоте панели задач. Как его убрать? procedure Ttab.Button1Click(Sender: TObject); begin ShowWindow(FindWindow('Shell_TrayWnd', nil), sw_hide); end; https://www.cyberforum.ru/ delphi-beginners/ thread2683486.html | Delphi MDIChild и Задержка как работают вместе? Есть программа, в которой создается до 25 MDIChild окон (возможно я ошибаюсь но каждое окно формируется в отдельном потоке), так вот если в одном из MDIChild окне стоит задержка, например у меня такая EndTime := IncSecond(Now, 2); //2 сек ждем repeat Application.ProcessMessages until (Now > EndTime); То на это время прекращают работать и остальные mdi окна. Объясните, в... https://www.cyberforum.ru/ delphi-beginners/ thread2683476.html |
Поиск окна Delphi Доброе время суток товарищи! Помогите пожалуйста разобраться с задачей. Есть удаленный рабочий стол через терминал Сitrix, в простое после 5 минут он "засыпает" выкидывает на логин и пароль. Нужно чтобы допустим раз в минуту производились какие то действия на удаленном рабочем столе столе. Есть такой вариант программы, которая через указанное время двигает мышку на 1 пиксель, чтоб... |
Delphi Обрезать строку в Format
https://www.cyberforum.ru/ delphi-beginners/ thread2683441.html есть такой код: str:=Format('%.10d',); допустим, результат: 0013245635 10d гарантированно заполняет 0 до длины 10. мне нужно, чтобы при форматировании результатом было только последние 3 цифры: 635 str:=Format('%.3d',); // такой код не отформатирует только последние три, все равно запишет все число 13245635. есть ли способ без копирования? |
0 / 0 / 0
Регистрация: 21.03.2016
Сообщений: 34
|
|
0 | |
RAD 2009-XE2 Работа с текстовыми блоками - Delphi - Ответ 1474583425.07.2020, 23:18. Показов 511. Ответов 6
Метки (Все метки)
Доброе время суток!
Подскажите пожалуйста два вопроса! 1. Как реализовать проверку по количеству параметров команды, т.е. выдавать ошибку в тексте если параметров указано меньше чем должно быть в команде например: есть 5 команд с одним параметром, записывается так - команда(параметр1) 3 команды по 2 параметра, записывается так - команда(параметр1, параметр2) 3 команды по 5 параметров, записывается так - команда(параметр1, параметр2, [параметр3 параметр4 параметр5]) 3 команды по N параметров, записывается так - команда(параметр1, ..., параметрN) 2. Какой компонент использовать чтобы создать всплывающее меню как в Word после вставки текста за ранее благодарен!!! Вернуться к обсуждению: Работа с текстовыми блоками Delphi
0
|
25.07.2020, 23:18 | |
Готовые ответы и решения:
6
Работа с текстовыми блоками работа с текстовыми файлами Работа с текстовыми файлами. Работа с текстовыми файлами |
25.07.2020, 23:18 | |
25.07.2020, 23:18 | |
Помогаю со студенческими работами здесь
0
Работа с текстовыми файлами работа с текстовыми файлами Работа с текстовыми файлами Работа с текстовыми файлами Работа с текстовыми файлами Работа с текстовыми файлами |