지병철의 주저리 주저리

1. Permission 선택 2. Permission 코딩 하기 uses System.Permissions; var _PermissionReadExternalStorage: string; _PermissionWriteExternalStorage: string; procedure TfrmMain.FormCreate(Sender: TObject); begin {$IFDEF ANDROID} _PermissionReadExternalStorage := JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE); _PermissionWriteExternalStorage := JStringToString(TJManifest_permission.J..

* FMX에서 Image Control 1. 이미지 복사할때 : Bitmap.CopyFromBitmap 2. Thumbnail 만들때 : Bitmap.CreateThumbnail 3. Bitmap 초기 크기 할당: Bitmap.width=.. Bitmap.Height = ... 이미지를 내가 원하는 크기로 만들려면 CreateTumbnail 쓰면되고, 부분만 잘라서 쓰려면 CopyFromBitmap 하면 됨. 서비스에서 사용하려면 1. 캡처한 이미지를 적정한 크기로 만든 후 2. 정해진 크기로 잘라내어 저장한 후 3. 가져다 쓰면 됨 oRectangle := TRectangle.Create(self); oRectangle.Parent := self; oRectangle.Position.X := 100; ..

Custom Button 만드는 법 (Link)

Image1.Bitmap.Assign(nil);

Windows10 에서는 var WebBrowser1: TWebBrowser; WebBrowser1.Navigate('about:blank'); Android 에서는 빈화면의 html을 만들어 deployment 시킨 후, 앱 실행 중 TWebBrowser 에서 Loading 한다. html code delphi code procedure TfrmWeb.FormClose(Sender: TObject; var Action: TCloseAction); var fname: string; begin Image1.Bitmap.Assign(nil); fname := System.IOUtils.TPath.Combine(System.IOUtils.TPath.GetDocumentsPath, 'blank.html'); W..

procedure DoScan; const HeartRateService: TBluetoothUUID = '{0000180D-0000-1000-8000-00805F9B34FB}'; begin BluetoothLE1.DiscoverDevices(2500) // The parameter is the timeout in milliseconds. BluetoothLE1.DiscoverDevices(2500, [HRService]) // It only exposes devices with the Heart Rate service to the BluetoothLE client. end;

BAAS : Backend as a Service BAAS Client Provider : TParseProvider, TKinveyProvider TBackendStorage TBackendQuery TBackendPush TPushEvents TBackendUsers TBackendFiles TBackendEndpoint TBackendAuth TBackendGroups BAAS 샘플 https://www.youtube.com/watch?v=4UvZmGH430s EMS Server 와 BAAS 연동 EMSProvider BackendAuth, BackendGroups, BackendUsers BackendEndpoint, BackendQuery TBackendFiles Sample ( https://..

TWebBrowser 이용시 "https://" 로 이루어진 주소를 사용해야 되는데, "http://" 로 된 주소를 사용할 경우 발생하는 에러임 이런 경우는 간단히 AndroidManifest.template.xml 의 application 태크에 android:usesCleartextTraffic="true" 를 추가해 주면 됨

http://docwiki.embarcadero.com/RADStudio/Rio/en/Delphi_Data_Types_for_API_Integration Delphi Data Types for API Integration Integer Data TypesTypeDescriptionPointerByte8-bit unsigned integerPByteShortInt8-bit signed integerPShortIntWord16-bit unsigned integerPWordSmallInt16-bit signed integerPSmallIntCardinal32-bit unsigned integerPCardinalLongWord32-bit unsigned integer (32-b..

var Obj: TFmxObject; Rectangle1: TRectangle;begin Obj := FMemo.FindStyleResource('background'); if Obj nil then begin TControl(Obj).Margins := TBounds.Create(TRectF.Create(-2, -2, -2, -2)); Rectangle1 := TRectangle.Create(Obj); Obj.AddObject(Rectangle1); Rectangle1.Align := TAlignLayout.Client; Rectangle1.Fill.Color := TAlphaColorRec.Blue; Rectangle1.Stroke.Kind := TBrushKind.None; Rectangle1.Hi..