Thread View: cn.bbs.comp.program
1 messages
1 total messages
Started by �ϵ�
Sun, 19 Apr 1998 00:00
Dynamic Create
Author: �ϵ�
Date: Sun, 19 Apr 1998 00:00
Date: Sun, 19 Apr 1998 00:00
38 lines
1521 bytes
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
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads