Всем привет! Позвольте и эту тему апнуть
Не могу поверх фото текст наложить. Пробую так.
Как это необходимо делать верно?
AResult.Bitmap - приходит из CameraCapturePhotoReady(Sender: TObject; const AResult: TfgCameraCaptureResult);
filename := filename + strDate + '.png';
var B := AResult.Bitmap;
// B.Canvas.BeginPaint;
B.Canvas.Font.Size:= 50;
B.Canvas.Fill.Color := TAlphaColorRec.Red;
B.Canvas.Fill.Kind := TfgBrushKind.Solid;
// var mRect :=B.LogicalBounds;
// mRect.Width := mRect.Width - mRect.Width * 0.05;
// mRect.Height := mRect.Height - mRect.Height * 0.05;
B.Canvas.FillText(B.Bounds, DateTimeToStr(now) ,False, TfgHorizontalAlignment.Right, TfgVerticalAlignment.Bottom);
B.SaveToFile(filename);
// B.Canvas.EndPaint;
TfgAssetsManager.Current.AddBitmap('asset_' + mainf.md5(filename), B);