mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-10 08:28:14 +02:00
IDE: clean up
git-svn-id: trunk@25943 -
This commit is contained in:
parent
a760ac7f88
commit
02573ad6a6
@ -94,7 +94,6 @@ begin
|
||||
inherited Create(TheOwner);
|
||||
|
||||
Caption := lisKMEvaluateModify;
|
||||
IDEDialogLayoutList.ApplyLayout(Self, 400, 290);
|
||||
cmbExpression.Items.Assign(InputHistories.HistoryLists.GetList(ClassName, True));
|
||||
|
||||
tbEvaluate.Caption := lisEvaluate;
|
||||
|
@ -371,7 +371,6 @@ begin
|
||||
FMethodsGrid := NewGrid('MethodsGrid', MethodsPage, FMethodsGridHook);
|
||||
|
||||
Localize;
|
||||
IDEDialogLayoutList.ApplyLayout(Self, 260, 400);
|
||||
|
||||
FGridData:=TStringGrid.Create(DataPage);
|
||||
DataPage.InsertControl(FGridData);
|
||||
|
@ -31,7 +31,8 @@ type
|
||||
|
||||
TIDEDialogLayoutList = class;
|
||||
|
||||
{ TIDEDialogLayout }
|
||||
{ TIDEDialogLayout - for modal forms
|
||||
For non modal forms see TIDEWindowCreator below }
|
||||
|
||||
TIDEDialogLayout = class
|
||||
private
|
||||
@ -57,7 +58,7 @@ type
|
||||
end;
|
||||
TIDEDialogLayoutClass = class of TIDEDialogLayout;
|
||||
|
||||
{ TIDEDialogLayoutList }
|
||||
{ TIDEDialogLayoutList - for modal forms }
|
||||
|
||||
TIDEDialogLayoutList = class
|
||||
private
|
||||
|
Loading…
Reference in New Issue
Block a user