Skip to content

Commit b848936

Browse files
Updated commented-out image capture code based on FMX Services at BitmapImageStoryItemOptions
1 parent 1d80c5e commit b848936

File tree

4 files changed

+74
-66
lines changed

4 files changed

+74
-66
lines changed

App/READCOM.App.Globals.dfm

Lines changed: 52 additions & 52 deletions
Original file line numberDiff line numberDiff line change
@@ -68072,7 +68072,7 @@ object Globals: TGlobals
6807268072
item
6807368073
MultiResBitmap = <
6807468074
item
68075-
Size = 30
68075+
Size = 64
6807668076
end>
6807768077
IconName = 'Edit'
6807868078
SVGText =
@@ -68117,7 +68117,7 @@ object Globals: TGlobals
6811768117
item
6811868118
MultiResBitmap = <
6811968119
item
68120-
Size = 30
68120+
Size = 64
6812168121
end>
6812268122
IconName = 'reverse'
6812368123
SVGText =
@@ -68137,7 +68137,7 @@ object Globals: TGlobals
6813768137
item
6813868138
MultiResBitmap = <
6813968139
item
68140-
Size = 30
68140+
Size = 64
6814168141
end>
6814268142
IconName = 'play'
6814368143
SVGText =
@@ -68157,8 +68157,8 @@ object Globals: TGlobals
6815768157
item
6815868158
MultiResBitmap = <
6815968159
item
68160-
Width = 24
68161-
Height = 30
68160+
Width = 41
68161+
Height = 51
6816268162
end>
6816368163
IconName = 'Diagram'
6816468164
SVGText =
@@ -68174,7 +68174,7 @@ object Globals: TGlobals
6817468174
item
6817568175
MultiResBitmap = <
6817668176
item
68177-
Size = 30
68177+
Size = 64
6817868178
end>
6817968179
IconName = 'TargetArrow'
6818068180
SVGText =
@@ -68228,7 +68228,7 @@ object Globals: TGlobals
6822868228
item
6822968229
MultiResBitmap = <
6823068230
item
68231-
Size = 64
68231+
Size = 30
6823268232
end>
6823368233
IconName = 'Anchor'
6823468234
SVGText =
@@ -68323,7 +68323,7 @@ object Globals: TGlobals
6832368323
item
6832468324
MultiResBitmap = <
6832568325
item
68326-
Size = 30
68326+
Size = 64
6832768327
end>
6832868328
IconName = 'Delete'
6832968329
SVGText =
@@ -68358,7 +68358,7 @@ object Globals: TGlobals
6835868358
item
6835968359
MultiResBitmap = <
6836068360
item
68361-
Size = 64
68361+
Size = 41
6836268362
end>
6836368363
IconName = 'GlobeWithMeridians'
6836468364
SVGText =
@@ -68427,7 +68427,7 @@ object Globals: TGlobals
6842768427
item
6842868428
MultiResBitmap = <
6842968429
item
68430-
Size = 64
68430+
Size = 30
6843168431
end>
6843268432
IconName = 'Camera'
6843368433
SVGText =
@@ -68486,7 +68486,7 @@ object Globals: TGlobals
6848668486
item
6848768487
MultiResBitmap = <
6848868488
item
68489-
Size = 30
68489+
Size = 64
6849068490
end>
6849168491
IconName = 'PaperA4'
6849268492
SVGText =
@@ -68536,7 +68536,7 @@ object Globals: TGlobals
6853668536
item
6853768537
MultiResBitmap = <
6853868538
item
68539-
Size = 64
68539+
Size = 30
6854068540
end>
6854168541
IconName = 'Signpost'
6854268542
SVGText =
@@ -68566,7 +68566,7 @@ object Globals: TGlobals
6856668566
item
6856768567
MultiResBitmap = <
6856868568
item
68569-
Size = 30
68569+
Size = 64
6857068570
end>
6857168571
IconName = 'Info'
6857268572
SVGText =
@@ -68591,7 +68591,7 @@ object Globals: TGlobals
6859168591
item
6859268592
MultiResBitmap = <
6859368593
item
68594-
Size = 30
68594+
Size = 64
6859568595
end>
6859668596
IconName = 'SOS'
6859768597
SVGText =
@@ -68627,7 +68627,7 @@ object Globals: TGlobals
6862768627
item
6862868628
MultiResBitmap = <
6862968629
item
68630-
Size = 30
68630+
Size = 64
6863168631
end>
6863268632
IconName = 'CopyAction'
6863368633
SVGText =
@@ -68662,7 +68662,7 @@ object Globals: TGlobals
6866268662
item
6866368663
MultiResBitmap = <
6866468664
item
68665-
Size = 30
68665+
Size = 64
6866668666
end>
6866768667
IconName = 'PasteAction'
6866868668
SVGText =
@@ -68712,7 +68712,7 @@ object Globals: TGlobals
6871268712
item
6871368713
MultiResBitmap = <
6871468714
item
68715-
Size = 30
68715+
Size = 64
6871668716
end>
6871768717
IconName = 'FlipHorizontally'
6871868718
SVGText =
@@ -68748,7 +68748,7 @@ object Globals: TGlobals
6874868748
item
6874968749
MultiResBitmap = <
6875068750
item
68751-
Size = 30
68751+
Size = 64
6875268752
end>
6875368753
IconName = 'FlipVertically'
6875468754
SVGText =
@@ -68786,48 +68786,48 @@ object Globals: TGlobals
6878668786
Layers = <
6878768787
item
6878868788
Name = 'Edit'
68789-
SourceRect.Right = 30.000000000000000000
68790-
SourceRect.Bottom = 30.000000000000000000
68789+
SourceRect.Right = 64.000000000000000000
68790+
SourceRect.Bottom = 64.000000000000000000
6879168791
end>
6879268792
end
6879368793
item
6879468794
Layers = <
6879568795
item
6879668796
Name = 'reverse'
68797-
SourceRect.Right = 30.000000000000000000
68798-
SourceRect.Bottom = 30.000000000000000000
68797+
SourceRect.Right = 64.000000000000000000
68798+
SourceRect.Bottom = 64.000000000000000000
6879968799
end>
6880068800
end
6880168801
item
6880268802
Layers = <
6880368803
item
6880468804
Name = 'play'
68805-
SourceRect.Right = 30.000000000000000000
68806-
SourceRect.Bottom = 30.000000000000000000
68805+
SourceRect.Right = 64.000000000000000000
68806+
SourceRect.Bottom = 64.000000000000000000
6880768807
end>
6880868808
end
6880968809
item
6881068810
Layers = <
6881168811
item
6881268812
Name = 'Diagram'
68813-
SourceRect.Right = 30.000000000000000000
68814-
SourceRect.Bottom = 30.000000000000000000
68813+
SourceRect.Right = 51.000000000000000000
68814+
SourceRect.Bottom = 51.000000000000000000
6881568815
end>
6881668816
end
6881768817
item
6881868818
Layers = <
6881968819
item
6882068820
Name = 'TargetArrow'
68821-
SourceRect.Right = 30.000000000000000000
68822-
SourceRect.Bottom = 30.000000000000000000
68821+
SourceRect.Right = 64.000000000000000000
68822+
SourceRect.Bottom = 64.000000000000000000
6882368823
end>
6882468824
end
6882568825
item
6882668826
Layers = <
6882768827
item
6882868828
Name = 'Anchor'
68829-
SourceRect.Right = 64.000000000000000000
68830-
SourceRect.Bottom = 64.000000000000000000
68829+
SourceRect.Right = 30.000000000000000000
68830+
SourceRect.Bottom = 30.000000000000000000
6883168831
end>
6883268832
end
6883368833
item
@@ -68850,16 +68850,16 @@ object Globals: TGlobals
6885068850
Layers = <
6885168851
item
6885268852
Name = 'Delete'
68853-
SourceRect.Right = 30.000000000000000000
68854-
SourceRect.Bottom = 30.000000000000000000
68853+
SourceRect.Right = 64.000000000000000000
68854+
SourceRect.Bottom = 64.000000000000000000
6885568855
end>
6885668856
end
6885768857
item
6885868858
Layers = <
6885968859
item
6886068860
Name = 'GlobeWithMeridians'
68861-
SourceRect.Right = 64.000000000000000000
68862-
SourceRect.Bottom = 64.000000000000000000
68861+
SourceRect.Right = 41.000000000000000000
68862+
SourceRect.Bottom = 41.000000000000000000
6886368863
end>
6886468864
end
6886568865
item
@@ -68874,16 +68874,16 @@ object Globals: TGlobals
6887468874
Layers = <
6887568875
item
6887668876
Name = 'Camera'
68877-
SourceRect.Right = 64.000000000000000000
68878-
SourceRect.Bottom = 64.000000000000000000
68877+
SourceRect.Right = 30.000000000000000000
68878+
SourceRect.Bottom = 30.000000000000000000
6887968879
end>
6888068880
end
6888168881
item
6888268882
Layers = <
6888368883
item
6888468884
Name = 'PaperA4'
68885-
SourceRect.Right = 30.000000000000000000
68886-
SourceRect.Bottom = 30.000000000000000000
68885+
SourceRect.Right = 64.000000000000000000
68886+
SourceRect.Bottom = 64.000000000000000000
6888768887
end>
6888868888
end
6888968889
item
@@ -68898,56 +68898,56 @@ object Globals: TGlobals
6889868898
Layers = <
6889968899
item
6890068900
Name = 'Signpost'
68901-
SourceRect.Right = 64.000000000000000000
68902-
SourceRect.Bottom = 64.000000000000000000
68901+
SourceRect.Right = 30.000000000000000000
68902+
SourceRect.Bottom = 30.000000000000000000
6890368903
end>
6890468904
end
6890568905
item
6890668906
Layers = <
6890768907
item
6890868908
Name = 'Info'
68909-
SourceRect.Right = 30.000000000000000000
68910-
SourceRect.Bottom = 30.000000000000000000
68909+
SourceRect.Right = 64.000000000000000000
68910+
SourceRect.Bottom = 64.000000000000000000
6891168911
end>
6891268912
end
6891368913
item
6891468914
Layers = <
6891568915
item
6891668916
Name = 'SOS'
68917-
SourceRect.Right = 30.000000000000000000
68918-
SourceRect.Bottom = 30.000000000000000000
68917+
SourceRect.Right = 64.000000000000000000
68918+
SourceRect.Bottom = 64.000000000000000000
6891968919
end>
6892068920
end
6892168921
item
6892268922
Layers = <
6892368923
item
6892468924
Name = 'CopyAction'
68925-
SourceRect.Right = 30.000000000000000000
68926-
SourceRect.Bottom = 30.000000000000000000
68925+
SourceRect.Right = 64.000000000000000000
68926+
SourceRect.Bottom = 64.000000000000000000
6892768927
end>
6892868928
end
6892968929
item
6893068930
Layers = <
6893168931
item
6893268932
Name = 'PasteAction'
68933-
SourceRect.Right = 30.000000000000000000
68934-
SourceRect.Bottom = 30.000000000000000000
68933+
SourceRect.Right = 64.000000000000000000
68934+
SourceRect.Bottom = 64.000000000000000000
6893568935
end>
6893668936
end
6893768937
item
6893868938
Layers = <
6893968939
item
6894068940
Name = 'FlipHorizontally'
68941-
SourceRect.Right = 30.000000000000000000
68942-
SourceRect.Bottom = 30.000000000000000000
68941+
SourceRect.Right = 64.000000000000000000
68942+
SourceRect.Bottom = 64.000000000000000000
6894368943
end>
6894468944
end
6894568945
item
6894668946
Layers = <
6894768947
item
6894868948
Name = 'FlipVertically'
68949-
SourceRect.Right = 30.000000000000000000
68950-
SourceRect.Bottom = 30.000000000000000000
68949+
SourceRect.Right = 64.000000000000000000
68950+
SourceRect.Bottom = 64.000000000000000000
6895168951
end>
6895268952
end
6895368953
item

App/READCOM.App.dproj

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -457,14 +457,14 @@
457457
<Overwrite>true</Overwrite>
458458
</Platform>
459459
</DeployFile>
460-
<DeployFile LocalName="$(NDKBasePath)\prebuilt\android-arm\gdbserver\gdbserver" Configuration="Release" Class="AndroidGDBServer">
460+
<DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_72x72.png" Configuration="Release" Class="Android_NotificationIcon72">
461461
<Platform Name="Android">
462+
<RemoteName>ic_notification.png</RemoteName>
462463
<Overwrite>true</Overwrite>
463464
</Platform>
464465
</DeployFile>
465-
<DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_36x36.png" Configuration="Release" Class="Android_NotificationIcon36">
466+
<DeployFile LocalName="$(NDKBasePath)\prebuilt\android-arm\gdbserver\gdbserver" Configuration="Release" Class="AndroidGDBServer">
466467
<Platform Name="Android">
467-
<RemoteName>ic_notification.png</RemoteName>
468468
<Overwrite>true</Overwrite>
469469
</Platform>
470470
</DeployFile>
@@ -474,7 +474,7 @@
474474
<Overwrite>true</Overwrite>
475475
</Platform>
476476
</DeployFile>
477-
<DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_72x72.png" Configuration="Release" Class="Android_NotificationIcon72">
477+
<DeployFile LocalName="$(BDS)\bin\Artwork\Android\FM_NotificationIcon_36x36.png" Configuration="Release" Class="Android_NotificationIcon36">
478478
<Platform Name="Android">
479479
<RemoteName>ic_notification.png</RemoteName>
480480
<Overwrite>true</Overwrite>

0 commit comments

Comments
 (0)