fix for SelText clearing text formatting

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@935 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2009-08-18 05:21:51 +00:00
parent 140121f8ac
commit 3e63d8afaf
4 changed files with 94 additions and 50 deletions

View File

@ -47,7 +47,7 @@
<ComponentName Value="Form1"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
<CursorPos X="29" Y="125"/>
<CursorPos X="44" Y="126"/>
<TopLine Value="123"/>
<EditorIndex Value="0"/>
<UsageCount Value="70"/>
@ -365,7 +365,7 @@
<UsageCount Value="9"/>
</Unit44>
<Unit45>
<Filename Value="../../../../../Lazarus/lcl/stdctrls.pp"/>
<Filename Value="../../../../../lazarus/lcl/stdctrls.pp"/>
<UnitName Value="StdCtrls"/>
<CursorPos X="33" Y="677"/>
<TopLine Value="662"/>
@ -381,7 +381,7 @@
<UsageCount Value="9"/>
</Unit46>
<Unit47>
<Filename Value="../../../../../Lazarus/lcl/interfaces/win32/win32wsstdctrls.pp"/>
<Filename Value="../../../../../lazarus/lcl/interfaces/win32/win32wsstdctrls.pp"/>
<UnitName Value="Win32WSStdCtrls"/>
<CursorPos X="26" Y="83"/>
<TopLine Value="67"/>
@ -390,7 +390,7 @@
<Loaded Value="True"/>
</Unit47>
<Unit48>
<Filename Value="../../../../../Lazarus/lcl/widgetset/wsstdctrls.pp"/>
<Filename Value="../../../../../lazarus/lcl/widgetset/wsstdctrls.pp"/>
<UnitName Value="WSStdCtrls"/>
<CursorPos X="36" Y="53"/>
<TopLine Value="39"/>
@ -399,7 +399,7 @@
<Loaded Value="True"/>
</Unit48>
<Unit49>
<Filename Value="../../../../../Lazarus/lcl/widgetset/wscontrols.pp"/>
<Filename Value="../../../../../lazarus/lcl/widgetset/wscontrols.pp"/>
<UnitName Value="WSControls"/>
<CursorPos X="30" Y="100"/>
<TopLine Value="85"/>
@ -408,7 +408,7 @@
<Loaded Value="True"/>
</Unit49>
<Unit50>
<Filename Value="../../../../../Lazarus/lcl/interfaces/win32/win32wscontrols.pp"/>
<Filename Value="../../../../../lazarus/lcl/interfaces/win32/win32wscontrols.pp"/>
<UnitName Value="Win32WSControls"/>
<CursorPos X="1" Y="450"/>
<TopLine Value="434"/>
@ -417,7 +417,7 @@
<Loaded Value="True"/>
</Unit50>
<Unit51>
<Filename Value="../../../../../Lazarus/lcl/include/customlabel.inc"/>
<Filename Value="../../../../../lazarus/lcl/include/customlabel.inc"/>
<CursorPos X="3" Y="229"/>
<TopLine Value="227"/>
<EditorIndex Value="5"/>
@ -425,7 +425,7 @@
<Loaded Value="True"/>
</Unit51>
<Unit52>
<Filename Value="../../../../../Lazarus/lcl/controls.pp"/>
<Filename Value="../../../../../lazarus/lcl/controls.pp"/>
<UnitName Value="Controls"/>
<CursorPos X="24" Y="1784"/>
<TopLine Value="1769"/>
@ -434,7 +434,7 @@
<Loaded Value="True"/>
</Unit52>
<Unit53>
<Filename Value="../../../../../Lazarus/lcl/include/wincontrol.inc"/>
<Filename Value="../../../../../lazarus/lcl/include/wincontrol.inc"/>
<CursorPos X="5" Y="4342"/>
<TopLine Value="4334"/>
<EditorIndex Value="4"/>
@ -442,7 +442,7 @@
<Loaded Value="True"/>
</Unit53>
</Units>
<JumpHistory Count="30" HistoryIndex="29">
<JumpHistory Count="28" HistoryIndex="27">
<Position1>
<Filename Value="../../../../../Lazarus/lcl/interfaces/win32/win32wscontrols.pp"/>
<Caret Line="29" Column="1" TopLine="29"/>
@ -549,20 +549,12 @@
</Position26>
<Position27>
<Filename Value="unit1.pas"/>
<Caret Line="7" Column="13" TopLine="29"/>
<Caret Line="1" Column="1" TopLine="1"/>
</Position27>
<Position28>
<Filename Value="unit1.pas"/>
<Caret Line="1" Column="1" TopLine="1"/>
</Position28>
<Position29>
<Filename Value="unit1.pas"/>
<Caret Line="23" Column="10" TopLine="30"/>
</Position29>
<Position30>
<Filename Value="unit1.pas"/>
<Caret Line="22" Column="22" TopLine="22"/>
</Position30>
</Position28>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>
@ -570,6 +562,13 @@
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)/"/>
</SearchPaths>
<Linking>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
<Other>
<CompilerPath Value="$(CompPath)"/>
</Other>