Criar Acesso a Tabelas Via BDE passando senha como parametro

12/08/2003

0

Caros amigos.
Estou criando o codigo de um conversor BDE->INTERBASE e preciso da ajuda de vocês.
O Aplicativo é muito simples , e destina-se a uma prova curricular.
Ele deve listar o conteúdo de Tables do BDE e incluir as tabelas num checkListBox.
Os Seguintes códigos fazem este trabalho perfeitamente :

procedure TFrmPrincipal.FormCreate(Sender: TObject);
begin
Session.GetDatabaseNames(CBDatabase.Items);
end;

procedure TFrmPrincipal.CBDatabaseChange(Sender: TObject);
begin
Session.GetTableNames( CBDatabase.Items[CBDatabase.ItemIndex], ´´,
True, False, LBTable.Items);
LBTable.Sorted := True;
BtnExport.Enabled := LBTable.Items.Count > 0;
end;

Acontece que quando uma tabela é Interbase ou Paradox preciso de uma
chamada ao Login de forma dinâmica pois não tenho componente direto
acessando o diretorio ou Gdb .

Alguem sabe como chamar o prompt de Login dinamicamente ?

Session.GetPassword não funciona !

Temos outra solução ?


Smartsistemas

Smartsistemas

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar