Как-то так
Цитата:
Сообщение от Antidelphik
Здравствуйте все гости темы, проблема вот в чем: написала код для проверки наличия в моем делфи BDE, (ато вдруг нету)
Код:
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.
а мой умник выдает ошибку
Код:
[Error] Project1.dpr(7): Declaration expected but identifier 'Unit1' found
в чем дело? подскажите
|
Скопировал, вставил. В принципе все работает только чего-то нехватает у тебя.
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
|