From 052d28c91a70678b264fb7772096da6fb6803dc3 Mon Sep 17 00:00:00 2001
From: graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>
Date: Sun, 31 Aug 2008 10:09:44 +0000
Subject: * Made some changes to the Hint Help under Windows. Microsoft strikes
   again with it's weird behaviour. Windows sends fake MouseMove messages  
 when a windows is shown, hidden or moved. The backend had to filter out  
 those fake messages. For more details on this see the following link.  
 http://blogs.msdn.com/oldnewthing/archive/2003/10/01/55108.aspx

---
 examples/gui/hintwindow/edittest.lpi | 3 +--
 examples/gui/hintwindow/edittest.lpr | 2 +-
 2 files changed, 2 insertions(+), 3 deletions(-)

(limited to 'examples/gui')

diff --git a/examples/gui/hintwindow/edittest.lpi b/examples/gui/hintwindow/edittest.lpi
index a0d03018..e26ec9bc 100644
--- a/examples/gui/hintwindow/edittest.lpi
+++ b/examples/gui/hintwindow/edittest.lpi
@@ -17,7 +17,6 @@
     </VersionInfo>
     <PublishOptions>
       <Version Value="2"/>
-      <IgnoreBinaries Value="False"/>
       <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
       <ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
     </PublishOptions>
@@ -40,7 +39,7 @@
     </Units>
   </ProjectOptions>
   <CompilerOptions>
-    <Version Value="8"/>
+    <Version Value="5"/>
     <Other>
       <CustomOptions Value="-FUunits"/>
       <CompilerPath Value="$(CompPath)"/>
diff --git a/examples/gui/hintwindow/edittest.lpr b/examples/gui/hintwindow/edittest.lpr
index 7a09ccd4..33682a65 100644
--- a/examples/gui/hintwindow/edittest.lpr
+++ b/examples/gui/hintwindow/edittest.lpr
@@ -617,13 +617,13 @@ begin
   rb_time_1.OnChange:= @rb_time_1Change;
 
   rb_time_2 := CreateRadioButton(p_time,10,50,'2 seconds');
-  rb_time_2.Checked:= True;
   rb_time_2.OnChange:= @rb_time_2Change;
 
   rb_time_3 := CreateRadioButton(p_time,80,25,'3 seconds');
   rb_time_3.OnChange:= @rb_time_3Change;
 
   rb_time_5 := CreateRadioButton(p_time,80,50,'5 seconds');
+  rb_time_5.Checked:= True;
   rb_time_5.OnChange:= @rb_time_5Change;
 
   p_color := TfpgPanel.Create(self);
-- 
cgit v1.2.3-70-g09d2