Здравствуте начал изучать Delphi7 и сразу возникли трудности. По книжке написал подпрограмму
procedure TfmExample.bbRunClick(Sender: TObject); begin lbOutput.Caption := edInput.Text; // Повторяем текст в метке mmOutput.Lines.Add(edInput.Text); // и в многострочном редакторе edInput.Text := ''; // очищаем строку ввода edInput.SetFocus; // Передаем ей фокус ввода end; Начинаю компилировать а мне выдает следующие ошибки: [Error] Unit.pas(39): Undeclared indentifier:lbOutput' [Fatal Error] Project2.dpr[5]: Could not compile used unit 'Unit1.pas' |
Ну я Вам примерно тот же вопро задам, что и компилятор: А кто такой этот lbOutput?
|
Спасибо за помощь чайнику!!!
|
Спасибо за обьяснение преведущей ошибки, у меня все получилось. Но при написании новой программки появилась еще одна ошибка. Вот как она выглядит:"Project1.exe raised exception class EConvertError with message"' is not a valid integer value'.Process stopped.Use Step or Run to continue.
Причем программка все прощитывает и выдает правельный ответ, но после ответа выпадает вот такая ошибка. |
Думается, ошибку вызывает edInput.Text := ''; Поскольку нет числа "нет". Может, попробовать что-то типа "0"?
|
Спасибо за помощь у меня все получилось
|
Спасибо за помощь, но опять возникла ошибка при компилировании [Error]Unit1.pas(92):';'not allowed before 'ELSE' ,а ELSE убирать ни в коем случаи нельзя, а то программа работае не правельно. Как можно исправить эту ошибку?
|
Guest
Очевидно, какая-то синтаксическая ошибка. Попейте кофейку, погуляйте, отдохните, а потом пристально просмотрите код ещё раз :). |
Я изучаю делфи по этому адресу http://program.rin.ru/cgi-bin/print.pl?id=1054&p=1 там много арфографических ошибок вы бы не могли посмотреть там вот эту процедуру procedure TfmExample.bbRunClick(Sender: TObject); в ней и выдает ошибку с ELSE. Да и еще есть такая сторочка чуть выше IbOutput.Caption :== 'Введите число:'; знака == не существует или он есть, потому что в этой строке тоже ошибка.
|
Цитата:
Цитата:
|
БОЛЬШОЕ СПАСИБО!!!
|
Время: 14:24. |
Время: 14:24.
© OSzone.net 2001-