Помогите новичку

← →
Alex II © (2002-06-14 12:27) [0]

Изучаю Delphi 6 по книге ввел следующий текст
unit Unit1;

interface

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

type
TMyForm = class(TForm)
Edit1: TEdit;
Button1: TButton;
Edit2: TEdit;
Label1: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
MyForm: TMyForm;

implementation

{$R *.dfm}

procedure TMyForm.Button1Click(Sender: TObject);
begin
Label1.Caption:=
IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text)

end;

end.

Программа считает два числа. Сначала программа компилировалась, но или не считала или не выводила сообщение куда надо, а потом и компилироваться перестала. Выдает ошибку после первого слова end;

Спасибо.

← →
Игорь Шевченко © (2002-06-14 12:44) [1]

В коде, на первый взгляд, все в порядке. Ошибка где-то в другом месте.

Автору: вежливые люди приводят еще и текст сообщения об ошибке

← →
Ally © (2002-06-14 12:45) [2]

1. Незакрыта скобка в IntToStr()

Label1.Caption:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));

3. В Object Inspector"e не прописан метод OnClick у Button1

← →
VAleksey © (2002-06-14 12:46) [3]

на первый взгляд не хватает скобки
> IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text))

скобку не закрыл.

Label1.Caption:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));

А вообще с такими вопросами конечно...
читай книжки

Помогите новичку Найти похожие ветки