TIBDataBaase

25/02/2003

0

No evento BeforeConect do meu TIBDatabase eu tenho o seguinte comando:

var
Arq: String;
Str: TStringList;
begin
Str:= Nil;
Arq:= ExtractFilePath( Application.ExeName ) + ´Banco.hav´ ;

If FileExists( Arq ) then
begin
try
Str:= TStringList.Create;
Str.LoadFromFile( Arq );
DB.DatabaseName:= Trim( Str[0] );
finally
Str.Clear;
Str.Free;
end;
end;
end;


O que está errado?
O delphi está dizendo... Undeclared identifinder ´Application´
Por que? Como Faço?


Anonymous

Anonymous

Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar