Bonjour à tous

Laz4Andoid
Normalement la 'procedure TAndroidModule1.OnFileSelected(const FileName: string);'
devrait être lancé automatiquement après
'Self.RequestOpenFile(Self.GetEnvironmentDirectoryPath(dirDownloads), 'text/plain', 111);'

mais la procédure OnFileSelected n'est pas lancée.

Mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
procedure TAndroidModule1.Button1Click(Sender: TObject);
begin
Self.RequestOpenFile(Self.GetEnvironmentDirectoryPath(dirDownloads), 'text/plain', 111);
end;
 
procedure TAndroidModule1.OnFileSelected(const FileName: string);
var
  FileStream: TFileStream;
  FileContent: TStringStream;
begin
  showmessage('filename');
  FileStream := TFileStream.Create(FileName, fmOpenRead);
  try
    FileContent := TStringStream.Create('');
    FileContent.LoadFromStream(FileStream);
     showmessage(inttostr(filecontent.Size));
    jEditText1.Text:= FileContent.DataString;
  finally
    FileStream.Free;
  end;
end;