Активность

https://docwiki.embarcadero.com/RADStudio/Athens/en/Installation_Notes

Был не внимателен. Немного запутался в свойствах Девайса и его Итема. Оказывается есть такое свойство: 'Document Handling Select' Спасибо

Благодарю, за помощь! Действительно - совсем забыл!

наследовать можно хоть от чего - самое простое TRectangle наверное ровно как и в VCL, для создаваемого компонента Parent нужно указывать, иначе его не будет на экране

Добрый день, товарищи! Переделываю проект основанный на VCL компонентах. В этом проекте есть компонент X, унаследованный в конечном итоге от TCustomControl - внутри TButton, TEdit и TProgressBar. Учусь разрабатывать FMX компоненты. Пара вопросов: 1) - От какого класса следует наследоваться данному компоненту в варианте FMX. 2) Унаследовал от TControl, не увидел ничего. Унаследовал от TPanel - вижу только TPanel. Вот код конструктора: constructor TFMX_XComponent.Create(AOwner: TComponent); begin inherited; Width:=100; Height:=50; Edit:=TEdit.Create(self); Edit.Position.X:=5; Edit.Position.Y:=5; Edit.Width:=45; Edit.Height:=22; Edit.Visible:=True; Button:=TButton.Create(self); Button.Position.X:=55; Button.Position.Y:=5; Button.Width:=40; TrackBar:=TTrackBar.Create(self); TrackBar.Align:=TAlignLayout.Bottom; end;

Доброго дня. То же видел эти листинги, однако есть отличие. В VB есть возможность обратится к свойству откуда идёт сканирование, либо в том примере о котором идёт речь такая возможность есть. У себя же я такого свойства не нахожу. Синтаксис отличается немного между VB и Delphi. И я так понял свойства всех сканеров могут быть разные, мне же нужен универсальный подход независимо от сканера. Вот для примера код из VB, где идёт определение источника сканирования. Здесь "1" это лоток многостраничной подачи: Scanner.Properties("3088").Value = 1 'Dim Scanner As WIA.Device 'Automatic Document Feeder В Delphi (WIA_TLB) такого свойства нет, по крайней мере у моего сканера. Думаю что у всех сканеров может быть свой набор свойств и идти они могут под разными номерами. Вот у мня например для сканера HP CLJM477 Scan Driver какие свойства: for j := 1 to itm.Properties.Count do //Itm:IItem; mm1.Lines.Add(inttostr(j)+'. '+itm.Properties.Item[j].Name+' - '+string(itm.Properties.Item[j].Get_Value)); 1. Item Name - Scan 2. Full Item Name - 0001\Root\Scan 3. Item Flags - 532483 4. Color Profile Name - sRGB Color Space Profile.icm 5. Access Rights - 3 6. Filename extension - bmp 7. Compression - 0 8. Data Type - 3 9. Bits Per Pixel - 24 10. Channels Per Pixel - 3 11. Bits Per Channel - 8 12. Planar - 0 13. Current Intent - 0 14. Horizontal Resolution - 200 15. Vertical Resolution - 200 16. Horizontal Start Position - 0 17. Vertical Start Position - 0 18. Horizontal Extent - 1700 19. Vertical Extent - 2338 20. Pixels Per Line - 1700 21. Number of Lines - 2338 22. Bytes Per Line - 0 23. Item Size - 0 24. Buffer Size - 262144 25. Photometric Interpretation - 0 26. Brightness - 0 27. Contrast - 0 28. Threshold - 195 29. Orientation - 0 30. Media Type - 2 31. Preferred Format - {B96B3CAB-0728-11D3-9D7B-0000F81EF32E} 32. Format - {B96B3CAB-0728-11D3-9D7B-0000F81EF32E} При изменении источника сканирования(перекладывания листков в лоток автоматической подачи) на самом сканере меняются автоматически свойства: "Vertical Extent", "Number of Lines". В общем проблема в том, что если бы знать откуда будет сканирование сейчас, всё остальное можно сделать по имеющимся примерам. Есть возможность сделать поточное сканирование нескольких страниц и работает хорошо и есть сканирование отдельной страницы, но понять где сейчас будет сканироваться пока не получается.

Это из-за ассемблерных вставок.....

Я только вышел из RAD Studiio и перезагрузил комп (до этого вводил комп в состояние гибернации) и снова эта ошибка. Ведь эта ошибка явно не моя, а Embarcadero! Неужели никто с ней не сталкивался и тот же Ярослав Бровин не может мне ничего подсказать?

Устанавливается ли RAD 12.1 на Windiws 7 Pro? А то у меня выдается ошибка.

я когда предыдущий вопрос гуглил, вроде видел листинг на VB по этой теме, думаю, нужно найти его и использовать с т.з. синтаксиса и отличий-то почти не будет

Сбагрил большую часть кода в только что созданный новый, чистый второй *.cpp, всё собралось.

И тишина... Так и думал.... Никто ничего не знает.......

Сделал сканирование одной страницы, используя WIA - всё получилось, а вот как сделать поточное сканирование не знаю. Может кто подскажет?

Меня уже достали эти две ошибки. Как только добавишь новую глобальную переменную или новую функцию, как тут же выскакивают они.. Поменяешь что-нибудь наугад местами, пропадают. Сейчас добавил в код эти функции inline VOID ByteDecFunc(PBYTE Lock) { _asm { mov rcx, Lock dec byte ptr[rcx] } } inline VOID ByteIncFunc(PBYTE Lock) { _asm { mov rcx, Lock inc byte ptr[rcx] } } снова ругань

Доброго дня Тестовое приложение, форма, тоолбар, кнопка, мемополе. Вопрос, должно приложение менять портрет/ландшафт при повороте смартфона? В приложение все настройки проекта по умолчанию. Отслеживать положение аппарата нужно программно и менять положение приложения или все должно отрабатывать автоматом? делфи 12.0

Спасибо за очередной пример, но на Андроид 14 он не приводит к положительным результатам. Немного поясню. Разрешение я получаю, но работать с файлами все равно не могу. Ни найти, ни открыть, ни записать. Причем пробовал в разных папках: и GetPublicPath, и GetShareDocumentsPath и других. Если есть еще необходимые действия с папками подскажите, пжл.

<uses-permission android:name="android.permission.MANAGE_EXTERNAL_STORAGE"/> var PackageManager: JPackageManager; begin if (TJBuild_VERSION.JavaClass.SDK_INT >= 30) then begin PackageManager := TAndroidHelper.Context.getPackageManager(); optPermission := (PackageManager.checkPermission( StringToJString('android.permission.MANAGE_EXTERNAL_STORAGE'), TAndroidHelper.Context.getPackageName()) = TJPackageManager.JavaClass.PERMISSION_GRANTED) or (TJEnvironment.JavaClass.isExternalStorageManager); if not optPermission then begin var Intent: JIntent; Intent := TJIntent.JavaClass.init; Intent.setAction(StringToJString('android.settings.MANAGE_APP_ALL_FILES_ACCESS_PERMISSION')); Intent.setData(TJnet_Uri.JavaClass.fromParts(StringToJString('package'), TAndroidHelper.Context.getPackageName(), nil)); if intent.resolveActivity(TAndroidHelper.Context.getPackageManager) <> nil then TAndroidHelper.Activity.startActivity(Intent); end; end else PermissionsService.RequestPermissions( [ JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE), JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE) ], nil); end;

Здравствуйте! Есть следующая проблема с компонентом PrintDialog в приложении FireMonkey FMX в C++Builder 10.4. При попытке ввода количества копий в окне PrintDialog свойство PrintDialog->Copies не меняется. То есть, я пытаюсь записать значение свойства PrintDialog->Copies в переменную. В результате я всегда получаю начальное значение свойства, которое было задано в режиме DesignTime. Например, значение свойства Copies равно 10 (в DesignTime). Я ввел 4 в поле "Копии" окна PrintDialog в режиме RunTime. Мой код: int cnt = 0; if (! PrintDialog1- > Execute ()) return; cnt = PrintDialog1- > Копии; ShowMessage (IntToStr (cnt)); Сообщение всегда показывает мне значение 10. Всегда. IDE: Embarcadero C++ Builder 10.4. ОС: Windows 7 x64. Интересно, что тот же код на Delphi работает как надо! Странно, что не получилось найти в сети описания похожей ситуации. Пожалуйста, помогите мне решить эту проблему?...

Возобновлю ветку. После обновления на Андроид 14 приведенные здесь способы перестали работать. Настройки стали "неактивны". Кто-нибудь решил такую проблему?

Спасибо!

в каждую конфигурацию можно прописать набор CONDITIONAL DEFINES и в коде использовать IFDEF

Всем доброго здоровья! Есть необходимость менять исходный компилируемый код в зависимости от текущей конфигурации сборки (Build Configurations). Сейчас их две: debug и release. Например, для исключения поиска утечек памяти в конфигурации release (ReportMemoryLeaksOnShutdown := False). Как можно узнать текущую конфигурацию сборки в исходном коде?

Черт дёрнул меня обновить систему на Galaxy Tab A9 SM-X110. После этого программа с клиентом FireBird прекратила работать. Проверял на 11 и 12 delphi - программа загружается, но как только делаешь вызов Connect из FireDac 10.3 - сразу segmentation fault 6. Думал - разрешений не хватает - устанавливаю. Не помогает. Пробовал статически скомпоновать клиент 5 версиии. Результат тот же. Библиотека клиента имеет правильную архитектуру и битность. На старой версии ( андроид 12) планшета все работает. Куда смотреть не подскажите?

Спасибо

Ага, ушло. В пустоту.. Статья о появлении в CTP осталась, но даже в истории CTP на странице https://www.devexpress.com/aboutus/pre-release.xml не упоминается нынче...