1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

program Project1;

uses
  Forms,
  Unit1 in 'UNIT1.PAS' {Rudern};

{$R *.RES}

begin
  Application.CreateForm(TForm, Form);
  Application.Run;
end.					

1:

Application.CreateForm(TForm, Form);					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:

  Left = 485
  Top = 129
  Width = 435
  Height = 300
  Caption = 'Rudern'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Menu = MainMenu1
  PixelsPerInch = 96
  TextHeight = 16
  object TLabel
    Left = 56
    Top = 112
    Width = 4
    Height = 16
  end
  object ListBox1: TListBox
    Left = 184
    Top = 8
    Width = 209
    Height = 137
    ItemHeight = 16
    TabOrder = 0
  end
  object Edit1: TEdit
    Left = 16
    Top = 176
    Width = 377
    Height = 24
    TabOrder = 1
    Text = 'Pfadname'
  end
  object Button1: TButton
    Left = 40
    Top = 8
    Width = 105
    Height = 33
    Caption = 'Zeige_Liste'
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 40
    Top = 48
    Width = 105
    Height = 33
    Caption = 'Zeige_Matrix'
    TabOrder = 3
    OnClick = Button2Click
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.txt|*.txt'
    Left = 40
    Top = 224
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 224
    object Datei1: TMenuItem
      Caption = 'Datei'
      object Open1: TMenuItem
        Caption = 'Open'
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = 'Save'
        OnClick = Save1Click
      end
    end
  end
  object SaveDialog1: TSaveDialog
    Left = 72
    Top = 224
  end
end					

1:

object Form1: TForm1					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

program Project1;

uses
  Forms,
  Unit1 in 'UNIT1.PAS' {Rudern};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.