-
Постов
414 -
Зарегистрирован
-
Посещение
-
Победитель дней
12
Активность репутации
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в TBitmap -> TJPEGImage и TgifImage
модули Jpeg, PngImg (для gif не помню как называется), там есть нужные классы
-
Pax Beach получил реакцию от Kitty в Seattle Android Ошибка exited with code 1
Как понять «нашел»?
А Android Tools не дает скачать нужную версию SDK?
-
Pax Beach отреагировална enatechno в TBitmap -> TJPEGImage и TgifImage
Для конвертации можете использовать TBitmapCodecManager. Например, так я его использую для сохранения файлов в различном формате:
var aExtention, aFileName: string; aFileStream: TFileStream; aSaveParams: TBitmapCodecSaveParams; aSurf: TBitmapSurface; aBitmap: TBitmap ..... aFileStream := TFileStream.Create(aFileName, fmCreate); try aSurf := TBitmapSurface.Create(); try aSurf.Assign(aBitmap); aSaveParams.Quality := 70; TBitmapCodecManager.SaveToStream(aFileStream, aSurf, aExtention, @aSaveParams); finally FreeAndNil(aSurf); end; finally FreeAndNil(aFileStream); end; Для сохранения jpg использую aExtention='.jpg' и т.д.
И почему Вы используете TJPEGImage и TgifImage? Они разве есть в FMX? TImage.Bitmap читается из файла так:
var aImage: TImage; aFileName: string; ... aImage.Bitmap.LoadFromFile(aFileName);
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в TBitmap -> TJPEGImage и TgifImage
TBitmap это общий класс для работы с картинками, он всеядный
Это не VCL где нужно подбирать класс под расширение файла
-
Pax Beach получил реакцию от Rusland в Зависимость от регистра русских символов при использовании LIKE
Я говорю про все диалекты SQL. Когда идет речь о том, что не работает сравнение в where или like, нужно смотреть настройки кодировки на сервере и в строке соединения.
UPD:
Прочитал, что есть проблема сортировки в SQLite. Проверил — есть, и LIKE, и ORDER BY. Прочитал ответ разработчиков — подход порадовал.
Потребуется воспользоваться функцией sqlite3_create_collation (есть в компонентах FireDAC, UniDAC, модуле RTL\System.Sqlite.pas). Я нашел пример только на C.
Может у Вас получится воспользоваться — будем рады посмотреть пример.
-
Pax Beach отреагировална Steepe_Hare в Другая система координат?
Объясните, пожалуйста, почему этот простой код работает по-разному в Win32 и на Андроиде? Картинка 150x200 в битмап уже загружена и нужно ее расчертить.
Image1.Bitmap.Canvas.BeginScene; try Image1.Bitmap.Canvas.Stroke.Kind := TBrushKind.Solid; Image1.Bitmap.Canvas.Stroke.Color := TAlphaColors.Blue; for I := 0 to 9 do Image1.Bitmap.Canvas.DrawLine(TPointF.Create(I * 15, 0), TPointF.Create(I * 15, Image1.Bitmap.Height), 1); for J := 0 to 9 do Image1.Bitmap.Canvas.DrawLine(TPointF.Create(0, J * 20), TPointF.Create(Image1.Bitmap.Width, J * 20), 1); finally Image1.Bitmap.Canvas.EndScene; end; Под Виндой создается точная сетка 10x10, а под Андроид как будто другая система координат и территория делится на огромные квадраты (больше, чем надо).
-
Pax Beach отреагировална 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 (но тут хоть ИОС есть). -
Pax Beach отреагировална Равиль Зарипов (ZuBy) в анимация батарейки с управлением "уровня заряда"
ответ: можно
P.S. несколько раз прочитал, не понял о чем
-
Pax Beach отреагировална Brovin Yaroslav в TBitmap и экономия памяти
Не знаю, кто пишет примеры в студию Но иногда сам удивляюсь... Мы, конечно, иногда сами делаем примеры, но их не так много.
P.S. Opacity в FMX всегда было от 0 до 1
-
Pax Beach получил реакцию от Brovin Yaroslav в TBitmap и экономия памяти
В FMX Opacity всегда от 0 до 1. Не верьте безоговорочно примерам Студии, они не актуальные.
-
Pax Beach получил реакцию от dnekrasov в TBitmap и экономия памяти
В FMX Opacity всегда от 0 до 1. Не верьте безоговорочно примерам Студии, они не актуальные.
-
Pax Beach получил реакцию от Равиль Зарипов (ZuBy) в Проверить наличие интернета
Вот теперь верю )
Спасибо, то что нужно!
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в TMapView не работает с IOS
думаю как-то так
function CheckInternet2: boolean; // uses System.Net.HttpClient, System.Net.HttpClientComponent var Resp: IHTTPResponse; begin Result := false; with TNetHTTPClient.Create(nil) do begin try Resp := Head('http://google.com'); Result := Resp.StatusCode < 400; except Result := false; end; Free; end; end; метод HEAD
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в Проверить наличие интернета
"ОН" - метод средствами апи
посмотрите DeviceInfo там реализовано для Android и Windows
для IOS нет нужных интерфейсов. сделать можно, но времени нет этим заниматься
-
Pax Beach получил реакцию от Равиль Зарипов (ZuBy) в TBitmap и экономия памяти
В FMX Opacity всегда от 0 до 1. Не верьте безоговорочно примерам Студии, они не актуальные.
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в Вес исполняемого файла.
смиритесь, это RAD! Хотите чтобы меньше весило используйте нативные инструменты разработки.
Android Studio, XCode
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в RAD Berlin Upd1 & XCode
xcode 8 и новый paserver все пучком
-
Pax Beach получил реакцию от Kitty в Seattle Android Ошибка exited with code 1
Не могу сейчас найти. Хотите — верьте, хотите — проверьте, на прошлой неделе, буквально, читал во глубинах developer.android.com, что SDK 23 пока самый работоспособный релиз. Наверное имелся ввиду 23.3, этой версией пользуюсь.
С более поздними версиями были аналогичные проблемы, описанные в топике.
-
Pax Beach получил реакцию от Прикладной в Seattle Android Ошибка exited with code 1
Не могу сейчас найти. Хотите — верьте, хотите — проверьте, на прошлой неделе, буквально, читал во глубинах developer.android.com, что SDK 23 пока самый работоспособный релиз. Наверное имелся ввиду 23.3, этой версией пользуюсь.
С более поздними версиями были аналогичные проблемы, описанные в топике.
-
Pax Beach получил реакцию от Rusland в TBitmap и экономия памяти
В FMX Opacity всегда от 0 до 1. Не верьте безоговорочно примерам Студии, они не актуальные.
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в [TListView] Как отловить нажатие на картинку в TListView?
procedure TForm1.lvMainItemClickEx(const Sender: TObject; ItemIndex: Integer; const LocalClickPos: TPointF; const ItemObject: TListItemDrawable); begin if ItemObject is TListItemImage then ShowMessage(lvMain.Items[ItemIndex].Data['DateText'].AsString); end;
-
Pax Beach отреагировална Равиль Зарипов (ZuBy) в TBitmap и экономия памяти
TRectF - не является классом, у него нет конструктора. Create используется чисто синтаксически.
-
Pax Beach получил реакцию от Andrey Efimov в Методы шифрования delphi
Для каких задач нужно шифрование?
Если нужно шифровать текст для передачи по сети, то с этим справятся DataSnap и Indy.
А если файлы шифровать, и чтобы работало на всех платформах, возьмите открытый код стандартных методов шифрования AES, RSA, DES и т.п. Например, здесь, и используйте в своем проекте.
Конечно, давно пора это дело причесать под XE и Berlin и выложить для сообщества. Только не забываете про различие UNIX и Windows нумерации символов в String.
-
Pax Beach получил реакцию от Равиль Зарипов (ZuBy) в TBeacon. CASE: Использование маячков для контроля расхода электроэнергии
Для расчета расстояния мы работаем с событием onCalculateDistances. Параметр var NewDistance: Double.
Выдается некое абстрактное дробное число, которое опытным путем можно перевести в метры.
Сейчас разбираемся с BeaconFence, скачал из GetIt PM, есть желание визуализировать местонахождение маячков, по типу локатора.
UPD:
Расчет расстояния получаем по такой формуле: пруфлинк1, пруфлинк2, пруфлинк3, пруфлинк4.
function TfmMain.GetDistance(const ATxPower, ARssi: Integer): Double; begin if ARssi = 0 then Result := -1; // Невозможно определить расстояние if (ARssi / ATxPower < 1) then Result := power(ARssi / ATxPower, 10) else Result := 0.89976 * power(ARssi / ATxPower, 7.7095) + 0.111; end;
-
Pax Beach отреагировална Rusland в PowerOff - пример приложения с гибким интерфейсом(flexible interface)
Для этого нужны root-права