[Neocoder]

Здравствуйте. Очень странная проблема. Написал программу по учебнику Климовой Лалы, код вроде правильный, програма компилится. Запускаю-нажимаю кнопку ноль реакции.Делаю какие нибудь изменения-ноль реакции.Никогда такого не видел, интересный вопрос, посмотрите пожалуйста. Файл:http://stream.ifolder.ru/8987772

[ApplicatiOn]

а что лежит в событии на кнопку? (файл не качал)

код киньте пожалуйста

[Neocoder]

Код:

 procedure TForm1.Button1Click(Sender: TObject);
 begin
 If OpenDialog1.Execute Then
 A := OpenDialog1.FileName
 Else begin
 ShowMessage('Вы не ввели имя файла.Повторите ввод!');
Exit; end;

но это лишь обрывок кода тут действительно странная ситуация. Пожалуйста,если есть возможность, посмотрите файл, 240 кб объем.

[Aristarh Dark]

Я вообще не понял для чего программа и что она должна делать, но после запуска открылось окно выбора файла, я выбрал 5.dat и упал по ошибке ввода/вывода.
ИТОГ: конкретезируй вопрос.

[Neocoder]

А в какой версии делфи вы открывали?Программа написана на Delphi7 с настройками по умолчанию.Никаких ошибок не выдает.Текст задания вот http://stream.ifolder.ru/8988457 файле, но по коду должно быть все правильно.

[Drozh]

У тебя не связаны кнопка и процедура... Ты что их в ручную писал?!

Выбираешь кнопку -> в Object Inspector переходишь на вкладку Events -> ищешь событие OnClick -> нажимаешь на соседнюю ячейку и выбираешь нужную процедуру из списка

[Neocoder]

Вручную.С предыдущими программами все работало же,в них тоже вручную.Опережающие описание процедуры есть, вызов ее в программе тоже, разьве будет в чем то разница вручную или через инспектор?

[Alexo]

Процедуру надо связывать с событием котрола.

в ручную это делаеться так Button1.click := Button1click;

[Neocoder]

Огромное вам всем спасибо, связал- заработало, буду отлаживать.