diff options
| -rw-r--r-- | uidesigner/vfddesigner.pas | 6 | ||||
| -rw-r--r-- | uidesigner/vfdforms.pas | 1 | ||||
| -rw-r--r-- | uidesigner/vfdprops.pas | 1 | ||||
| -rw-r--r-- | uidesigner/vfdwidgetclass.pas | 2 |
4 files changed, 2 insertions, 8 deletions
diff --git a/uidesigner/vfddesigner.pas b/uidesigner/vfddesigner.pas index db548784..568ca96c 100644 --- a/uidesigner/vfddesigner.pas +++ b/uidesigner/vfddesigner.pas @@ -643,9 +643,7 @@ end; procedure TFormDesigner.EditWidgetOrTabOrder(AMode: TfpgEditMode); var frm: TWidgetOrderForm; - n, fi: integer; - cd: TWidgetDesigner; - identlevel: integer; + n: integer; lFocused: TfpgTreeNode; lNode: TfpgTreeNode; s: string; @@ -678,9 +676,7 @@ begin frm := TWidgetOrderForm.Create(nil); frm.WindowTitle := cEditOrder[AMode]; frm.Title := cEditOrder[AMode]; - fi := 0; - identlevel := 0; frm.Treeview1.RootNode.Clear; lFocused := nil; diff --git a/uidesigner/vfdforms.pas b/uidesigner/vfdforms.pas index 03abaa7f..04812166 100644 --- a/uidesigner/vfdforms.pas +++ b/uidesigner/vfdforms.pas @@ -33,7 +33,6 @@ uses fpg_combobox, fpg_trackbar, fpg_checkbox, - fpg_panel, fpg_tree; type diff --git a/uidesigner/vfdprops.pas b/uidesigner/vfdprops.pas index faf4d858..bf1aa209 100644 --- a/uidesigner/vfdprops.pas +++ b/uidesigner/vfdprops.pas @@ -854,7 +854,6 @@ var PropInfo: PPropInfo; i: integer; c: TfpgColor; - nc: TfpgColor; begin PropInfo := GetPropInfo(wg.ClassType, Name); i := GetOrdProp(wg, Name); diff --git a/uidesigner/vfdwidgetclass.pas b/uidesigner/vfdwidgetclass.pas index 7b9d3c62..76bececc 100644 --- a/uidesigner/vfdwidgetclass.pas +++ b/uidesigner/vfdwidgetclass.pas @@ -162,7 +162,7 @@ end; function TVFDWidgetProperty.GetPropertySource(wg: TfpgWidget; const ident: string): string; begin - + Result := ''; end; function TVFDWidgetProperty.ParseSourceLine(wg: TfpgWidget; const line: string): boolean; |