hi,
ich habe heute mit delphi angefangen und benutze die "abgespeckte" kostenlose version borland 2005. ich habe aus einem delphi tutorial ein code kopiert (für einen rechner) und die variablen und lablename nur umbenannt. aber beim parsen kommen irgendwie fehlermeldungen:
Code:
unit WinForm1;
interface
uses
System.Drawing, System.Collections, System.ComponentModel,
System.Windows.Forms, System.Data;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1; //Hier werden die Globalen Variablen definiert
implementation
{$R *.DFM}
{$REGION 'Vom Windows Form-Designer erzeugter Code'}
/// <summary>
/// Erforderliche Methode zur Unterstützung des Designers --
/// ändern Sie die Methode nicht mit dem Quelltext-Editor
/// </summary>
procedure TWinForm1.InitializeComponent;
begin
Self.TextBox1 := System.Windows.Forms.TextBox.Create;
Self.Label1 := System.Windows.Forms.Label.Create;
Self.TextBox2 := System.Windows.Forms.TextBox.Create;
Self.Button1 := System.Windows.Forms.Button.Create;
Self.Label2 := System.Windows.Forms.Label.Create;
Self.SuspendLayout;
//
// TextBox1
//
Self.TextBox1.Location := System.Drawing.Point.Create(24, 80);
Self.TextBox1.Name := 'TextBox1';
Self.TextBox1.Size := System.Drawing.Size.Create(72, 20);
Self.TextBox1.TabIndex := 0;
Self.TextBox1.Text := 'edit1';
//
// Label1
//
Self.Label1.Location := System.Drawing.Point.Create(120, 80);
Self.Label1.Name := 'Label1';
Self.Label1.Size := System.Drawing.Size.Create(40, 24);
Self.Label1.TabIndex := 1;
Self.Label1.Text := '+';
//
// TextBox2
//
Self.TextBox2.Location := System.Drawing.Point.Create(176, 80);
Self.TextBox2.Name := 'TextBox2';
Self.TextBox2.Size := System.Drawing.Size.Create(96, 20);
Self.TextBox2.TabIndex := 2;
Self.TextBox2.Text := 'edit2';
Include(Self.TextBox2.TextChanged, Self.TextBox2_TextChanged);
//
// Button1
//
Self.Button1.Location := System.Drawing.Point.Create(72, 152);
Self.Button1.Name := 'Button1';
Self.Button1.Size := System.Drawing.Size.Create(128, 64);
Self.Button1.TabIndex := 3;
Self.Button1.Text := 'Button1';
Include(Self.Button1.Click, Self.Button1_Click);
//
// Label2
//
Self.Label2.Location := System.Drawing.Point.Create(72, 232);
Self.Label2.Name := 'Label2';
Self.Label2.Size := System.Drawing.Size.Create(144, 32);
Self.Label2.TabIndex := 4;
Self.Label2.Text := 'Label2';
//
// TWinForm1
//
Self.AutoScaleBaseSize := System.Drawing.Size.Create(5, 13);
Self.ClientSize := System.Drawing.Size.Create(292, 266);
Self.Controls.Add(Self.Label2);
Self.Controls.Add(Self.Button1);
Self.Controls.Add(Self.TextBox2);
Self.Controls.Add(Self.Label1);
Self.Controls.Add(Self.TextBox1);
Self.Name := 'TWinForm1';
Self.Text := 'WinForm1';
Self.ResumeLayout(False);
end;
{$ENDREGION}
procedure TForm1.Button1Click(Sender: TObject); //Unser OnClick-Ereignis
var
a, b, c: integer; //Unsere Variablen
begin
a:=StrToInt(edit1.Text);
b:=StrToInt(edit2.Text);
c:=a+b;
Label2.Caption:=IntToStr(c);
end;
end.
das programmfenster habe ich natürlich auch so erstellt wie es beschrieben war.
die rot markierten sachen werden als fehler angezeigt....wo ist das problem?!
2.) kann delphi projekte speichern?^^ wenn ich auf datei speichern unter-->die datei als *.pas speichere, wird sie beim öffnen dann auf einmal nicht gefunden 
edit: wusste nicht, dass es hier ein programmierforum gibt