IDE: change class: enabled combobox complete

git-svn-id: trunk@16140 -
This commit is contained in:
mattias 2008-08-19 10:52:33 +00:00
parent a12f86e905
commit 23cd07a771
3 changed files with 26 additions and 22 deletions

View File

@ -70,7 +70,8 @@ object ChangeClassDlg: TChangeClassDlg
Top = 6
Width = 208
Align = alTop
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
BorderSpacing.Around = 6
MaxLength = 0
OnEditingDone = NewClassComboBoxEditingDone

View File

@ -22,25 +22,25 @@ LazarusResources.Add('TChangeClassDlg','FORMDATA',[
+#2#6#5'Width'#3#224#0#5'Align'#7#7'alRight'#20'BorderSpacing.Around'#2#6#7'C'
+'aption'#6#11'NewGroupBox'#12'ClientHeight'#3#15#1#11'ClientWidth'#3#220#0#8
+'TabOrder'#2#1#0#9'TComboBox'#16'NewClassComboBox'#4'Left'#2#6#6'Height'#2#29
+#3'Top'#2#6#5'Width'#3#208#0#5'Align'#7#5'alTop'#16'AutoCompleteText'#11#22
+'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#20'BorderSpacing.Around'
+#2#6#9'MaxLength'#2#0#13'OnEditingDone'#7#27'NewClassComboBoxEditingDone'#8
+'TabOrder'#2#0#4'Text'#6#16'NewClassComboBox'#0#0#9'TGroupBox'#19'NewAncesto'
+'rGroupBox'#6'Height'#3#230#0#3'Top'#2')'#5'Width'#3#220#0#5'Align'#7#8'alCl'
+'ient'#7'Caption'#6#19'NewAncestorGroupBox'#12'ClientHeight'#3#211#0#11'Clie'
+'ntWidth'#3#216#0#8'TabOrder'#2#1#0#8'TListBox'#19'NewAncestorsListBox'#6'He'
+'ight'#3#211#0#5'Width'#3#216#0#5'Align'#7#8'alClient'#16'ClickOnSelChange'#8
+#8'TabOrder'#2#0#8'TopIndex'#2#255#0#0#0#0#6'TPanel'#8'BtnPanel'#6'Height'#2
+'0'#3'Top'#3'.'#1#5'Width'#3#214#1#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'B'
+'evelOuter'#7#6'bvNone'#12'ClientHeight'#2'0'#11'ClientWidth'#3#214#1#8'TabO'
+'rder'#2#2#0#7'TBitBtn'#12'CancelButton'#20'AnchorSideRight.Side'#7#9'asrBot'
+'tom'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#130#1#6'Height'#2'$'
+#3'Top'#2#6#5'Width'#2'N'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpaci'
+'ng.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#20'Constraints.MinWidth'#2
+'K'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2
+#0#0#0#7'TBitBtn'#8'OkButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Lef'
+'t'#3'1'#1#6'Height'#2'$'#3'Top'#2#6#5'Width'#2'K'#5'Align'#7#7'alRight'#8'A'
+'utoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#20'Constraints.'
+'MinWidth'#2'K'#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'Tab'
+'Order'#2#1#0#0#0#0
+#3'Top'#2#6#5'Width'#3#208#0#5'Align'#7#5'alTop'#12'AutoComplete'#9#16'AutoC'
+'ompleteText'#11#12'cbactEnabled'#22'cbactEndOfLineComplete'#20'cbactSearchA'
+'scending'#0#20'BorderSpacing.Around'#2#6#9'MaxLength'#2#0#13'OnEditingDone'
+#7#27'NewClassComboBoxEditingDone'#8'TabOrder'#2#0#4'Text'#6#16'NewClassComb'
+'oBox'#0#0#9'TGroupBox'#19'NewAncestorGroupBox'#6'Height'#3#230#0#3'Top'#2')'
+#5'Width'#3#220#0#5'Align'#7#8'alClient'#7'Caption'#6#19'NewAncestorGroupBox'
+#12'ClientHeight'#3#211#0#11'ClientWidth'#3#216#0#8'TabOrder'#2#1#0#8'TListB'
+'ox'#19'NewAncestorsListBox'#6'Height'#3#211#0#5'Width'#3#216#0#5'Align'#7#8
+'alClient'#16'ClickOnSelChange'#8#8'TabOrder'#2#0#8'TopIndex'#2#255#0#0#0#0#6
+'TPanel'#8'BtnPanel'#6'Height'#2'0'#3'Top'#3'.'#1#5'Width'#3#214#1#5'Align'#7
+#8'alBottom'#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'0'
+#11'ClientWidth'#3#214#1#8'TabOrder'#2#2#0#7'TBitBtn'#12'CancelButton'#20'An'
+'chorSideRight.Side'#7#9'asrBottom'#21'AnchorSideBottom.Side'#7#9'asrBottom'
+#4'Left'#3#130#1#6'Height'#2'$'#3'Top'#2#6#5'Width'#2'N'#5'Align'#7#7'alRigh'
+'t'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Ca'
+'ncel'#20'Constraints.MinWidth'#2'K'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2
+#2#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#8'OkButton'#21'AnchorSide'
+'Bottom.Side'#7#9'asrBottom'#4'Left'#3'1'#1#6'Height'#2'$'#3'Top'#2#6#5'Widt'
+'h'#2'K'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7
+'Caption'#6#3'&OK'#20'Constraints.MinWidth'#2'K'#4'Kind'#7#4'bkOK'#11'ModalR'
+'esult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0#0#0#0
]);

View File

@ -175,6 +175,9 @@ var
end;
ComponentStream.Position:=0;
LFMBuffer.LoadFromStream(ComponentStream);
debugln('ChangePersistentClass-Before-Checking--------------------------------------------');
debugln(LFMBuffer.Source);
debugln('ChangePersistentClass-Before-Checking-------------------------------------------');
if not CodeToolBoss.CheckLFM(UnitCode,LFMBuffer,LFMTree,false,false) then
begin
debugln('ChangePersistentClass-Before--------------------------------------------');