![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Здравствуйте все гости темы, проблема вот в чем: написала код для проверки наличия в моем делфи BDE, (ато вдруг нету)
Код:
program Project1; uses Forms, BDE; Unit1 in 'Unit1.pas' {Form1}; {$R *.res} var SV:SysVersion; begin Application.Initialize; if (dbiGetSysVersion(SV)<>DBIERR_None)or(SV.iVersion<400)then begin MessageDlg('на вашем компьютере не установлен BDE. Дальнейшая работа программы невозможна',mtError,[mbOK],0); Halt(1) end; Application.CreateForm(TForm1, Form1); Application.Run; end. Код:
[Error] Project1.dpr(7): Declaration expected but identifier 'Unit1' found Последний раз редактировалось Antidelphik, 03.05.2011 в 10:20. |
#2
|
||||
|
||||
![]() Цитата:
Скопировал, вставил. В принципе все работает только чего-то нехватает у тебя. Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. Последний раз редактировалось Kailon, 03.05.2011 в 10:34. |
#3
|
||||
|
||||
![]() спасибо =) теперь все ошибки прошли, но одна единственная появилась
Код:
program Project1; uses Forms, BDE, Dialogs, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} var SV:SysVersion; begin Application.Initialize; if (dbiGetSysVersion(SV)<>DBIERR_None)or(SV.iVersion<400)then begin MessageDlg('на вашем компьютере не установлен BDE. Дальнейшая работа программы невозможна',mtError,[mbOK],0); Halt(1) end; Application.CreateForm(TForm1, Form1); Application.Run; end. Код:
[Fatal Error] Project1.dpr(6): File not found: 'Unit1.dcu' |
#4
|
||||
|
||||
![]() Сделай новый проект и аккуратно, по строчкам, скопируй.
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. |
#5
|
||||
|
||||
![]() оёёёй!! заработало )))) тока я ничего не копировала, сохранила просто эту, закрыла её, а потом снова открыла и запустилось все без проблем =) так, мне сообщения не выдало то которое в THEN, значит у меня есть BDE?
|
#6
|
||||
|
||||
![]() Конечно у тебя есть BDE! У тебя же Delphi установлено!
А сохраняться надо всегда ;-) Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. Последний раз редактировалось Kailon, 03.05.2011 в 11:08. |
#7
|
||||
|
||||
![]() просто в методичке по которой я делаю написано что BDE может и не установится вместе с делфи =) а я сохранилась до этого, но не закрывала прогу, а тут я всё таки ещё раз пересохранилась и прогу закрыла, а когда открыла уже всё работало =) ну ладно, спасибочки =)
|