Вопросы по Delphi Опции

[stinger]

Web-дизайн уже надоел, решил поковыряться в программировании
Для ковыряния выбрал Delphi. Соответственно при написании первой пробной программки возник вопрос:
что не нравится в строчке с оператором end ?

Прикрепленные файлы

 1.jpg ( 58.68 килобайт ) Кол-во скачиваний: 224

 

[barns]

Web-дизайн уже надоел, решил поковыряться в программировании
Для ковыряния выбрал Delphi. Соответственно при написании первой пробной программки возник вопрос:
что не нравится в строчке с оператором end ?

точка после енда должна стоять в сааааамом конце программы

---------------8th December 2007 - 23:49-------------

а так как ты пишешь процедуру, то не должно быть оной.

[barns]

Мать !

паскаль

[Flip]

собственно да, не хватает ещё одного енд.
А вообще там ниже есть стора дебага, он пишет в чём твоя ошибка.

[barns]

Добавляем end. При попытке исполнения программы вылезает следующее...
Это ошибка самой Borland Delphi 2005 ?

dв редыдущем премере . замени на ;

[Flip]

Добавляем end. При попытке исполнения программы вылезает следующее...
Это ошибка самой Borland Delphi 2005 ?

можно текст полностью

[Flip]

Он не дописан

Код

procedure TWinForm.colculate(sender: System.Object; e: System.EventArgs);
var
A,B,C: single;
D: real;
X1,X2: real;
begin
A:=System.Convert.ToSingle(TextBox1.Text);
B:=System.Convert.ToSingle(TextBox2.Text);
C:=System.Convert.ToSingle(TextBox3.Text);
//Вычисление дискриминанта.
D:=B*B-4*A*C;
if D < 0 then
begin
Label5.Text:='Увнение не имеет действительных корней';
end
else
begin
X1:=(-B-sqrt(D))/(2*A);
X2:=(-B+sqrt(D))/(2*A);
Label5.Text:='X1='+X1.ToString+', X2='+X2.ToString;
end;
end;

в процедуре косяка я не вижу.

[Flip]

Не надо было писать код в проекте под .NET )

не доконца правильная фраза, не стоило писать под дотнет на делфи, ибо это геморой, выход если нужна именно дотнет тогда C#

[npet.]

Помогите новичку. Как инциализировать класса TRegistry? Какой кнопкой? В ручную не получается.