2011/4/6 zeljko <span dir="ltr"><<a href="mailto:zeljko@holobit.net">zeljko@holobit.net</a>></span><br><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

<div class="im">On Tuesday 05 of April 2011 22:16:29 <a href="mailto:t.wieckowski@gmail.com">t.wieckowski@gmail.com</a> wrote:<br>
> Hi,<br>
> since rev. 30161, my apps goes crazy.<br>
<br>
</div>Where and why your apps goes crazy because of that ?<br>
<div class="im"><br></div></blockquote><div><br>1. in some case I've OnClick code <span id="result_box" class="short_text" lang="en"><span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">which</span></span> show some control if another are visible, in that case they are not visible and <br>

I see what it should not see.<br>2. in some case I've MessageBox in OnClick, then if I've ItemIndex:=2 OnCreate Form then it fired that MessageBox<br>etc.<br><br>but there is no problem, I can use "if not Visible then exit;" <- OnClick<br>

or maybe better solution is:<br>RadioGroup1.OnClick:=nil;<br>RadioGroup1.ItemIndex:=2;<br>RadioGroup1.OnClick:=@RadioGroup1OnClick;<br><br> </div><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">

<div class="im">
> When I'm setting itemindex for Radiogroup in "OnCreateForm" event then<br>
> OnClick for that control is fired.<br>
<br>
</div>Actually, I've changed that to be Delphi compat.<br>
<div class="im"><br>
> Such behavior will be from now on ?<br>
<br>
</div>Yes, see  <a href="http://bugs.freepascal.org/view.php?id=15989" target="_blank">http://bugs.freepascal.org/view.php?id=15989</a><br>
<br></blockquote><div><br><br>IMHO I think that is odd behaviour, better (<span id="result_box" class="short_text" lang="en"><span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">logical)</span></span> in that case is to have OnChange event related with ItemIndex (but there's no OnChange for RadioGroup).<br>

<br>what will be now with ListBox,ComboBox.ItemIndex in that case ? I don't have Delphi to check.<br><span id="result_box" class="" lang="en"><span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps"><br>

Maybe another problem, I read a</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">little</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">about</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">this</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">behavior</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">in</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">Delphi</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">and</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">I do not know</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">if this is</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">true</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">but</span> (in Delphi) <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">Itemindex</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">OnClick</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">fires</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">only</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">when</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">different</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">from the</span> <span title="Kliknij, aby wyświetlić alternatywne tłumaczenia" class="hps">previous value</span></span> is set. Can't check this.<br>

 <br><br>best regards<br>Tomek<br></div></div>