mirror of https://gitlab.com/basile.b/dexed.git
nothing
This commit is contained in:
parent
d9809f0e81
commit
284d2ee070
|
@ -367,8 +367,6 @@ begin
|
|||
end;
|
||||
{$ENDREGION}
|
||||
|
||||
// todo-cpagecontrol: display the two mole names when split mode is activated
|
||||
|
||||
{$REGION ICEDocumentObserver ---------------------------------------------------}
|
||||
procedure TCEEditorWidget.docNew(document: TCESynMemo);
|
||||
var
|
||||
|
|
|
@ -63,7 +63,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
inherited toolbar: TCEToolBar
|
||||
Width = 633
|
||||
object btnSelProj: TCEToolButton[0]
|
||||
Left = 356
|
||||
Left = 353
|
||||
Hint = 'set the project that compiles the selected entry'
|
||||
Top = 0
|
||||
Caption = 'button3'
|
||||
|
@ -72,7 +72,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
scaledSeparator = False
|
||||
end
|
||||
object btnSelRoot: TCEToolButton[1]
|
||||
Left = 328
|
||||
Left = 325
|
||||
Hint = 'set the root of the library sources'
|
||||
Top = 0
|
||||
Caption = 'button4'
|
||||
|
@ -81,7 +81,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
scaledSeparator = False
|
||||
end
|
||||
object btnSelfoldOfFiles: TCEToolButton[2]
|
||||
Left = 300
|
||||
Left = 297
|
||||
Hint = 'select a folder containing several d sources (optional trick)'
|
||||
Top = 0
|
||||
Caption = 'button5'
|
||||
|
@ -90,7 +90,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
scaledSeparator = False
|
||||
end
|
||||
object btnSelFile: TCEToolButton[3]
|
||||
Left = 272
|
||||
Left = 269
|
||||
Hint = 'selected the static library file'
|
||||
Top = 0
|
||||
Caption = 'button6'
|
||||
|
@ -99,7 +99,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
scaledSeparator = False
|
||||
end
|
||||
object btnEditAlias: TCEToolButton[4]
|
||||
Left = 244
|
||||
Left = 241
|
||||
Hint = 'set the entry alias'
|
||||
Top = 0
|
||||
Caption = 'button7'
|
||||
|
@ -111,7 +111,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
|
|||
Left = 225
|
||||
Height = 28
|
||||
Top = 0
|
||||
Width = 19
|
||||
Width = 16
|
||||
Caption = 'button8'
|
||||
Style = tbsDivider
|
||||
scaledSeparator = False
|
||||
|
|
|
@ -1915,10 +1915,10 @@ begin
|
|||
if token^.data = 'module' then
|
||||
fModuleTokFound := true
|
||||
else
|
||||
// "module" is always the first KW
|
||||
stop := true;
|
||||
exit;
|
||||
end;
|
||||
if fModuleTokFound and (token^.kind = ltkSymbol) and (token^.data = ';') then
|
||||
end
|
||||
else if fModuleTokFound and (token^.kind = ltkSymbol) and (token^.data = ';') then
|
||||
begin
|
||||
stop := true;
|
||||
fModuleTokFound := false;
|
||||
|
|
Loading…
Reference in New Issue