RibaSoft

Acesso MariaDB com ZConnection e ZQuery da paleta Zeos Acces

Jan 3rd, 2023
1,916
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.54 KB | None | 0 0
  1. uses
  2.   ZConnection, ZDataset;
  3.  
  4.   Conexao := TZConnection.Create(nil);
  5.   Query := TZQuery.Create(nil);
  6.   Query.Connection := Conexao;
  7.  
  8.   with Conexao do
  9.   begin
  10.     User := 'usuario';
  11.     Password := 'senha';
  12.     Database := 'nome_banco';
  13.     HostName := 'ip_ou_site';
  14.     AutoCommit := False;
  15.     Protocol := 'MariaDB-10';
  16.     Port := 3306;
  17.   end;
  18.  
  19.   //Confirmar TransaΓ§Γ£o
  20.   Conexao.Commit;
  21.  
  22.   //Cancelar transaΓ§Γ£o
  23.   Conexao.Rollback;
  24.  
  25.   //Fechar a conexao ao termino
  26.   Conexao.Connected := False;
  27.  
  28.   //Dll
  29.   libmariadb.dll
Advertisement
Add Comment
Please, Sign In to add comment