请教各位朋友

Question

这个小程序共2个单元
unit DynamicDemo;interfaceprocedure ShowStringForm (str: string);
implementation
uses
  Forms, Controls, StdCtrls;
//设置待建窗体的各种属性。
procedure ShowStringForm (str: string);
var
  form: TForm;
begin
  Application.CreateForm (TForm, form);
  form.caption := '动态创建窗体';//设置名字
  form.Position := poScreenCenter;//设置位置为屏幕的中央
  with TMemo.Create (form) do
  begin
    Parent := form;
    Align := alClient;
    Scrollbars := ssVertical; //设置有垂直滚动条
    ReadOnly := True;
    Color := form.Color;
    BorderStyle := bsNone;
    WordWrap := True;
    Text := str;  //设置窗体显示的内容
  end;
  form.Show;       //显示窗体
end;
end.program PdynamicForm;uses
  Forms,
  DynamicDemo in 'DynamicDemo.pas';{$R *.res}
var
  str: string;
begin
  Application.Initialize;
  str := '聪明的程序员用Delphi,           FT  ,vc太烦了，不是么？     ';
  while Length (str) < 2000 do
  begin
    str:=str+str;
  end;
  ShowStringForm (str);//创建窗体
  Application.Run;
end.1.with TMemo.Create (form) do中的TMemo是什么整条语句代表什么意思?
2.Parent := form;代表什么意思
3.DynamicDemo in 'DynamicDemo.pas';代表意思
4.ShowStringForm (str); Application.Run;代表什么意思

Answer 1

Look Book! More and More ,Read and Read ,Think and Think,and you will step by step better and better!

Answer 2

1.这句话是创建一个TMemo的对象，然后设置它的各种属性
2.是指这个对象的父控件，也就是容器，是这个form。
3.看起来这个像是Delphi自动生成的工程文件，这是表示引用源程序所在的文件。
4.ShowStringForm是在DynamicDemo单元中声明的过程，这里是调用这个过程。
  Application.Run表示开始运行这个应用程序。

Answer 3

1.TMemo是TMemo类，整条语句可以看成这样
  memo1:=TMemo.Create (form);
with memo1 do //懂了吧
2。这个momo的父为此form
3。表示DynamicDemo 在 'DynamicDemo.pas'单元里
4.用自己的函数创建这个窗体，显示，
Application.Run;代表程序开始运行
//第一次在csdn上留贴，老大，一定要给我几分啊

Answer 4

wo kao,打字太慢了，想不到早又人说了，晕

Answer 5

建议你先学学object pascal 语法随便找本delphi书看看delphi是程序执行过程。