Dynamic Create

Article View: cn.bbs.comp.program

Article #1156

Back to cn.bbs.comp.program Previous Next

#1156

From: �ϵ�
Date: Sun, 19 Apr 1998 00:00

38 lines
1521 bytes

������: njhe (ra), ����: RAD
��  ��:  Dynamic Create
����վ: '3m�Ͻ�ɺ�m' (Thu Feb 26 14:11:00 1998) , վ���ż�

    Delphi�ж�̬����Form��
    (1)���弴��������Form������
    (2)����TForm�Ĵ���������
    (3)�޸��´�����Form�����ԡ�

    Sample:

    procedure TForm1.Button1Click( Sender: TObject );
    var
      FrmChild: TForm;
    begin
      FrmChild := TForm.Create( Self );
      with FrmChild do
        begin
        FormStyle := fsStayOnTop;
        ShowModal;
        end;
    end;

    �˴�ʹ����Windows�еķ�ģʽ�Ի��򣬿������´�����Form��Main Form����
��С��ʱ�Բ��ı���״̬��

--

\|/ ____ \|/
~@-/ oO \-@~   ������!!!
/_( \__/ )_\
    \__U_/

m;37m�� ��Դ:���Ͻ�ɺ� bbs.njupt.edu.cn��[FROM: 202.119.236.104]m

--
[m[1;37m�� ��Դ:���ϴ�С�ٺ���Ϣ����վ bbs.nju.edu.cn��[FROM: a507yjh.nju.edu][m

Technical Details

Message-ID: <3OAbLG$sr7@bbs.nju.edu.cn>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: Chinese,GB
X-Google-Thread: fc86e,3916b2c4b11cf9f,start
X-Google-Attributes: gidfc86e,public
From: mendy.bbs@bbs.nju.edu.cn (�ϵ�)
Subject: Dynamic Create
Date: 1998/04/19
Message-ID: <3OAbLG$sr7@bbs.nju.edu.cn>
X-Deja-AN: 345849690
X-Filename: Programming/M.893006080.A
Organization: nju_bbs
Newsgroups: cn.bbs.comp.program