From d0fe05e1792b9998f1e450b1355376840712e89c Mon Sep 17 00:00:00 2001 From: Mark van Renswoude Date: Fri, 6 Jan 2006 22:51:30 +0000 Subject: [PATCH] Fixed: Delphi 7 Access Violation when opening a unit --- Source/UnSwDefines.inc | 2 +- Source/UnSwObjects.pas | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Source/UnSwDefines.inc b/Source/UnSwDefines.inc index b1ec7da..acc8ef2 100644 --- a/Source/UnSwDefines.inc +++ b/Source/UnSwDefines.inc @@ -1,4 +1,4 @@ -// Lowest supported version is Delphi 7. It lacks some OTA functionality +// Lowest supprted version is Delphi 7. It lacks some OTA functionality // in comparison to Delphi 2006. Note that UnitSwitcher has not been tested // on any other Delphi version! {$UNDEF DELPHI7} diff --git a/Source/UnSwObjects.pas b/Source/UnSwObjects.pas index 95a20bb..94af594 100644 --- a/Source/UnSwObjects.pas +++ b/Source/UnSwObjects.pas @@ -196,7 +196,7 @@ begin end else if ASource then begin - ifEditor.Show(); + AModule.ModuleFileEditors[iModule].Show(); break; end; {$ELSE}