eu imaginei que fosse, coloquei e não funcionou, veja o codigo :
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, BDE;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var
AName, ADriver, APath : String;
begin
AName := 'stainle';
ADriver := 'STANDARD';
APath := 'c:\remoto\dados';
// Inicializa o ambiente do BDE
Check(DBInit(nil));
// Adiciona Alias ao arquivo de configuração do BDE
Check(DBIAddAlias(nil, PChar(AName), PChar(ADriver), PChar('Path:', +
APath), True));
Check(DBIExit);
end;
end.
quando chega no Check ele diz : undeclared identifier
grato
Stainle
Rubem Nascimento da Rocha <[EMAIL PROTECTED]> escreveu:
A unit é a BDE.
Sds.
To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Wed, 24 Oct 2007 17:54:01
+0000Subject: [delphi-br] BDE
Utilizando Delphi 5, gostaria se saber se já existe o BDE instalado
nocomputador e depois instalar o "álias", estou tentando fazer esta operação
:// Inicializa o ambiente do BDECheck(DBInit(nil));dá um erro de compilação,
qual seria a UNIT que tenho que declarar emUSES ??gratoStainle
__________________________________________________________
Conheça o Windows Live Spaces, a rede de relacionamentos conectada ao Messenger!
http://spaces.live.com/signup.aspx
[As partes desta mensagem que não continham texto foram removidas]
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
[As partes desta mensagem que não continham texto foram removidas]
