From 5aa0e950b73848c774b7edb091c17d15ee6fc3f6 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Sun, 30 Sep 2007 06:14:37 +0000
Subject: [PATCH] win32: fix problem with TRadioButton.OnChange with modal call
 inside (issue #0007787)

git-svn-id: trunk@12251 -
---
 lcl/interfaces/win32/win32callback.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc
index 04d67b6fd3..6cf766f0b4 100644
--- a/lcl/interfaces/win32/win32callback.inc
+++ b/lcl/interfaces/win32/win32callback.inc
@@ -1935,7 +1935,7 @@ begin
         Windows.SendMessage(Window, EM_SETSEL, 0, -1);
       // RadioButton functionality
       if (lWinControl <> nil) and (lWinControl is TRadioButton) then
-        Windows.SendMessage(Window, BM_SETCHECK, BST_CHECKED, 0);
+        Windows.PostMessage(Window, BM_SETCHECK, BST_CHECKED, 0);
     end;
     WM_SHOWWINDOW:
     begin