Олег Киреев

Вопрос решился открытием разрешения "Память" приложению на телефоне.

Приложение для получения информации расчётным путём об углах:
- вертикальной плоскости;
- в горизонтальной плоскости;
- объёмный;
- эквивалентный
 в шарнирах карданных валов на
основе сделанных замеров на собранном автобусе, троллейбусе, грузовике.
Может пригодиться работникам сервисных служб, лицам эксплуатирующим грузовую или
пассажирскую автомобильные техники, лицам не конструкторских служб. 
Особенно в случае нахождения в месте недоступном к интернету и компьютеру.
Работает на устройствах под OS Android.
Существует и более расширенная версия для OS Windows.
Пожалуйста, с предложениями и пожеланиями обращайтесь к разработчику:
Кирееву Олегу по тел. +375 29 676 13 84 или пишите на kireevoleg1966@gmail.com.
 Буду рад Вашему любому отзыву.
 С Уважением.
 
 
 
 
 
 
 
 
 
 
 
 
UgolKardZamer_v5.rar

Приложение для получения информации расчётным путём об углах:
- вертикальной плоскости;
- в горизонтальной плоскости;
- объёмный;
- эквивалентный
 в шарнирах карданных валов на
основе сделанных замеров на собранном автобусе, троллейбусе, грузовике.
Может пригодиться работникам сервисных служб, лицам эксплуатирующим грузовую или
пассажирскую автомобильные техники, лицам не конструкторских служб. 
Особенно в случае нахождения в месте недоступном к интернету и компьютеру.
Работает на устройствах под OS Android.
Существует и более расширенная версия для OS Windows.
Пожалуйста, с предложениями и пожеланиями обращайтесь к разработчику:
Кирееву Олегу по тел. +375 29 676 13 84 или пишите на kireevoleg1966@gmail.com.
 Буду рад Вашему любому отзыву.
 С Уважением.
 
 
 
 
 
 
 
 
 
 
 
 
UgolKardZamer_v5.rar

Приложение для получения информации расчётным путём об углах:
- вертикальной плоскости;
- в горизонтальной плоскости;
- объёмный;
- эквивалентный
 в шарнирах карданных валов на
основе сделанных замеров на собранном автобусе, троллейбусе, грузовике.
Может пригодиться работникам сервисных служб, лицам эксплуатирующим грузовую или
пассажирскую автомобильные техники, лицам не конструкторских служб. 
Особенно в случае нахождения в месте недоступном к интернету и компьютеру.
Работает на устройствах под OS Android.
Существует и более расширенная версия для OS Windows.
Пожалуйста, с предложениями и пожеланиями обращайтесь к разработчику:
Кирееву Олегу по тел. +375 29 676 13 84 или пишите на kireevoleg1966@gmail.com.
 Буду рад Вашему любому отзыву.
 С Уважением.
 
 
 
 
 
 
 
 
 
 
 
 
UgolKardZamer_v5.rar

Здравствуйте.
Предлагаю вместо родной 3D библиотеки установить бесплатную GLScene. Ссылок скачиваний море. Я пользуюсь давно. Конечно не идеал но лучше родной.
С Уважением. Олег.

Я делаю так:
1.Создаю файл базы (БД) например для Виндовс Acces (пример моего в приложении).
2.Создаю файл TreeView.dat.
3.Подключаюсь к БД.
4.Создаю нове ветки так:
//Ввести ветку
procedure TForm_Glavn.SpeedButton_vvod_vetkiClick(Sender: TObject);
begin
//проверка наличия текста в Едите
if Edit_Mame_Vetok.Text = '' then
 begin
 MessageDl.MessageDlg('Вы не ввели название ветки!', mtInformation,[mbYes],0);
 Abort;
 end;
TreeView1.Items. Add (TreeView1. Selected, Edit_Mame_Vetok.Text) ;
 //база
Query_Glav.Insert;
Query_Glav.FieldByName('Dat').AsString:=DateToStr(Now);
Query_Glav.FieldByName('Imya_vetok').AsString:=Edit_Mame_Vetok.Text;
Query_Glav.FieldByName('Opisanie').AsString:=Memo_opisanie.Text;
Query_Glav.Post;
//сохраняем дерево
F := TFileStream.Create(Base+'\Data\TreeView.dat', fmCreate or fmShareCompat);
   try
     F.WriteComponent(TreeView1);
       finally
     F.Free;
   end;
Edit_Mame_Vetok.Text:='';
end;
5.Создаю подветки так:
//Ввести подветку
procedure TForm_Glavn.SpeedButton_vvod_podvetkiClick(Sender: TObject);
begin
if TreeView1.Selected = nil then
   begin
   MessageDl.MessageDlg('Вы не выбрали в какой ветке делаем подветку!', mtInformation,[mbYes],0);
   Exit; //если не выбрана ветка выходим
   end;
//проверка наличия текста в Едите
if Edit_Mame_Vetok.Text = '' then
 begin
 MessageDl.MessageDlg('Вы не ввели название ветки!', mtInformation,[mbYes],0);
 Abort;
 end;
 TreeView1.Items.AddChild (TreeView1. Selected, Edit_Mame_Vetok.Text);
 //база
Query_Glav.Insert;
Query_Glav.FieldByName('Dat').AsString:=DateToStr(Now);
Query_Glav.FieldByName('Imya_vetok').AsString:=Edit_Mame_Vetok.Text;
Query_Glav.FieldByName('Opisanie').AsString:=Memo_opisanie.Text;
Query_Glav.Post;
//сохраняем дерево
F := TFileStream.Create(Base+'\Data\TreeView.dat', fmCreate or fmShareCompat);
   try
     F.WriteComponent(TreeView1);
       finally
     F.Free;
   end;
Edit_Mame_Vetok.Text:='';
end;
6.Прикрепляю файл так:
// Прикрепить файл
procedure TForm_Glavn.SpeedButton_FileClick(Sender: TObject);
var
 IconStream:TMemoryStream;
begin
if TreeView1.Selected = nil then
   begin
   MessageDl.MessageDlg('Вы не выбрали в какой ветке делаем подветку!', mtInformation,[mbYes],0);
   Exit; //если не выбрана ветка выходим
   end;
OpenDialog1.InitialDir:=Base;
if Opendialog1.Execute then
    begin
     //заносим файл в потоке
     SpeedButton_File.Caption:='Подождите......';
     Application.ProcessMessages;
     IconStream:=TMemoryStream.Create;
     IconStream.LoadFromFile(OpenDialog1.FileName);
     //становимся в невидимой таблице на указанной модели
     Query_Glav.Locate('Imya_vetok',Edit_Mame_Vetok.Text,[loPartialKey, loCaseInsensitive]);
     Query_Glav.Edit;
     if (ExtractFileExt(Opendialog1.FileName) = '.pdf')then Query_Glav.FieldByName('RashirenieFile').AsInteger:=3;
     if (ExtractFileExt(Opendialog1.FileName) = '.docx')then Query_Glav.FieldByName('RashirenieFile').AsInteger:=2;
     if (ExtractFileExt(Opendialog1.FileName) = '.jpg')then Query_Glav.FieldByName('RashirenieFile').AsInteger:=0;
     if (ExtractFileExt(Opendialog1.FileName) = '.rar')then Query_Glav.FieldByName('RashirenieFile').AsInteger:=1;
     (Query_Glav.FieldByName('File') as TBlobField).LoadFromStream(IconStream);
     IconStream.Free;
     Application.ProcessMessages;
     MessageDl.MessageDlg('Файл добавлен в базу!', mtInformation,[mbYes],0);
     SpeedButton_File.Caption:='    Прикрепить файл';
    end else MessageDl.MessageDlg('Ошибка ввода!', mtInformation,[mbYes],0);
end;
 7. Удаляю ветку или подветку так:
//Удалить ветку/ подветку
procedure TForm_Glavn.SpeedButton_DeleteClick(Sender: TObject);
begin
if TreeView1.Items.Count = 0 then //проверка наличия веток вообще
  begin
     MessageDl.MessageDlg('Так нет же веток!', mtInformation,[mbYes],0);
     Abort;
    end;
if TreeView1.Selected.HasChildren=True then //проверка наличия подветки
   begin
     MessageDl.MessageDlg('Сначала удалите подветку!', mtInformation,[mbYes],0);
     Image1.Refresh;
     Abort;
    end;
if TreeView1.Selected.HasChildren=False then //проверка наличия подветки
    begin
    SpeedButton_Delete.Caption:='Подождите.....';
    Application.ProcessMessages;
    //становимся в невидимой таблице на указанной ветке
    Query_Glav.Locate('Imya_vetok',TreeView1.Selected.Text,[loPartialKey, loCaseInsensitive]);
    if Query_Glav.FieldByName('Imya_vetok').AsString <> '' then Query_Glav.Delete;//удаляем в базе
    Application.ProcessMessages;
    TreeView1.Items.Delete(TreeView1.Selected); //удаляем в дереве
    Application.ProcessMessages;
    Image1.Refresh;
    Application.ProcessMessages;
    SpeedButton_Delete.Caption:=' Удалить ветку/ подветку';
    end;
//сохраняем дерево
F := TFileStream.Create(Base+'\Data\TreeView.dat', fmCreate or fmShareCompat);
   try
     F.WriteComponent(TreeView1);
       finally
     F.Free;
   end;
Edit_Mame_Vetok.Text:='';
end;

8. Переименовываю ветки так:
//Переименовать ветку/ подветку
procedure TForm_Glavn.SpeedButton3Click(Sender: TObject);
begin
//проверка наличия текста в Едите
if Edit_Mame_Vetok.Text = '' then
 begin
 MessageDl.MessageDlg('Вы не ввели название ветки!', mtInformation,[mbYes],0);
 Abort;
 end;
//становимся в невидимой таблице на указанной модели
     Query_Glav.Locate('Imya_vetok',TreeView1.Selected.Text,[loPartialKey, loCaseInsensitive]);
TreeView1.Selected.Text:=Edit_Mame_Vetok.Text;
//база
Query_Glav.Edit;
Query_Glav.FieldByName('Dat').AsString:=DateToStr(Now);
Query_Glav.FieldByName('Imya_vetok').AsString:=Edit_Mame_Vetok.Text;
Query_Glav.FieldByName('Opisanie').AsString:=Memo_opisanie.Text;
Query_Glav.Post;

//сохраняем дерево
F := TFileStream.Create(Base+'\Data\TreeView.dat', fmCreate or fmShareCompat);
   try
     F.WriteComponent(TreeView1);
       finally
     F.Free;
   end;
Edit_Mame_Vetok.Text:='';
end;

9.Открываю прикреплённый файл так:
// Открыть прикреплённый файл отдельно
procedure TForm_Glavn.SpeedButton4Click(Sender: TObject);
var
ImageData:TMemoryStream;
begin
if TreeView1.Selected = nil then
   begin
   MessageDl.MessageDlg('Вы не выбрали в какой ветке делаем подветку!', mtInformation,[mbYes],0);
   Exit; //если не выбрана ветка выходим
   end;
//становимся в невидимой таблице на указанной модели
    Query_Glav.Locate('Imya_vetok',Edit_Mame_Vetok.Text,[loPartialKey, loCaseInsensitive]);
ImageData:=TMemoryStream.Create;
(Query_Glav.FieldByName('File') as TBlobField).SaveToStream(ImageData);
ImageData.Position:=0;
if ImageData.Size<>0 then
 begin
 if Query_Glav.FieldByName('RashirenieFile').AsInteger=3 then Path:=Base+'\Temp\Dokument.pdf';
 if Query_Glav.FieldByName('RashirenieFile').AsInteger=2 then Path:=Base+'\Temp\Dokument.docx';
 if Query_Glav.FieldByName('RashirenieFile').AsInteger=0 then Path:=Base+'\Temp\Dokument.jpg';
 if Query_Glav.FieldByName('RashirenieFile').AsInteger=1 then Path:=Base+'\Temp\Dokument.rar';
 ImageData.SaveToFile(Path);
 ImageData.Free;
 ImageData:=nil;
 if FileExists(Path) then
  begin
  ShellExecute (0, 'open', pChar(Path), nil, nil, SW_SHOW);
  end else
        MessageDl.MessageDlg('Файл'+Path+' в папке Data не найден.', mtInformation,[mbYes],0);
 end else
        MessageDl.MessageDlg('В этой ветке документа нет.', mtInformation,[mbYes],0);
end;

Ознакомьтесь с FireDAC.Stan.Option.TFDFetchOptions.RecordCountMode.
И начните уже пользоваться поиском на форуме... Не один раз обсуждалась эта тема Показаны результаты для 'RecordCount'
 
p.s. Тему перенёс в подходящий раздел.

Олег, если файл деплоится в external, то путь к нему надо получать так:
TPath.Combine(TPath.GetSharedDocumentsPath, 'DB_BOKA.db3')

uses System.SysUtils, System.IOUtils, System.Permissions, System.Messaging, FMX.Dialogs; uses Androidapi.Helpers, Androidapi.JNI.Os, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI.JavaTypes, Androidapi.JNI.Webkit, Androidapi.JNI.Net, Androidapi.JNI.App, Androidapi.JNI.Support, FMX.Platform.Android; это потребуется

вот кусок кода "вырванный" из проекта (написано благодаря ссылке ярослава выше- спасибо):
MimeType = image/* - для картинок. если что не так, комментируйте.
type TDialog = class private FProc: TProc<string>; procedure ResultCallback(const Sender: TObject; const M: TMessage); public constructor Create; destructor Destroy; override; procedure Show(const MimeType: string; Proc: TProc<string>); end; constructor TDialog.Create; begin TMessageManager.DefaultManager.SubscribeToMessage(TMessageResultNotification, ResultCallback); end; destructor TDialog.Destroy; begin TMessageManager.DefaultManager.Unsubscribe(TMessageResultNotification, ResultCallback); end; procedure TDialog.ResultCallback(const Sender: TObject; const M: TMessage); var FilePath: string; begin if TMessageResultNotification(M).RequestCode = 5 then if TMessageResultNotification(M).ResultCode = TJActivity.JavaClass.RESULT_OK then begin FilePath:=JStringToString(TMessageResultNotification(M).Value.getData.getPath); FProc(FilePath); end; Free; end; procedure TDialog.Show(const MimeType: string; Proc: TProc<string>); var Intent: JIntent; begin FProc:=Proc; Intent:=TJIntent.Create; Intent.setAction(TJIntent.JavaClass.ACTION_PICK); Intent.setType(StringToJString(MimeType)); MainActivity.startActivityForResult(Intent,5); end; procedure OpenFileDialog(const MimeType: string; Proc: TProc<string>); begin RequestPermissionsExternalStorage( procedure(Granted: Boolean) begin if Granted then TDialog.Create.Show(MimeType,Proc); end); end;  

http://docwiki.embarcadero.com/RADStudio/Rio/en/Taking_and_Sharing_Pictures_and_Text_Using_Action_Lists

Это приложение:
 - помогает выбрать моменты затяжки 
 резьбовых соединений согласно СТБ 1879-2008;
 - помогает производить расчёт момента
 затяжки и усилия других резьб;
 - подсказывает моменты затяжки в детали
 пневмокомпонентов;
 - даёт возможность вставки результата в буфер
 обмена а далее например в AutoCAD.
 Использовался СТБ 1879-2008 и справочник
"Основы конструирования" под. ред. Орлова П.И.
том 2 страницы 174 и 131.
 Разработал: Олег Киреев.
    г. Минск.
   т. +375 29 676 13 84.
  kireevoleg1966@gmail.com
 Приму любые замечания и предложения.
 Последнее обновление 29.10.2019г.



Момент затяжки v.4.2.rar

Это приложение:
 - помогает выбрать моменты затяжки 
 резьбовых соединений согласно СТБ 1879-2008;
 - помогает производить расчёт момента
 затяжки и усилия других резьб;
 - подсказывает моменты затяжки в детали
 пневмокомпонентов;
 - даёт возможность вставки результата в буфер
 обмена а далее например в AutoCAD.
 Использовался СТБ 1879-2008 и справочник
"Основы конструирования" под. ред. Орлова П.И.
том 2 страницы 174 и 131.
 Разработал: Олег Киреев.
    г. Минск.
   т. +375 29 676 13 84.
  kireevoleg1966@gmail.com
 Приму любые замечания и предложения.
 Последнее обновление 29.10.2019г.



Момент затяжки v.4.2.rar

СпасиБО. Разместил по ссылке: https://mega.dp.ua/Qh4yz.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

Это приложение для OS Windows выполняет:
1.Расчёт сцепления:
-расчёт и подбор геометрических параметров нажимного и 
ведомого дисков, муфты выключения;
-проверка параметров по теплонагруженности пар трения;
-расчёт всех наиболее нагруженных деталей сцепления 
(пружины, пластины, подшипник).
2.Расчёт пневмогидравлического привода сцелпения:
-подбор и проверка управляющего и исполнительного 
органов;
-объём жидкости.
3.Возможность вноса и редактирования исходных данных и 
результатов в БД.
4.Распечатку всего расчёта с исходными данными, 
формулами, графиками, используемой литературой и 
результатами в MS Word.
5.Просмотр и изучение нажимного, ведомого дисков
и муфты выключения в 3D.
Изначально для работы в приложении необходимы 
некоторые
знания конструкции сцепления и теории расчёта.
 Автор: Олег Киреев-ведущий инженер-конструктор,
              kireevoleg1966@gmail.com, +375 29 676 13 84
              БЕЛАРУСЬ, г.Минск.
Приму Ваши замечания и предложения.
По совету Равиля Зарипова РАЗМЕСТИЛ на файлообменнике 12.08.2019г по этой: https://mega.dp.ua/a27WmeXKwY ссылке. На этом ресурсе обещают хранить 90 дней. Интересно услышать Ваши отзывы.

нужно удалить установленное приложение с телефона

Приложение для наглядного обучения работы некоторых механизмов автомобиля и автобуса.
Работает в OS Windows. Есть возможность записи процесса в формате
AVI. Можно изменять прозрачность и посмотреть что внутри.
СпасиБО EMBARCADERO!
Автор: Олег Киреев - ведущий инженер-конструктор.
             kireevoleg@gmail.by  тел. +375 29 676 13 84. 
             Республика Беларусь г.Минск.
3D Работа механизмов.rar

СпасиБО ребята за советы. Постараюсь учесть и прочитать.

Чувак!
Это же МАЗ!!!
Все должно быть брутально! ?

Уххх...  да...
Рекомендация. 
1. Уберите "вырви глаз" синий цвет шрифта.
2. Не используйте  Windows иконки. Смотрятся убого.
Это для начала...
Почитайте про Material Design. В сети информации полно.