F�rum Rave Report - Par�metros para Database Connection #574157

24/01/2017

Bom dia, Estou utilizando o Rave para relat�rios, e utilizei o componente Database Connection para conex�o com o banco de dados e o driver data view para as instru��es SQL.

Para a utiliza��o no servidor onde consta o banco de dados (Firebird) est� tudo ok. a minha duvida � em rela��o a impress�o em um computador esta��o.
Como fa�o no delphi para passar o par�metro do ip e local da base de dados para o rave?

Obrigado!

Willian Pavan

Curtir t�pico

+ 0

Responder

Posts

24/01/2017

Willian Pavan

Depois de pesquisar muito encontrei esse c�digo em um site gringo

uses
  RvDLInterbase, RvDatabase;
procedure TForm1.Button1Click(Sender: TObject);
var
  Database: TRaveDatabase;
begin
  RvProject1.Open;

  Database := TRaveDatabase(RvProject1.ProjMan.FindRaveComponent(''Database1'', nil));
  if Assigned(Database) then begin
    Database.AuthRun.Datasource := ''ServerIP:/datapath/test.gdb'';
    Database.AuthRun.Username := ''sysdba'';
    Database.AuthRun.Password := ''ThePassword'';
  end; { if }
  RvProject1.ExecuteReport(''Report1'');

Adaptei ele para o meu c�digo fonte e deu certo. Caso algu�m passe pela mesma duvida que eu a resposta esta ai. Obrigado!

Responder

Gostei + 0