|
Вопрос # 4 414/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!
Пишу программу СУБД по книжке Ю.А.Шпака "Delphi 7 на примерах",и столкнулся с проблемой,что прога не компилируется..выдает ошибку
[Error] StfMain.pas(8): Declaration expected but identifier 'StfDMod' found
[Fatal Error] Staff.dpr(7): Could not compile used unit 'StfMain.pas'
Программа состоит из 4-х модулей,компиллятор ругается на 2 из них,вот их код.
Также прикрепляю файлы недоделаной неоткомпилированной программы.Помогите кто может,заранее всех благодарю за помощь!
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
Приложение: Переключить в обычный режим- unit StfMain;
-
- interface
-
- uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
-
- Dialogs;StfDMod,StfLogin;
-
-
- type
- TfmMain = class(TForm)
- private
- { Private declarations }
- public
- { Public declarations }
- end;
-
- var
- fmMain: TfmMain;
-
- implementation
-
- {$R *.dfm}
-
- end.
-
- program Staff;
-
- uses
- Forms,Controls,
- StfMain in 'StfMain.pas' {fmMain},
- StfDmod in 'StfDmod.pas' {dmStaff: TDataModule},
- StfLogin in 'StfLogin.pas' {fmLogin};
-
- {$R *.res}
-
- begin
- Application.Initialize;
- Application.CreateForm(TfmMain, fmMain);
- Application.CreateForm(TdmStaff, dmStaff);
- Application.CreateForm(TfmLogin, fmLogin);
- if fmLogin.ShowModal = mrCancel
- then Application.Terminate
- else begin
- fmMain.Visible := True;
- Application.Run;
- end;
- end.
 |
Вопрос задал: авз (статус: Посетитель)
Вопрос отправлен: 12 июля 2010, 09:28
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: DNK
Здравствуйте, авз!
Пять минут тыканья по клавишам и теперь код компилируется. На счет правильности работы программы не зарекусь. Особо обрати внимание на метод TfmLogin.LaedDatabaseChange, там параметры проверяются на пустую стороку или на пробел? Если что, подправляй.
К ответу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки ответа)
 |
Ответ отправил: DNK (статус: Студент)
Время отправки: 12 июля 2010, 12:04
Оценка за ответ: 5
Комментарий к оценке: Большое спасибо за помощь!В дальнейшем если будут возникать вопросы обращусь к тебе!
|
Мини-форум вопроса
Всего сообщений: 5; последнее сообщение — 12 июля 2010, 11:17; участников в обсуждении: 3.
|
Тов. Женька (статус: 3-ий класс), 12 июля 2010, 09:52 [#1]:
Такое ощущение, что код был отсканирован и вставлен. Переписывать все, вот мой совет.
|
|
min@y™ (статус: Доктор наук), 12 июля 2010, 10:39 [#2]:
После Dialogs дожна быть запятая. Не надо тупо копипастить чужой код, надо разбираться, как он работает.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
авз (статус: Посетитель), 12 июля 2010, 11:08 [#3]:
К сожалению в книге листинги программы почти не приводятся в полном виде..только фрагменты самого необходимого.После Dialogs ставить запятую пробовал,но в результате выскакивает еще несколько ошибок при компиляции..вот и не пойму в чем дело..Я кстати файлы программы недоделанной,неоткомпилированной прикрепил к моему вопросу, и если кому нетрудно посмотрите их пожалуйста ,попробуйте исправить ошибку.Заранее всех благодарю за помощь!
|
|
|
Тов. Женька (статус: 3-ий класс), 12 июля 2010, 11:14 [#4]:
Слишком много "каши", я уже посмотрел.
|
|
|
min@y™ (статус: Доктор наук), 12 июля 2010, 11:17 [#5]:
Цитата (авз):
в результате выскакивает еще несколько ошибок при компиляции.
Да потому что там есть ошибки! Исправь их.
Цитата (авз):
вот и не пойму в чем дело.
А ты сообщения компилятора читать пробовал? Говорят помогает.
Цитата (авз):
Заранее всех благодарю за помощь!
Ненавижу эту фразу. Всякую охоту что-то делать отбивает, ведь уже отблагодарили, нафига напрягаться?..
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
