修正表單匯彩色JPG時體積變大的問題

doom4ster

2017-11-30 105a96094ed1f62c8a71008f3d1b26a5fbc276cd

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
9
6eäD#äŸScanMemoþÙ?–<rScanMemo.dfmI‡ï>pScanMemo.pasI‡ï>dSystemfTObject»<úÎgTObject.Equalsô\ggTObject.GetHashCodeõ\ggTObject.ToStringö\ggTObject.Dispatchú\ggTObject.NewInstanceü\ggTObject.FreeInstanceý\ggExitfstringOª]Ïf UnicodeStringOª]Ïg@UStrCatÔB¯,g@UStrClr\ª«>g@HandleFinallyé`pÅcdSysInitcdWindowsgPostMessageÐU«gWA_CLICKACTIVE²}ç1cdMessagesgWM_ACTIVATE¾}ç1cdSysUtilscdVariantscdClassesgTComponent.UpdateRegistryÙ§šTgTComponent.WriteStateݧšTgTComponent.SafeCallExceptionö§šTgTPersistent.Assignòg°ÇfTStringsl
©‡cdGraphicscdControlsgTWinControl.AssignToāgTWinControl.CanAutoSizeɁgTWinControl.CanResizeʁgTWinControl.ConstrainedResizégTWinControl.CreateHandleρg#TWinControl.CustomAlignInsertBeforeӁgTWinControl.CustomAlignPositionԁgTWinControl.DestroyWnd؁g!TWinControl.DockReplaceDockClientہgTWinControl.GetClientOriginègTWinControl.GetControlExtentsêgTWinControl.GetDeviceContextëgTWinControl.SetParentBackground‚g#TWinControl.SetParentDoubleBuffered‚gTWinControl.ShowControl‚g+TWinControl.UpdateControlOriginalParentSize‚gTWinControl.InvalidateG‚gTWinControl.RepaintM‚gTWinControl.SetBoundsP‚gTWinControl.UpdateS‚gTControl.GetActionv@ùgTControl.GetEnabled|@ùg!TControl.GetFloatingDockSiteClass~@ùgTControl.SetAutoSize‘@ùgTControl.SetDragMode’@ùgTControl.SetEnabled“@ùgTControl.SetName”@ùgTControl.SetBiDiMode—@ùgTControl.GetDragImagesŸ@ùgTControl.InitiateActionÚ@ùgmrCancel²}ç1gTWinControl.GetHandleMfTWinControlõ`ùægmrOk¯}ç1cdFormsfTFormåè
šgTCustomForm.AlignControls6HɍgTCustomForm.CreateParams:HɍgTCustomForm.CreateWindowHandle;HɍgTCustomForm.CreateWnd<HɍgTCustomForm.DefineProperties>HɍgTCustomForm.DestroyHandle?HɍgTCustomForm.DestroyWindowHandle@HɍgTCustomForm.DoCreateBHɍgTCustomForm.DoDestroyCHɍgTCustomForm.GetClientRectHHɍgTCustomForm.GetFloatingIHɍgTCustomForm.LoadedMHɍgTCustomForm.NotificationNHɍgTCustomForm.PaintWindowPHɍgTCustomForm.ReadStateRHɍgTCustomForm.RequestAlignSHɍgTCustomForm.SetParentBiDiModeUHɍgTCustomForm.SetParentWHɍgTCustomForm.UpdateActionsXHɍgTCustomForm.ValidateRenameZHɍgTCustomForm.WndProc\HɍgTCustomForm.Resizing]HɍgTCustomForm.QueryInterfaceaHɍgTCustomForm.CreatešHɍgTCustomForm.CreateNew›HɍgTCustomForm.DestroyœHɍgTCustomForm.CloseQueryžHɍgTCustomForm.DefaultHandlerŸHɍgTCustomForm.SetFocus­HɍgTCustomForm.SetFocusedControl®HɍgTCustomForm.ShowModal°HɍgTCustomForm.WantChildKey±HɍgTCustomForm.AfterConstruction³HɍgTCustomForm.BeforeDestruction´Hɍg%TScrollingWinControl.AdjustClientRect|„a˜g&TScrollingWinControl.AutoScrollEnabled~„a˜g%TScrollingWinControl.AutoScrollInView„a˜g.TFormȼßëcdDialogscdStdCtrlsf    TGroupBox© &€fTMemoÏ#7:g
.TGroupBoxŒôÒg.TMemo²÷ŒcdButtonsfTBitBtn”åg.TBitBtnÿgê6cdExtCtrlsfTPanel þœÝf    TSplitterN^8g.TPanelÒz/g
.TSplitter1Ü;ŠcdComCtrlsf    TListViewÖ_®¿g
.TListView¹3ŒfTCustomListView˜ägTCustomListView.GetSelected))ù«f    TListItemÑíÿHc5ScanMemo€_¸ŽÏc5Systemc5SysInit c5Windows"c5Messages(c5SysUtils,c5Variants.c5Classes0c5Graphics<c5Controls>c5Forms„c5DialogsÔc5StdCtrlsÖc5Buttonsàc5ExtCtrlsæc5ComCtrlsðc&.TScanMemoForm€Ïö÷T* TScanMemoFormˆì"  ScanMemoFormæúˆ3 B7.2F"(TScanMemoForm.EraseBtClick€C/›$ˆ$ !Self !Sendercœ
I ÿ(TScanMemoForm.ExitBtClick€C/›ˆ$ !Self !Sendercœ
U ÿ(TScanMemoForm.FormCreate€C/›0ˆ$ !Self !Sendercœ
a ÿ(TScanMemoForm.FormShow€C/›&ˆ$ !Self !Sendercœ
m ÿ(TScanMemoForm.PhraseLVDblClick€C/›
ˆ$ !Self !Sendercœ
y ÿ(TScanMemoForm.SaveBtClick€C/›ˆ$ !Self !Sendercœ
… ÿ(Finalization€é`pÅ\!$cž(ScanMemo€!$cžþG á    FP=„ˆ9    
þØ&,Panel2
á œ
• ÿ,Panel1
ñ œ
™ ÿ,EraseBt

œ
 ÿ,SaveBt
œ
¡ ÿ,ExitBt
!œ
¥ ÿ,PhraseLV
1œ
© ÿ,    Splitter1
Aœ
­ ÿ,MemoGB
Qœ
± ÿ,Memo1
aœ
µ ÿ.ExitBtClick
èU
ˆœ
¹ ÿ.SaveBtClick
è…
ˆœ
½ ÿ.EraseBtClick
èI
ˆœ
Á ÿ.PhraseLVDblClick
èy
ˆœ
Å ÿ.
FormCreate
èa
ˆœ
É ÿ.FormShow
èm
ˆœ
Í ÿcD"€ÿÿÿ @l¥X`
à
P¤    ^xPanel2|Panel1€
EraseBt„
SaveBtˆ
ExitBtŒPhraseLV    Splitter1”MemoGB˜Memo1ExitBtClickSaveBtClickEraseBtClickPhraseLVDblClick
FormCreateFormShow TScanMemoForm TScanMemoFormXlScanMemo‹€˜‹€‹ÿRDÃǀ¤ÃS‹Øjjj‹ÃèPè[ÃV‹ð‹†˜‹ÿ’Ø^ÃU‹ìjSV‹Ø3ÀUhtdÿ0d‰ ‹ƒŒè…Àt8Uü‹ƒ˜‹°‹Æ‹ÿQEüP‹ƒŒè‹P Xè‹Uü‹Æ‹ÿQ,3ÀZYYd‰h{EüèÃéëð^[Y]Ãǀ¤
ÃU‹ì3ÀUh%dÿ0d‰ ÿ3ÀZYYd‰h,Ãéëø]Ã-
Ãmø9
9 
=
9
9
9
Ò




6
È
Ê

¾


º
@

8
ž
 
¤
t
2
®
4
´
¶
D
B
F
h
R
š
V
j
œ
l
¦
n
p
r
ª
¨
v
°
x
z
`
b
d
f
Ì
ˆ
H
Š
Œ
Ž
J
L
’
”
N
P
T
¢
X
Z
\
^
À
Î
Ð
²
–
˜
¬
¸
¼
Â
Ä
Æ
9    
U$
…$
I&
y.
a"
m:
ì
ä
ô
î
Ü
Þ=
=&
9
†"I$Ua~$m&y
y"øRø.
y…‘
‘
E
‘
E "R
"&.pD^‘’’ &“Vr======
= ="=$=&U*(X=(…,*†=*I.,N=,y0.x=.a20b=0m42n=2ABMQNÚ.ýR~:lýRY]Xeibqun€åýr}xö‰ý|~:´ý~ú\ý~‰†‘”8I@MM"þU@YYþa@ee,þm@ qq"þy@0}.}¼þ…@‰‰þ‘  a