Login ProductsSalesSupportDownloadsAbout |
Home » Technical Support » DBISAM Technical Support » Support Forums » DBISAM General Discussion » View Thread |
Messages 11 to 15 of 15 total |
Embedded Forms |
Mon, Oct 29 2007 12:48 PM | Permanent Link |
Roy Lambert NLH Associates Team Elevate | Matthew
That was my first thought - didn't work. What I'm doing now is sending a custom message to the form which in turn fires the FormActivate event - cacky but it works. Roy Lambert |
Mon, Oct 29 2007 2:08 PM | Permanent Link |
Tim Young [Elevate Software] Elevate Software, Inc. timyoung@elevatesoft.com | Roy,
<< I've just discovered one problem with the embedded forms approach - FormActivate doesn't fire. What do you do about that? >> I don't use it, so I didn't run into that issue. -- Tim Young Elevate Software www.elevatesoft.com |
Tue, Oct 30 2007 12:57 AM | Permanent Link |
HJ | Roy Lambert wrote:
> Tim > > > I've just discovered one problem with the embedded forms approach - FormActivate doesn't fire. What do you do about that? Sorry to jump in. May be I'm wrong but I found, if the PageControl have a close button, FormClose also not fire when I close the tab by clicking the close button. I'm using DevEx's PageControl. > > Roy Lambert > HJ |
Tue, Oct 30 2007 4:48 AM | Permanent Link |
Roy Lambert NLH Associates Team Elevate | HJ
I'm using TMS and the FormClose event does fire when I click the close button - here's the code I'm using procedure TMainForm.FormControllerClosePage(Sender: TObject; PageIndex: Integer; var Allow: Boolean); var Cntr: integer; TagNo: integer; begin TagNo := FormController.ActivePage.Tag; Allow := TagNo > tagCallbacks; if FormController.Tag = 1 then begin for Cntr := 0 to Application.ComponentCount - 1 do begin if (Application.Components[Cntr] is TForm) and (TForm(Application.Components[Cntr]).Tag > 0) then begin if TForm(Application.Components[Cntr]).Parent = FormController.ActivePage then begin TForm(Application.Components[Cntr]).Close; end; end; end; if (not Allow) and (not IsCreated[TagNo]) then begin SwitchCloseForOpen; end; end else begin LoadPrimaryForm(TagNo, False); end; end; I use the button to close the form if its created, and create it if it isn't Roy Lambert |
Tue, Oct 30 2007 8:30 AM | Permanent Link |
HJ | Roy Lambert wrote:
My fault, I don't write a Close method Thanks. HJ |
« Previous Page | Page 2 of 2 | |
Jump to Page: 1 2 |
This web page was last updated on Friday, April 19, 2024 at 07:09 AM | Privacy PolicySite Map © 2024 Elevate Software, Inc. All Rights Reserved Questions or comments ? E-mail us at info@elevatesoft.com |