Hallo zusammen
Ich versuche meine erste APP zu schreiben, dabei stoße ich schon am Anfang auf kleine Probleme.
Ich möchte eine App erstellen, womit ich nur ein Log schreibe.
Sprich, 2 Buttons, drücke ich auf OK wird in einer Datei das Datum und Zeit geschrieben.
Dazu brauche ich die Mobile Permission.
Hier hackt es leider.
Installiert Delphi 12.1 und Mobile Permission per "GetIT
Package Manage" installiert.
Mein Test-Code für die Permission (gefunden im Netz)
Delphi-Quellcode:
unit Unit2;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Memo.Types,
FMX.StdCtrls, FMX.Controls.Presentation, System.Permissions,
{$IFDEF ANDROID}
AndroidApi.Helpers, FMX.
Platform.Android,
Androidapi.JNI.Widget, FMX.Helpers.Android, Androidapi.JNI.Os,
{$ENDIF}
FMX.Edit, System.IOUtils;
type
TForm2 =
class(TForm)
procedure FormShow(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
{$IFDEF ANDROID}
PermissionWriteExternalStorage:
string;
{$ENDIF}
end;
var
Form2: TForm2;
implementation
{$R *.fmx}
procedure TForm2.FormShow(Sender: TObject);
begin
{$IFDEF ANDROID}
PermissionWriteExternalStorage := JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE);
PermissionsService.RequestPermissions([PermissionWriteExternalStorage],
procedure(
const APermissions: TArray<
string>;
const AGrantResults: TArray<TPermissionStatus>)
begin
if AGrantResults[0] = TPermissionStatus.Granted
then
ShowMessage('
Erlaubt')
else
ShowMessage('
Nicht erlaubt');
end)
{$ENDIF}
end;
end.
Ich bekomme diesen Fehler
[DCC Fehler] HeaderFooterTemplate.pas(51): E2250 Es gibt keine überladene Version von 'RequestPermissions', die man mit diesen Argumenten aufrufen kann
Testweise habe ich die Mobile Permission deinstalliert und eine ältere Version von GitHub installiert.
Das hat leider auch nicht funktioniert.
Kann mir jemand die Sache etwas erläutern? Bin nur ein Hobbycoder und mit Android habe ich noch nie zu tun gehabt.