mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-15 14:29:31 +02:00
IDE: clean up
git-svn-id: trunk@26848 -
This commit is contained in:
parent
5a1cba9ff7
commit
4ed9268f99
@ -69,7 +69,7 @@ type
|
||||
private
|
||||
fSettings: TConvertSettings;
|
||||
// List of property values which need to be adjusted.
|
||||
fValueTreeNodes: TList;
|
||||
//fValueTreeNodes: TList;
|
||||
fHasMissingProperties: Boolean; // LFM file has unknown properties.
|
||||
fHasMissingObjectTypes: Boolean; // LFM file has unknown object types.
|
||||
// References to controls in UI:
|
||||
@ -395,10 +395,10 @@ end;
|
||||
|
||||
function TLFMFixer.Repair: TModalResult;
|
||||
var
|
||||
CurError: TLFMError;
|
||||
// CurError: TLFMError;
|
||||
// MissingObjectTypes: TStringList; <- Remove. Must be a left-over from something.
|
||||
ConvTool: TConvDelphiCodeTool;
|
||||
TypeName: String;
|
||||
// TypeName: String;
|
||||
LoopCount: integer;
|
||||
begin
|
||||
Result:=mrCancel;
|
||||
|
Loading…
Reference in New Issue
Block a user