Перейти к содержанию
Fire Monkey от А до Я

azm_ezm_ivan

Пользователи
 Профиль  Обзор контента

  • Постов

    11

  • Зарегистрирован

  • Посещение

Активность репутации

  1. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Rusland в Как включать/отключать звук и вибрацию?   
    Ну и узнать режим звонка можно так:
    function GetRingerMode():integer; var AudioObj: JObject; Audio: JAudioManager; begin AudioObj:=SharedActivity.getSystemService(TJContext.JavaClass.AUDIO_SERVICE); Audio:=TJAudioManager.Wrap((AudioObj as ILocalObject).GetObjectID); Result:=Audio.getRingerMode; // 0 - silent, 1 - vibrate, 2 - normal end;
  2. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална rustam_d в Как узнать уровень заряда батареи (BatteryManager)   
    uses   AndroidAPI.Helpers,   AndroidAPI.JNI.GraphicsContentViewText;   type   TForm1 = class(TForm)     procedure FormCreate(Sender: TObject);   private     { Private declarations }   public     { Public declarations }     function BatteryPercent(const aContext: JContext): Integer;   end;   var   Form1: TForm1;   implementation   {$R *.fmx}   function TForm1.BatteryPercent(const aContext: JContext): Integer; var   filter: JIntentFilter;   battery: JIntent; begin   filter := TJIntentFilter.Create;   filter.addAction(TJIntent.JavaClass.ACTION_BATTERY_CHANGED);   battery := aContext.registerReceiver(NIL, filter);   result := battery.getIntExtra(StringToJString('level'), -1) end;   procedure TForm1.FormCreate(Sender: TObject); var   myContext: JContext; begin   myContext := SharedActivityContext;   Showmessage(BatteryPercent(myContext).ToString); end;   а еще по другим параметрам испанец круто обсосал тут http://neftali.clubdelphi.com/?p=3157 а если надо модель, серийный то это у вас на компе Delphi\Samples\Object Pascal\Mobile Snippets\DeviceInfo  (но тут хоть ИОС есть).
  3. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Равиль Зарипов (ZuBy) в Получить голос из микрофона потоками   
    видать я как-то неправильно выразился. скажу по другому.
    я не проверял на правильность этот код в делфи
    recorder := TJmediarecorder.JavaClass.init;
  4. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Rusland в Получить голос из микрофона потоками   
    Не, тут никто не знает... )
    Ну может так еще попробуете:
    recorder := TJMediaRecorder.Create;  
  5. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Pax Beach в Получить голос из микрофона потоками   
    ... или обычный TJMediaRecorder?
    Вот готовый пример записи микрофона в файл.
    Так не подойдет?
    А определение уровней звукозаписи для нормализации (normalization) — это обычно постпроцесс, выполняемый для всего файла записи.
     
  6. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Равиль Зарипов (ZuBy) в Получить голос из микрофона потоками   
    а где инициализация?
    recorder:Jmediarecorder;
  7. Like
    azm_ezm_ivan
    azm_ezm_ivan отреагировална Martifan в Получить голос из микрофона потоками   
    я может не увидел но где код как у вас написана если так старайтесь чтобы он играл то не получится ну не правильно но крайне случай используйте ваш таймер но это неправильно лучше через TTask
×
×
  • Создать...