Doordat ik met diverse problemen bezig ben met deze omschakeling ben ik op dit moment het overzicht kwijt, maar nu even dit probleem:
Code:
//Toestemming: Opslag / Bestanden
procedure TForm1.Toestemming_1();
begin
PermissionsService.RequestPermissions
([JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE),
JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE)],
procedure(const APermissions: TClassicStringDynArray; const AGrantResults: TClassicStringDynArray<TClassicPermissionStatusDynArray>)
begin
if (Length(AGrantResults) = 2) and
(AGrantResults[0] = TClassicPermissionStatusDynArray.Granted) and
(AGrantResults[1] = TClassicPermissionStatusDynArray.Granted) then
begin
// Er is Toesteming
//Toestemming_2(); //De Volgende Toestemming Vragen
App_Start();
end
else
begin
// Er is Geen Toesteming
MessageDlg('Deze App kan niet werken Zonder toegang tot de Bestanden.' + #13#10 +
'Als deze keuze niet meer verschijnt:' + #13#10 +
'-Instellingen' + #13#10 +
'-Apps' + #13#10 +
'-Zoek deze App' + #13#10 +
'-Rechten/Machtigingen' + #13#10 +
'-Opslag/Bestanden Aanzetten' + #13#10 +
'Of Verwijder de App en Installeer deze opnieuw !' + #13#10 +
#13#10 +
'App Afsluiten ?', TMsgDlgType.mtConfirmation,
[TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], 0,
procedure(const AResult: TModalResult)
begin
if AResult = mrYes then
begin
Application.Terminate; //App Afsluiten
Exit;
end
else
Toestemming_1(); //Nogmaals Toestemming Vragen
end);
end;
end);
end;
Geeft:
[DCC Error] Unit1.pas(213): E2003 Undeclared identifier: 'TClassicStringDynArray<>'
[DCC Error] Unit1.pas(215): E2008 Incompatible types
[DCC Error] Unit1.pas(216): E2412 CREATE expected
[DCC Warning] Unit1.pas(216): W1023 Comparing signed and unsigned types - widened both operands
[DCC Error] Unit1.pas(216): E2015 Operator not applicable to this operand type
[DCC Error] Unit1.pas(217): E2412 CREATE expected
[DCC Warning] Unit1.pas(217): W1023 Comparing signed and unsigned types - widened both operands
[DCC Error] Unit1.pas(217): E2015 Operator not applicable to this operand type
[DCC Error] Unit1.pas(246): E2250 There is no overloaded version of 'MessageDlg' that can be called with these arguments
[DCC Warning] Unit1.pas(246): W1000 Symbol 'MessageDlg' is deprecated: 'Use FMX.DialogService methods'
[DCC Error] Unit1.pas(249): E2250 There is no overloaded version of 'RequestPermissions' that can be called with these arguments
[DCC Fatal Error] Leeg.dpr(6): F2063 Could not compile used unit 'Unit1.pas'
Voorheen kon ik hierna een bestand inlezen of weg schrijven, maar dat wil nu dus niet meer:
Code:
Memo1.Lines.LoadFromFile( Path + '/Data/Plaatsen.txt' );
Memo1.Lines.SaveToFile( Path + '/Data/Plaatsen.txt' );
Bookmarks