Results 1 to 4 of 4

Thread: Firemonkey - update embedded form

  1. #1

    Firemonkey - update embedded form

    Code:
    procedure TfrmMain.EmbeddForm(AParent: TControl; AForm: TCustomForm; TagForm:integer);
    begin
    
      while AForm.ChildrenCount > 0 do
        AForm.Children[0].Parent  :=  AParent;
    
        Self.Invalidate;
      Application.HandleMessage;
    
    end;
    
    DM.MainDataModule.qryTemplates.Open;
    EmbeddForm(Panel1, TfrmTemplates.Create(Self));
    Ik gebruik bovenstaande code om een form in een panel te plaatsen. De eerste keer worden de juiste gegevens getoond. Echter indien naderhand iets wordt gewijzigd en bovenstaande code nogmaals wordt uitgevoerd wordt het form in de panel niet ververst.

    Hoe kan ik het form in het panel refreshen?

  2. #2
    John Kuiper
    Join Date
    Apr 2007
    Location
    Almere
    Posts
    8,747
    Firemonkey en Lazarus ? Moet dat niet delphi XE2 zijn?
    Delphi is great. Lazarus is more powerfull

  3. #3
    Ik denk het wel

    Maar wat refresht er niet? Is dat iets van je dataset, of andere controls?
    Marcel

  4. #4
    De dataset gaf geen refresh. Heb het opgelost door het panel in run-time aan te maken.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •