finalwhe.blogg.se

I'm only showing the class method here, you will of course have otherĬlass function TPopupForm.Execute: boolean Switch to the unit of the modal form, and add a public class method to OK, here is the recipe to clean up all this mess -).įirst, go into the project options, Forms page, and remove the modalįorm from the list of autocreated forms. In his case the modal form may come up beneath the main form.

If you have moved this application from an older (pre D2009)ĭelphi version the Application.MainformOnTaskbar property will beįalse. Make sure you have set the PopupMode property of the modal form to >When I set it to True, then the Showmodal for the other

You have set Application.ShowMainform to false. The VCL startup code will do that automatically unless Happens when the form is about to be shown (when its Show method hasīeen called). > that ain't happening anymore :( it's probably because Visible is set > After closing the popup form, I want to show the mainform. Really do it from an event of the main form, you have to modify the The main form is displayed, is best done using another strategy. If it worked before it did so more or less byĪnyway, what you are trying to do, i. You have to grant that the main form position is not really defined if > Position = poDefaultPosOnly Then it will show the form. > and the other form has position = poMainFormCenter > Now on the mainform has for Position = poDefaultPosOnly > it executes startupscreen.showmodal and it it's just waiting > Now all the sudden, it does not work anymore. > So when firstrun = True then it shows my other form. > procedure tdsmainform.formshow(sender: tobject) > For BOTH form the Visible is set to FALSE. > For some reason, i think it's caused by Update 4 Delphi XE2 When I set it to True, then the Showmodal for the other forms won't work anymore. It's probably because Visible is set to FALSE. now I need to set the 2nd form to Position = poDefaultPosOnlyĪfter closing the popup form, I want to show the mainform.

Now on the mainform has for Position = poDefaultPosOnlyĪnd the other form has position = poMainFormCenter It executes startupscreen.showmodal and it it's just waiting invisible. Now all the sudden, it does not work anymore. So when firstrun = True then it shows my other form. Procedure tdsmainform.formshow(sender: tobject) For some reason, i think it's caused by Update 4 Delphi XE2įor BOTH form the Visible is set to FALSE.