Описание тега delphi-10.2-tokyo
Delphi 10.2 Tokyo - это конкретная версия Delphi, выпущенная в марте 2017 года.
1
ответ
Delphi - Создание универсального TButton, который создает объект любого данного класса
Я создаю компоненты пользовательского интерфейса программно. Одним из моих компонентов является TButton (или его потомок), и я хочу, чтобы кнопка создавала объект заданного типа при нажатии. У меня есть десятки типов и, конечно, я не хочу создавать …
14 май '18 в 21:39
1
ответ
Ошибка при открытии файла, сохраненного на подключенном диске
У меня есть зритель, чтобы показать мои сохраненные отчеты. Delphi XE7 работает нормально. Но в новой версии (Delphi Tokyo) это не работает. if OpenDialog.Execute then ShellExecute (0, nil, 'C:\C_Progs\CrystalViewer.exe', PWideChar('"' +OpenDialog.F…
07 авг '18 в 12:24
1
ответ
Показать панель задач с формой FMX без полей
Моя заявка имеет основную форму borderStyle = none а также WindowState = wsMaximized, Моя проблема в том, что приложение закрывает панель задач Windows. Как отобразить панель задач Windows?
07 фев '18 в 21:08
1
ответ
Delphi - Выполнение асинхронных вызовов WinRT API с использованием TTask.Future
В связи с этим вопросом я пытаюсь реализовать процедуру, которая использует WinRT API для установки обоев рабочего стола. Подражать await функциональность в C#, я использую TTask.Future ( ссылка), как указано здесь и здесь. Моя реализация выглядит т…
11 авг '17 в 10:41
1
ответ
Загрузка jbitmap с данными
Я занимаюсь разработкой приложения для Android с Delphi 10.2 Tokyo в качестве инструмента для разработчиков. Чтобы печатать на принтере Zebra, мне нужно отправить изображение в виде JBitmap, Я не могу найти свет на предмет, как загрузить это JBitmap…
24 сен '18 в 11:17
0
ответов
FreePascal клонирует тип данных для Delphi
Я пытаюсь использовать FreePascal 2.2.2 ibase60.inc из нижней ссылки этого ответа в Delphi Tokyo. Он начинается со следующих определений: type { Unsigned types } UChar = Byte; UShort = Word; UInt = DWord; ULong = DWord; { Signed types } Int = LongIn…
27 окт '17 в 15:26
2
ответа
Delphi - Попытка получить StackTrace для исключения
У меня есть регистратор исключений, который записывает все исключения в файл журнала: class function TLogger.LogException (ACaller: String; E: Exception): Boolean; var LogFilename, tmp: string; LogFile: TextFile; appsettings: TApplicationSettings; b…
04 май '17 в 05:57
1
ответ
Как использовать прокси с Indy TIdWhois?
Я не могу понять, как использовать прокси с TIdWhois, У кого-нибудь есть подсказка для меня? Следуя описанию Реми, я использую следующий код: w:=TIdWhois.Create(nil); p:=TIdConnectThroughHttpProxy.Create(nil); io:=TIdIOHandlerStack.Create(nil); p.Ho…
30 мар '17 в 05:52
0
ответов
Delphi FMX ListView отфильтрованный и FDQuery.First
У меня есть listview подключен к query где пользователь отмечает некоторые записи, используя AccessoryObject, В конце процесса я делаю while в query проверять, какие записи были помечены и получить некоторые query Информация. Но когда я делаю поиск,…
04 апр '18 в 11:48
1
ответ
Как удалить рамку из палитры компонентов Delphi?
Я создал и добавил рамку VCL в палитру "Шаблоны" инструментов инструментов. Теперь я хочу удалить его из палитры, но не могу найти никакой информации о том, как это сделать. Кто-нибудь знает, как это сделать?
22 дек '17 в 22:49
1
ответ
Как получить значение из формы в сторону PageControl
Вот как я создаю свой PageControl. PageCtrlSub := TPageControl.Create(Self); PageCtrlSub.Parent := GroupSub; PageCtrlSub.Align := alClient; SubFormCnt := 0; TblOdSub.First; while not TblOdSub.Eof do begin SubPartNo := TblOdSub.FieldByName('sub_part_…
19 янв '18 в 17:38
0
ответов
Почему администратор развертывания хочет развернуть больше файлов, чем необходимо?
Я определил, что количество файлов, необходимых для моего фиктивного приложения (2 формы, 1 кнопка, элемент управления XMLDocument), равно 4. rtl250.bpl vcl250.bpl vclimg250.bpl xmlrtl250.bpl Почему Deployment Manager хочет развернуть 15 файлов, вкл…
06 июл '18 в 09:04
1
ответ
Как использовать свойства RecsSkip и RecsMax TFDQuery во время выполнения
Я искал пропустить и принять выбор в TFDQuery. Я нашел следующие свойства.FetchOptions.RecsSkip и.FetchOptions.RecsMax. Я использую Токио 10.2.3 и базу данных Firebird 3 Я делаю запрос во время выполнения и хочу получить начальную запись в 5 и получ…
19 апр '18 в 12:35
0
ответов
Как объединить примеры проектов Login, Sign и других вместе в Delphi 10.2?
В Delphi 10.2.3 есть несколько хороших примеров проектов, например, вход в систему, регистрация, профиль и т. Д. Как я могу интегрировать их для создания полноценного полезного проекта / приложения? Я скопировал файлы формы регистрации / фрейма в па…
18 сен '18 в 22:29
0
ответов
Перетащите в приложение в сеансе удаленного рабочего стола
Пример кода, который работает в обычном (локальном) сеансе: constructor TForm1.Create(AOwner: TComponent); begin inherited; ChangeWindowMessageFilter(WM_DROPFILES, MSGFLT_ADD); ChangeWindowMessageFilter(WM_COPYDATA, MSGFLT_ADD); ChangeWindowMessageF…
14 авг '18 в 06:31
0
ответов
Как сохранить RegIniFile как IniFile в Delphi?
Мое приложение Win32 использует раздел реестра с использованием TRegIniFile, например так: MyData:=TRegIniFile.Create('\Software\MyApp'); Раздел реестра имеет подразделы и значения. Как я могу экспортировать все данные как INI-файл, используя TIniFi…
29 мар '18 в 08:27
0
ответов
Delphi FireMonkey - установка обоев на Win 10 не работает при развертывании в качестве APPX
Я создал простое приложение с использованием Delphi 10.2 Tokyo (с помощью FireMonkey), которое отображает изображения и позволяет установить обои для рабочего стола для выбранного изображения. Основной код, который устанавливает обои рабочего стола:…
04 авг '17 в 05:28
0
ответов
Возможно ли использование 64-разрядного кода Delphi для AV-стиля VCL во время выполнения?
Кажется, что не может быть пользовательского решения без исправления Delphi Tokyo, но, кажется, стоит спросить. Самый простой способ сделать это AV воспроизводимым. Начать новый проект VCL. Измените Платформу на 64-битную. Связь с пакетами времени в…
08 ноя '17 в 19:10
1
ответ
THttpClient не закрывает соединение в Delphi
Мое программное обеспечение включает в себя функцию ниже для публикации на URL. Я использую Sysinternals TCPView, чтобы увидеть соединение. Соединение не закрывается после публикации на URL. Как мне изменить код для немедленного закрытия соединения?…
18 янв '18 в 12:21
2
ответа
Изящно заканчивая все темы
Я использую это в одном из моих решений Мое требование - очистить очередь и аккуратно уничтожить все потоки, когда нажата кнопка "Стоп". Для этого я создал ObjectList var List: TObjectList<TMyConsumerItem>; begin { Create a new List. } List :=…
22 ноя '17 в 07:56