summaryrefslogtreecommitdiff
path: root/examples/gui
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-08-31 10:09:44 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-08-31 10:09:44 +0000
commit052d28c91a70678b264fb7772096da6fb6803dc3 (patch)
treea85abf936ba6f95bffcaae00b431121c305c032a /examples/gui
parent13bdc0b2269cfc49d605a057f24b0ba83c37b1b4 (diff)
downloadfpGUI-052d28c91a70678b264fb7772096da6fb6803dc3.tar.xz
* 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
Diffstat (limited to 'examples/gui')
-rw-r--r--examples/gui/hintwindow/edittest.lpi3
-rw-r--r--examples/gui/hintwindow/edittest.lpr2
2 files changed, 2 insertions, 3 deletions
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);