From 36df4aab13cd62546a43354d2ce787445eebed9b Mon Sep 17 00:00:00 2001
From: Merlijn Wajer <merlijn@wajer.org>
Date: Thu, 25 Mar 2010 13:25:58 +0100
Subject: [PATCH] Fix for SimbaSettings.

---
 Projects/SAMufasaGUI/simbasettings.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Projects/SAMufasaGUI/simbasettings.pas b/Projects/SAMufasaGUI/simbasettings.pas
index e8d0ced..7ae34f9 100644
--- a/Projects/SAMufasaGUI/simbasettings.pas
+++ b/Projects/SAMufasaGUI/simbasettings.pas
@@ -86,7 +86,8 @@ var
 
 begin
   p := Mouse.CursorPos;
-  pp := TSettingsForm(Sender).ScreenToClient(p);
+
+  pp := TTreeView(Sender).ScreenToClient(p);
   N := SettingsTreeView.GetNodeAt(pp.x, pp.y);
   if N <> nil then
     if assigned(N.Data) then