none
Delphi VCL component embed into winform. When click "TAB". the vcl control can't change focus.How i do? RRS feed

  • 问题

  • Delphi Code:

    function CreateControls(parentComponent:HWND):HWND;stdcall;export;
    var
      Panel:TPanel;
      Edit1 : TEdit;
      Edit2 : TEdit;
    begin
      Panel := TPanel.Create(nil);
      Panel.ParentWindow := parentComponent;
      Edit1 := TEdit.Create(nil);
      Edit2 := TEdit.Create(nil);
      Edit1.Parent := Panel;
      Edit2.Parent := Panel;
    Edit2.Top  := 25; Edit1.Text := 'Edit1'; Edit2.Text := 'Edit2'; Edit1.Name := 'Edit1'; Edit2.Name := 'Edit2'; result := Panel.Handle; end;

    C# code:

    [DllImport("libfuncs.dll")]
    static extern IntPtr CreateControls(IntPtr parentComponent);
    private void button10_Click(object sender, EventArgs e)
    {
         CreateControls(panel1.Handle);
                
    }
    thank you.






    • 已编辑 babyluoyi 2012年12月28日 2:53
    • 已移动 Lisa Zhu 2012年12月31日 7:18 off-topic (发件人:Visual C#)
    2012年12月28日 2:46

全部回复