İyi günler.
Embarcadero® Delphi 10.1 Berlin Version 24.0.25048.9432
Embarcadero® Delphi 10.1 Update 2
Lisanslı programda ZXing barkod okuma programının kendi demolarını derlerken veya kendi denemelerinde kamera sdcard kullanmak istediğimde aynı hatayı veriyor.
Sitesinde Tokyo versiyonunda yüklü geldiği yazıyor.
[DCC Fatal Error] main.pas(31): F2613 Unit 'System.Permissions' not found.
Hatası alıyorum delphican ve google biraz araştırdım henüz çözüm bulamadım.
Project options permissions izinler verili.
Embarcadore sitesindeki
30850_rad_studio_10_files_permissions_patch işlemini yaptım ama hata devam ediyor.
RAD Studio 10 Files Permissions Patch
For RAD Studio 10.x, 10.1.x and 10.2.x installations performed with the GetIt web based installer
Merhaba.
- Main.Pas'ın 31 nolu satırında kullandığınız komutu yazabilir misiniz?
- Neden sordum ?! System.Permissions unitini kullanan bir kod satırıdır. Bunun kullandığınız delphi sürümündeki karşılığını söylemek için sordum.
- Hatayı kullanmak istediğiniz SD-CARD vb değil daha derleme aşamasında hata veriyor çünkü. Muhtemelen RIO'daki yeni android sürümlerine ilişkin "PermissionsService.IsPermissionGranted" gibi bir sorgu yapıyorsanız bu eski sürümlerde yoktu o bakımdan.
- Daha kodları görmeden if / def ile RIO'ya göre şöyle TOKYO'ya göre böyle demek durumunda kalacağınız bir direktif ihtiyacınız olacakmış gibi bir algı oluştu bende.
(03-02-2019, Saat: 13:06)mrmarman Adlı Kullanıcıdan Alıntı: [ -> ]Merhaba.
- Main.Pas'ın 31 nolu satırında kullandığınız komutu yazabilir misiniz?
- Neden sordum ?! System.Permissions unitini kullanan bir kod satırıdır. Bunun kullandığınız delphi sürümündeki karşılığını söylemek için sordum.
- Hatayı kullanmak istediğiniz SD-CARD vb değil daha derleme aşamasında hata veriyor çünkü. Muhtemelen RIO'daki yeni android sürümlerine ilişkin "PermissionsService.IsPermissionGranted" gibi bir sorgu yapıyorsanız bu eski sürümlerde yoktu o bakımdan.
- Daha kodları görmeden if / def ile RIO'ya göre şöyle TOKYO'ya göre böyle demek durumunda kalacağınız bir direktif ihtiyacınız olacakmış gibi bir algı oluştu bende.
Hocam ilginiz için Allah c.c razı olsun.
unit main;
{
* Copyright 2015 E Spelt for test project stuff
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
* Implemented by E. Spelt for Delphi
}
interface
uses
System.SysUtils,
System.Types,
System.UITypes,
System.Classes,
System.Variants,
System.Math.Vectors,
System.Actions,
System.Threading,
System.Permissions, // hata veren satır
FMX.Types,
FMX.Controls,
FMX.Forms,
FMX.Graphics,
FMX.Dialogs,
FMX.Objects,
FMX.StdCtrls,
FMX.Media,
FMX.Platform,
FMX.MultiView,
FMX.ListView.Types,
FMX.ListView,
FMX.Layouts,
FMX.ActnList,
FMX.TabControl,
FMX.ListBox,
FMX.Controls.Presentation,
FMX.ScrollBox,
FMX.Memo,
FMX.Controls3D,
ZXing.BarcodeFormat,
ZXing.ReadResult,
ZXing.ScanManager;
Bu linkten Compiler Version listesine bakabilirsiniz.
Kod:
Compiler CompilerVersion Defined Symbol
Delphi 10.3 Rio 33 VER330
Delphi 10.2 Tokyo 32 VER320
Delphi 10.1 Berlin 31 VER310
Delphi 10 Seattle 30 VER300
Delphi XE8 29 VER290
Delphi XE7 28 VER280
Delphi XE6 27 VER270
AppMethod 1 26.5 VER265
Delphi XE5 26 VER260
Delphi XE4 25 VER250
Delphi XE3 24 VER240
Delphi XE2 23 VER230
Delphi XE 22 VER220
Delphi 2010 21 VER210
Delphi 2009 20 VER200
Delphi 2007 .NET 19 VER190
Delphi 2007 18.5 VER185 (also VER180)
Delphi 2006 18 VER180
Delphi 2005 17 VER170
Delphi 8 .NET 16 VER160
Delphi 7 15 VER150
Delphi 6 14 VER140
Delphi 5 13(*) VER130
Delphi 4 12(*) VER120
Delphi 3 10(*) VER100
Delphi 2 9(*) VER90
Delphi 1 8(*) VER80
Siz şöyle yapacaksınız. Bu
System.Permissions RIO ile geldiğinden satırın üstüne ve altına ekleme yapacaksınız.
{$if CompilerVersion = 33}
// Delphi RIO
System.Permissions, // hata veren satır
{$ifend}
aşağıda da hata verecektir çünkü online Persmission sorgusunda da bu uniti kullanıyor olacaksınız, orada da bu iki direktif arasına alacaksınız.
(03-02-2019, Saat: 13:26)mrmarman Adlı Kullanıcıdan Alıntı: [ -> ]Bu linkten Compiler Version listesine bakabilirsiniz.
Kod:
Compiler CompilerVersion Defined Symbol
Delphi 10.3 Rio 33 VER330
Delphi 10.2 Tokyo 32 VER320
Delphi 10.1 Berlin 31 VER310
Delphi 10 Seattle 30 VER300
Delphi XE8 29 VER290
Delphi XE7 28 VER280
Delphi XE6 27 VER270
AppMethod 1 26.5 VER265
Delphi XE5 26 VER260
Delphi XE4 25 VER250
Delphi XE3 24 VER240
Delphi XE2 23 VER230
Delphi XE 22 VER220
Delphi 2010 21 VER210
Delphi 2009 20 VER200
Delphi 2007 .NET 19 VER190
Delphi 2007 18.5 VER185 (also VER180)
Delphi 2006 18 VER180
Delphi 2005 17 VER170
Delphi 8 .NET 16 VER160
Delphi 7 15 VER150
Delphi 6 14 VER140
Delphi 5 13(*) VER130
Delphi 4 12(*) VER120
Delphi 3 10(*) VER100
Delphi 2 9(*) VER90
Delphi 1 8(*) VER80
Siz şöyle yapacaksınız. Bu System.Permissions RIO ile geldiğinden satırın üstüne ve altına ekleme yapacaksınız.
{$if CompilerVersion = 33}
// Delphi RIO
System.Permissions, // hata veren satır
{$ifend}
aşağıda da hata verecektir çünkü online Persmission sorgusunda da bu uniti kullanıyor olacaksınız, orada da bu iki direktif arasına alacaksınız.
Emekleriniz için teşekkür ederim önerilerinizi deneyeceğim Allah c.c razı olsun.
