motofan logo
12 страниц V < 1 2 3 4 5 > »         
> 

Motovcl, New!!! Vcl For Delphi 7,9,10 - Ver 2.3.0 Alpha

n0wheremany
сообщение 27.10.2005, 15:30 Закрепленное сообщение!


Прогр@ммер
*****

Группа: Почётные мотофаны
Сообщений: 564
Регистрация: 10.9.2005
Пользователь №: 51 111

Рейтинг: 341



Изображение

MotoVCL - VCL для Delphi по АТ, P2K, USB (TrancFlash) и Flash режимам работы мототел

ВНИМАНИЕ!!! Эта тема только для програмистов в Delphi

Всегда Скачать последню версию мона Здесь.
Если недоступна, то из подписи... или через ЛС

Всё что вам известно про форматы команд или с предложениями пишите ЗДЕСЬ или в ЛС

Последняя версия 2.3.0 Alpha

Устанавливается на:
Delphi 7, Delphi 2005(9), Delphi 2006(10)

Возможности:

Поддержка:
* LTE, LTE2 - в основном всех мототелефонов

Список компонентов:
* TMotoATMode - Компонент для работы с телефоном в режиме АТ
* TMotoP2KMode - Компонент для работы с телефоном в режиме P2K
* TMotoUSBMode - Компонент для работы с телефоном в режиме USB (Карта памяти)
* TMotoFlashMode - Компонент для работы с телефоном в Flash режиме

Оснвные отличия:
* Единственная в мире smile.gif
* Одновременная работа с несколькими устройствами

Текущие возможности TMotoATMode
* Поиск устройств
* Переключение в P2K, USB режим
* Выключение, блокировка телефона
* Отправка, приём АТ команд

Текущие возможности компонента TMotoP2KMode
* Поиск устройств
* Переключение в АТ, Flash, Suspend Режимы
* Выключение, перезагрузка телефна
* Поиск файлов по маске, Удаление файлов, Копирование файлов в телефон и из телефона
* Чтение, запись Seem
* Нажатие клавиш в телефоне
* Работа с камерой телефона (сделать снимок разного формата)
* Контроль аудио (вкл/выкл параметров)
* Получение обширной информации о телефоне (Модель, Flex, PDS, IMEI, IMSI, Ключи блокировок, Платформы, DSP, Hardware, LangID, Release, GPS Chipset и ещё 32 инфы)

Текущие возможности TMotoUSBMode
* Поиск устройств
* Некоторая дополнительная информация по устройству
* Переключение в АТ, P2K и USB режим

Текущие возможности TMotoFlashMode
* Работа через LiibUsb или P2KSys
* Поиск устройств
* Перезагрузка, Выключение
* Заливка загрузчика
* Создание Backup
* Очистка памяти
* Прошивание BIN, SMG файлов
* Отправка, приём команд
* Получение модели, имени флекса, IMEI телефона и версии бута

дополнительно:
* Список дополнительных файлов в архиве
** \Ldr\LdrTools.exe - программа для генерирования загрузчика с выбранными адресами для прошивки. Имеет возможность просматривать кодовые группы для разных платформ
** \Ldr\ShxExtract - программа для извлечения из SHX бинарных файлов
** \Demo\ - папка демо файлов по всем компонентам, позволяющие оценить работу и возможности компонентов

Ни за правильную или не правильную работу компонентов ответстенности не несу. Вы используете эти компоненты на свой страх и риск


Исправление багов
* В демо "P2KSeem" нашёл и исправил V360. Данный баг является критичным для этой демки.

Чтобы узнать историю добавлений, возможности прочитайте ReadME.

Сообщение отредактировал n0wheremany - 25.10.2012, 10:08
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Serg c650
сообщение 29.4.2006, 6:15


Поэт?!
*****

Группа: Пользователи
Сообщений: 319
Регистрация: 26.10.2005
Пользователь №: 55 954
Модель телефона: Fly-Ying F003

Рейтинг: 87



Цитата
Если камера то есть. В флеш режиме - бэкап - тоже есть... Чёта я не пойму чего надо?

Надо чтоб на компе было видно то шо мы видим на видоискателе камеры!

n0wheremany
Это невозможно. Только посредством снимка

Сообщение отредактировал n0wheremany - 26.10.2007, 13:41
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
n0wheremany
сообщение 15.5.2006, 6:15


Прогр@ммер
*****

Группа: Почётные мотофаны
Сообщений: 564
Регистрация: 10.9.2005
Пользователь №: 51 111

Рейтинг: 341



Новая версия компонентов 2.2.1

Обновления касаются флеш режима:
* Возможность прошивки телефона BIN файлами
* Стирание памяти
* Показывание некоторой инфы.

Для стирания нужного диапазона памяти необходимо использовать программу LDR\ldrtolls.exe которая генерирует выбранные адреса памяти. загрузчик вшит в программу. Используется загрузчик от вилко.

Как пользоваться LdrTools:
1. Запускаем программу
2. Выбираем платформу телефона
3. Выбираем диапазон памяти
4. Сохраняем на диск.

Далее идёт заливка загрузчика и работа с ним
Скриншот LdrTools прилагается
Прикрепленное изображение
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Serg c650
сообщение 17.5.2006, 14:56


Поэт?!
*****

Группа: Пользователи
Сообщений: 319
Регистрация: 26.10.2005
Пользователь №: 55 954
Модель телефона: Fly-Ying F003

Рейтинг: 87



Пишу в своей проге так:
Код
function Progress:boolean;
begin
 Result:=true;
 Application.ProcessMessages;
end;

var item : TMotoP2KModemItem;
   TelFile:TP2KFile;
begin
item := MotoP2KMode1.DeviseList.Items[0];
if item=nil then exit;
item.FileDownload('/a/mobile/picture/sergfoto.jpg','C:\sergfoto.jpg',4000,TelFile.Size,@Progress);
sleep(30000);
item.FileDelete('/a/mobile/picture/sergfoto.jpg');


Но при нажатии кнопки (в неё забит код) через секунду вылетает непонятное окно и сообщени. Подскажите что делать. Наверное ошибка в коде evil_zloi;
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
n0wheremany
сообщение 18.5.2006, 13:25


Прогр@ммер
*****

Группа: Почётные мотофаны
Сообщений: 564
Регистрация: 10.9.2005
Пользователь №: 51 111

Рейтинг: 341



Цитата
Причём тут демки. Мне нато чтоб при нажатии на кнопку скачивался нужный файл и после скачки удалялся!


Ну так если в демке копируется файл, то и у тебядолжен копироваться. Вообще мона сделать так

Код
function Progress:boolean;
begin
Result:=true;
Application.ProcessMessages;
end;

var item : TMotoP2KModemItem;
  TelFile:TP2KFile;
begin
item := MotoP2KMode1.DeviseList.Items[0];
if item=nil then exit;
item.open;
if item.isopened then begin
item.FileDownload('/a/mobile/picture/sergfoto.jpg','C:\sergfoto.jpg',4000,TelFile.Size,@Progress);
sleep(30000); // Это мона убрать.
item.FileDelete('/a/mobile/picture/sergfoto.jpg');
end;
item.close;
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Serg c650
сообщение 18.5.2006, 14:10


Поэт?!
*****

Группа: Пользователи
Сообщений: 319
Регистрация: 26.10.2005
Пользователь №: 55 954
Модель телефона: Fly-Ying F003

Рейтинг: 87



Код
TelFile.Size

По всей видимости он не правильный (т. к. скачивается около 4 кб и всё).
Помогите как правильней будет определить размер данного файла.
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
n0wheremany
сообщение 18.5.2006, 14:20


Прогр@ммер
*****

Группа: Почётные мотофаны
Сообщений: 564
Регистрация: 10.9.2005
Пользователь №: 51 111

Рейтинг: 341



Цитата
По всей видимости он не правильный (т. к. скачивается около 4 кб и всё).
Помогите как правильней будет определить размер данного файла.


item.FileDownload('/a/mobile/picture/sergfoto.jpg','C:\sergfoto.jpg',4000,SizeFile,@Progress);

SizeFile - этот параметр нужен только для прогресса. Можешь поставить в 0. Так проще будет. Вроде в реадме написал об этом blink.gif

Нормально определить размер файла можно только найти его FIleClount + FileList
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Serg c650
сообщение 18.5.2006, 14:44


Поэт?!
*****

Группа: Пользователи
Сообщений: 319
Регистрация: 26.10.2005
Пользователь №: 55 954
Модель телефона: Fly-Ying F003

Рейтинг: 87



Да с файл-листом всё проще! :)

Цитата
SizeFile - этот параметр нужен только для прогресса. Можешь поставить в 0. Так проще будет. Вроде в реадме написал об этом


Нет в ReadMe этого нет напиши поподробнее. И от куда ты берёш SizeFile или если это переменная то какого типа?

Сообщение отредактировал Serg c650 - 18.5.2006, 16:03
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
n0wheremany
сообщение 19.5.2006, 8:40


Прогр@ммер
*****

Группа: Почётные мотофаны
Сообщений: 564
Регистрация: 10.9.2005
Пользователь №: 51 111

Рейтинг: 341



Цитата
Нет в ReadMe этого нет напиши поподробнее. И от куда ты берёш SizeFile или если это переменная то какого типа?


Обычный integer. Беру из списка фалов - там размер тоже указан.

Оннужен для прогресса: Progress(Val,Max:integer); Max - Это и есть SizeFile.

Если SizeFile не 0 и меньше реального размера, то скачается SizeFile.
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
MotoRavlic
сообщение 19.5.2006, 12:32


Опытный
***

Группа: Пользователи
Сообщений: 101
Регистрация: 19.4.2006
Из: Киев
Пользователь №: 79 558
Модель телефона: Z6
Прошивка: ProEvo_2.0

Рейтинг: 8.5



n0wheremany в проге Р2Кекшн от СергС650
короче такая фигня
если отключить подсветку клавы, то тухнет все,
а если после этого вкл. дисплей, то он горит не выключаясь.
ТЕЛО С380

в идеале хотелось бы отключить подсветку клавы, а дисплей чтобы работал в обычном режиме
после перезагрузки все восстанавливаеться
реально ли такое сделать?

просто ковырять тело неохота, а при чтении книг клава ресурс жрет нипадецки

n0wheremany
Такое сделать не реально...

Сообщение отредактировал n0wheremany - 26.10.2007, 13:50
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Serg c650
сообщение 20.5.2006, 1:32


Поэт?!
*****

Группа: Пользователи
Сообщений: 319
Регистрация: 26.10.2005
Пользователь №: 55 954
Модель телефона: Fly-Ying F003

Рейтинг: 87



Задалбал флуд-контроль, вчера вечером ни в одной теме написать ни чё не мог.

n0wheremany до меня уже дошло :) . Опять трабл в коде:
Код

var item : TMotoP2KModemItem;
     s:string;
begin
item := MotoP2KMode1.DeviseList.Items[0];
if item=nil then exit;
s:=TimeToStr(Time);
item.CameraFoto('/a/mobile/picture/sergfoto'+s+'.jpg');


Видоискатель замерает как буд-то фоткает и спокойно деинициализируется (кадр на экране остаётся). Заходишь в картинки, но там этой фотки нет! Внимание вопрос: ЧЁ ДЕЛАТЬ?

n0wheremany плюсы будут, просто раз в 30 дней разрешается!
Юзер вышелВ друзьяВизиткаП/Я
К началу страницы
+Ответить
Motovcl, New!!! Vcl For Delphi 7,9,10 - Ver 2.3.0 Alpha · Ломаем и строим! · Forum
 

12 страниц V < 1 2 3 4 5 > » 
Ответ в темуСоздание новой темы
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



Текстовая версия Сейчас: 28.3.2024, 10:22

Форум живёт: