[F] Programm zum schätzen

hi,
ich habe von ein paar tagen mit einem buch angefungen delphi zu lernen..
zum problem:

ich habe alles so gemacht wie es im buch stand(ein paar texte variablen-namen geändert)
und es kommt:
[Fehler] Unit1.pas(214): Deklaration erwartet, aber Dateiende gefunden

mein unfertiges programm:
http://rapidshare.com/files/62439754...RAR-Archiv.rar

hofe mir kann jemand helfen und den fehler erklären....

der code der dirn steht falls jemand kein delphi hat aber pascal kann:

Code:

---

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    Label1: TLabel;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Eingabe: Integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    Eingabe := StrToInt (Edit1.Text);
    if Eingabe = 53434 then Label1.Caption := 'Richtig getippt!';
  except
    Label1.Caption := 'FALSCH!';
end;

end.

---

mfG
mike

Versuch mal:

Code:

---

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    Eingabe := StrToInt (Edit1.Text);
    if Eingabe = 53434 then Label1.Caption := 'Richtig getippt!';
  except
    Label1.Caption := 'FALSCH!';
  end;
end;

---

Oder versuchs mal so ;)

Code:

---

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    Eingabe := StrToInt (Edit1.Text);
    if Eingabe = '53434' then Label1.Caption := 'Richtig getippt!';
  except
    Label1.Caption := 'FALSCH!';
end;

end.

---

Du hast nämlcih 53434 nicht als variable also musst du es in '' setzen ;)

danke danke!
also immer in '' setzen?

mfG
mike

ne es is doch integer, da darf man das nicht. sonst wird es doch ein string!

Zitat:

---

Zitat von gORDon_vdLg

ne es is doch integer, da darf man das nicht. sonst wird es doch ein string!

---

???????
Vllt. solltest dir ne andere programmiersprache zulegen :P
Also ich denke mal 1. funktioniert es ;)
Und 2. bin ich mir 99 % sicher dass die '''' nix mit integer und strings zu tun haben -.-

Zitat:

---

Zitat von Nano

Zitat:

---

Zitat von gORDon_vdLg

ne es is doch integer, da darf man das nicht. sonst wird es doch ein string!

---

???????
Vllt. solltest dir ne andere programmiersprache zulegen :P
Also ich denke mal 1. funktioniert es ;)
Und 2. bin ich mir 99 % sicher dass die '''' nix mit integer und strings zu tun haben -.-

---

bevor du sowas sagst solltest du sicher gehen: http://www.gordon-stuff.de/nix/delphi.jpg

udo ey^^

in dem fall von der frage is das glaub ich so weil edit felder immer als string behandelt werden (deswegen auch immer StrToInt(Edit1.text) wenn man nen taschenrechner macht)

bin mir aber net sicher weil ich delphi netmehr mach.

ja bei edit1.text is klar das man die ' nich braucht weil es ja wie ne variable behandelt wird... aber bei if Eingabe = '53434' then darf man die ' nicht verwenden weil Eingabe vorher als integer deklariert wurde...

Zitat:

---

Zitat von der Code da oben

var
Form1: TForm1;
Eingabe: Integer;

---

Hier deklariert er die VARIABLE (@Gaara es handelt sich nich um ein editfeld sondern um eine Variable) als Integer; somit müssen die '' weggelassen werden......

Code:

---

procedure TForm1.Button1Click(Sender: TObject);
 var eingabe:integer;
begin
  try
    Eingabe := StrToInt (Edit1.Text);
    if Eingabe = 53434 then Label1.Caption := 'Richtig getippt!';
  except
    Label1.Caption := 'FALSCH!';
end;
    end;

end.

---

mfg

Time2Play's Variante is die einzige die geht THX Time2Play...

also Intenger ...... Nur Zahlen
und welche Variblae brauch ich um auch bauchstaben einfügen zu können??

mfG
mike