Delphi/Access (BDE)

Question

Estou precisando desenvolver uma aplica��o Delphi/Access (BDE), mas d� erro na hora de criar um alias usando como Database Driver Name, o MSACCESS. Estou definindo corretamente o caminho do mdb no Dat...

Vinicius2k · Answer

Colega,Em qual vers�o do Access foi desenvolvido o banco? Os drivers s�o diferentes para 95, 97 e 2000... e o pior : a BDE n�o dah suporte � bancos Access 2000...J� que vc est� iniciando o desenvolvimento agora, por que n�o usa ADO ao inv�s da BDE... apenas uma sugest�o...T+...

D4rk Schn31d3r · Answer

Valeu pela dica sobre o ADO, mas � q j� programo ha um bom tempo usanso o BDE com SQL Server, eu n�o queria mudar muito minha forma de programar, ainda mais q essa vai ser minha �nica aplica��o em Access, portanto ... . De qq forma, tem certeza q o BDE n�o d� suporte mesmo ao Access 2000? Se for o caso, vou ter q pegar o Office 97 com algu�m emprestado.

Vinicius2k · Answer

Colega,A n�o ser que exista algum �macete� de configura��o q eu desconhe�a, pelo que sei (e n�o � muito) a BDE n�o suporta o Access 2000... infelizmente...T+...

D4rk Schn31d3r · Answer

Ok, vou instalar o Access 97 segunda-feira aqui no trabalho (pq no Rio amanh� � feriado), e qq coisa volto aqui pra tirar alguma d�vida. Valeu....

Tecnico_julio · Answer

Caro colega,para usar um banco de dados ACCESS no DELPHI voc� dever� o componente ADO e ao inv�s de usar o BDE voc� deve usar o ODBC....

Okama · Answer

Use o ADO com Access diretamente n�o precisa de ODBC, use um provedor Microsoft.Jet.OLEDB.4.0 e defina a localiza��o do .mdb...

D4rk Schn31d3r · Answer

E ae, blz? Resolvi fazer essa aplica��o em ADO mesmo, ao inv�s do BDE e estou com uma d�vida: como consigo passar, 1 valor para o par�metro do objeto ADODataSet? Com BDE fazia assim:

frmDm.qryTeste.ParamByName(�prmIDTeste�).AsInteger := gNum;

Vinicius2k · Answer

Sabia escolha...[code:1:ae2971c44b]frmDm.ADOQRYTeste.Parameters.ParamByName(�prmIDTeste�).Value := gNum;[/code:1:ae2971c44b]T+...

D4rk Schn31d3r · Answer

Valeu, funcionou! Outra coisa, tem como definir em qual linha escrever, dentro do CommandText Editor do ADODataSet, em tempo de execu��o? No BDE, fazia assim por exemplo:

 
Procedure TfrmConsPesq.dbgConsPesqTitleClick(Column: TColumn);
   Begin
      frmDm.qryConsPesq.Close;
      frmDm.qryConsPesq.SQL[frmDm.qryConsPesq.SQL.Count -1] := �ORDER BY � + Column.FieldName;
      frmDm.qryConsPesq.Open;
   End;

D4rk Schn31d3r · Answer

Updating, ......

Vinicius2k · Answer

Colega,O CommandText eh uma WideString e n�o uma TStringList como na TQuery...Vc precisa fechar o DataSet e passar a string toda novamente...T+...

D4rk Schn31d3r · Answer

Valeu, j� desconfiava disso, hehehe.  :)...

D4rk Schn31d3r · Answer

Ihhh, t� dando esse erro: [Error] ConsPesq.pas(117): String literals may have at most 255 elements! O problema � q meu c�digo SQL tem mais de 255 caracteres, e agora?!?

frmDm.adodsConsPesq.CommandText := �SELECT Pesq.ID_Pesq, Pesq.Num_Prot, Pesq.Tit_Proj, Inst.Inst, Pesquis.Pesquis FROM Pesq, Inst, Pesquis WHERE Inst.ID_Inst = Pesq.ID_Inst AND Pesquis.ID_Pesquis = Pesq.ID_Pesquis AND Pesq.Num_Prot LIKE :prmNumProt AND Pesq.Tit_Proj LIKE :prmTitProj AND Inst.Inst LIKE :prmInst AND Pesquis.Pesquis LIKE :prmPesquis ORDER BY � + Column.FieldName;

Vinicius2k · Answer

D4rk Schn31d3r,

:shock:
Isso eh no m�nimo estranho, jah q uma WideString deveria aceitar 2^30 caracteres... eu consigo simular o erro e, falando honestamente, n�o sei a causa...
Bem, mas acho q no seu caso seria mais conveniente vc usar uma ADOQuery... ateh pq vc teria a propriedade SQL como TStringList e resolveria tamb�m seu problema anterior (com a mudan�a apenas da �ltima linha da instru��o)...

T+

Anjocurioso · Answer

eu sei que ja � um pouco tarde, mas voce poderia ter criado um alias no ODBC do windows e o alias ja seria automaticamente exportado para o BDE e voce poderia fazer o acesso pelos componentes do BDE normalmente.... s� uma sugest�o ok??

Atenciosamente

Ellerson

F�rum Delphi/Access (BDE) #227558