Delphi - błąd "is not a type identifier" podczas kompilacji

0

Witam wszystkich!

Jako, że dopiero zaczynam swoją przygodę z programowaniem problem który uniemożliwia mi dalsze pisanie jest pewnie dla większości z Was banalny, jednak właśnie dlatego publikuje go w tym dziale.

Podczas próby kompilacji niżej zamieszczonego kodu w środowisku firmy Borland - Delphi 7 wyskakuje mi błąd zawarty w tytule - 'n' is not a type identifier.

Kod:

unit XYZ;

interface

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

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Edit1: TEdit;
    ListBox1: TListBox;
    Label1: TLabel;
    Edit2: TEdit;
    Label2: TLabel;
    procedure Edit1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  a,b,c,n: integer;
  h,m,s,ms: word;
  start,stop: TDateTime;

implementation

{$R *.dfm}


procedure TForm1.Edit1Click(Sender: TObject);
begin
  TEdit(Sender).Clear;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  close;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    n:=StrToInt(Edit1.text);
  except
  on EConvertError do
    showmessage ('xyz');
  on n<5 do
    showmessage ('abc');
end;

[...]

Dodam, że w linijce "on n<5 do" próbowałem różnych kombinacji (n:<5 , n:=<5 , StrToInt(Edit1.text)<5 , n:=StrToInt(Edit1.text)<5).

Liczę na wyrozumiałość gdyż jako napisałem wcześniej jestem kompletnym laikiem.

Z gory dziękuję za odpowiedź i pozdrawiam.

0

to jeśli jesteś laikiem to może warto było by najpierw zasięgnąć podstawowej wiedzy (nazywanej czasem teorią) o tym co chcesz zrobić. Jasno tam pisze co może być po słówku on

0

Dzięki za odpowiedź. Temat do zamknięcia.

1 użytkowników online, w tym zalogowanych: 0, gości: 1