Ir para conteúdo
Fórum Script Brasil

danielrgoes

Membros
  • Total de itens

    295
  • Registro em

  • Última visita

Posts postados por danielrgoes

  1. Bom dia pessoal

    Eu tenho um campo CNPJ no meu banco de dados que estao com os dados corridos ou seja

    99999999999999

    eu gostaria de colocar uma mascara nele para aparecer certo no DBgrid

    porem quando eu coloco no editmask assim 99.999.999/9999-99

    só aparece os dois primeiros numeros

    alguém tem alguma ideia pra mim

  2. Bom dia pessoal

    eu tenho uma duvida hj eu uso o delphi com o banco de dados firebird 1.5

    mais agora eu preciso fazer um aplicaçao que acesse o banco de dados mais que não seja necessario instala - lo na maquina

    pois os usuarios iram carregar em diversos cliente

    ou seja irei colocar o exe e o banco e um cd e eles iram utilizar em diversos locais

    existe algum banco de dados compativel com o delphi que faça isso

    pois o firebird necessita da instalaçao

    abraços

  3. Jhonas

    Eu achava que não era isso porem recriei ele e mesmo assim nada

    pois se eu comentar essa linha ele vai ate na criaçao do proximo form que tenha QR

    aieu comento ele e para na proxima quetem QR

    eu acredito que seja algo com o QuickReport

    porem não estou conseguindo identificar o que é pois tem maquinas que fuincionam

    ai eu comentei todas e entrou no programa mais ao acionar o botao imprimir que chama o form

    try

    Frmimparquivos := Tfrmimparquivos.Create(Application);

    Frmimparquivos.qr_imparquivos.Preview

    finally

    FreeandNil(frmimparquivos);

    end

    Porem da o seguinte erro

    Access violatioat address 00448EA9 in mudulo projeto.exe read of address 000000028

    mais nas maquinas que estavam funcionando sem comentar abri normalmente

    abraços

  4. Antes de mais nada gostaria de agradecer muito ao Jhonas pela a força

    consegui reslver meu problema ai vai a soluçao

    coloquei i exe na maquina acessando remoto o banco

    porem não fuincionava não aconseguia abrir as tabelas

    quando tinha mais de 10 pessoas acessando o servidor (vista)

    tive que registra as 2 dlls do fire bird

    midas.dll e expint.dll

    ai resolveu meu problema

    abraço a todos

  5. Bom dia pessoal

    Estou precisando finalizar contar quantas sessoes estao abertas do windows

    e fechar uma quando atingir o numero 9

    na seria processo e sim sessao

    quando um usuario acessa a maquina se a gente for em

    clicar com o botao direito do mouse em meu computador -> gerenciar -> compartilhamento -> Sessao

    vamos ver ela presa lá gostaria de saber se tem como fechala no delphi

    abraços

  6. Jhonas tentei todas as dicas citadas mais nenhuma funcionou

    Pois fiz bastantes pesquisar e não tem jeito mesmo o limite é 10 usuarios

    potem o que eu não entendo é que eu entro e conecto no banco

    modulo.conexao.open;

    depois que faço a pesquisa que eu quero eu fecho

    modulo.conexao.close;

    porem mesmo o exe estando na maquina local não fecha a sessao no servidor

    se eu clicar com o botao direito no meu computador e for em gerenciar a sessao vai ta presa lá

    porque sera

    abraços

  7. fui seguindo os passos certinhos porem não existe a opçao que manda eu entrar no windows (a que esta em negrito)

    1. Clique em Iniciar , aponte para programas , aponte para Ferramentas administrativas e, em seguida, clique em Diretiva de segurança local .

    Observação Se você não pode executar essa etapa porque Ferramentas administrativas não aparecem na lista de programas , clique em Iniciar , aponte para configurações , aponte para Painel de controle , clique duas vezes em Ferramentas administrativas e clique em Diretiva de segurança local .

    Observação No Windows XP, a subchave RestrictAnonymous pode ter um valor de 0 ou 1. Um valor de 1 restringe conexões de sessão nula no Windows XP. Para regulamentação da enumeração de contas SAM, a seguinte subchave do registro novo foi adicionada:

    HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\restrictanonymoussam

    A diretiva é configurável por meio de configurações de segurança local em segurança Settings\Local Policies\Security Options\Network acesso: não permitir enumeração anônima de contas .

    2. Em Configurações de segurança , clique duas vezes em Diretivas locais e clique em Opções de segurança .

    3. Clique duas vezes em restrições adicionais para conexões anônimas e em configuração de diretiva local: , clique em não acessar sem permissões anônimas explícitas .

    4. Reinicie o computador.

  8. a dll midas.dll geristrou certo mais a dbexpint.dll

    deu o erro abaixo

    dbexpint.dll was loaded but the DllRegisterServer entry point was not fond

    DllRegistterServer may not be exported or a corrupt version of dbexpint.dll may be in memory. Consider using Pview to detect and remove it

  9. eu acesso pelo arquivo .ini

    ele esta assim

    [iBConnection]

    DriverName=Interbase

    Database=192.6.1.110:C:\SistDelphi\Perfil\Banco\PERFIL.FDB

    RoleName=RoleName

    User_Name=SYSDBA

    Password=rootcpd

    ServerCharSet=

    SQLDialect=3

    ErrorResourceFile=

    LocaleCode=0000

    BlobSize=-1

    CommitRetain=False

    WaitOnLocks=True

    Interbase TransIsolation=ReadCommited

    Trim Char=False

    sendo que o Ip é o Ip do meu servidor

  10. Boa Tarde pessoal

    Eu tenho um sistema desenvolvido em delphi 2007 com banco de dados Firebird 1.5

    o exe dele fica local e acessa o banco remoto em um windows Vista

    porem preciso trocar o banco para um SO W98 mais ai não consegue estabelecer a conexao com o banco

    tem algum macete para funcionar o firebird no win98

    obrigado

  11. Jhonas o meu problema esta o seguinte no evento DataModuleCreate tem o cod

    procedure Tmodulo.DataModuleCreate(Sender: TObject);

    begin

    try

    conexao.Close;

    conexao.LoadParamsFromIniFile('bancofb.ini');

    conexao.open;

    except

    raise Exception.create('Erro ao conectar o banco de dados');

    Application.HandleException(Application);

    application.Terminate;

    // -------------- abre as tabelas do banco ----------------------

    cds_funcionario.Open;

    sql_funcionario.Open;

    end;

    end;

    Oque esta acontecendo é que quando tenta da um .Open na conexao e esta fora da rede gera a minha excessao

    raise Exception.create('Erro ao conectar o banco de dados');

    porem em vez de fechar a aplicação como eu mando

    application.Terminate;

    aparece uns 20 erros desse

    CDS_Tabela: Cannot perform this operation on a closed dataset

    eu gostaria que gerase minha excessao e fechase a aplicaçao

  12. Boa tarde

    Estou com um problemao gostaria de compartilhar com vocês e ver se alguém tem alguma ideia

    eu tenho um aplicação que desenvolvi em delphi 2007 com banco de dados firebird 1.5

    ele esta funcionando bem porem tem uma deteminada maqui (SO XP) que quando executo da erro de operação ilegal (sabe aquela famosa de enviar relatorio para a microsoft)

    então ei coloquei Showmessage na aplicaçao quando vai criar o form

    ShowMessage (' ****** 1 ****** ');

    Application.Initialize;

    ShowMessage (' ****** 2 (Modulo) ****** ');

    Application.CreateForm(TModulo, Modulo);

    ShowMessage (' ****** 3 ****** ');

    Application.CreateForm(TFrmLogin, FrmLogin);

    ShowMessage (' ****** 4 ****** ');

    Application.CreateForm(TFrmSobre, FrmSobre);

    ShowMessage (' ****** 5 ****** ');

    Application.CreateForm(Timp_historico, imp_historico);

    ShowMessage (' ****** 6 ****** ');

    Application.CreateForm(TFrm_impPerformance, Frm_impPerformance);

    ShowMessage (' ****** 7 ****** ');

    Application.CreateForm(TFrm_impgrafico, Frm_impgrafico);

    ShowMessage (' ****** 8 ****** ');

    Application.CreateForm(TFrm_plotar, Frm_plotar);

    ShowMessage (' ****** 9 ****** ');

    Application.CreateForm(TForm2, Form2);

    ShowMessage (' ****** 10 ****** ');

    e notei que para bem no 5 que é quando vai carregar o relatorio em QR

    se eu comentar as linha do Form com o QR abre o Sistema

    alguém tem alguma ideia do que pode ser ?

  13. Seria como imprimir a minha tabela do banco

    mais as linhas eu colocase como coluna

    por exemplo eu tenho no meu banco assim:

    cod_cli nome

    0 usuario 1

    1 usuario 2

    2 usuario 3

    3 usuario 4

    4 usuario 5

    5 usuario 6

    se eu colocar um details no meu QR com 2 QRDBText um para o cod_cli e outro para o nome vai sair assim

    0 usuario 1

    1 usuario 2

    2 usuario 3

    3 usuario 4

    4 usuario 5

    5 usuario 6

    eu gostaria que gerase assim

    0 1 2 3 4 5

    usuario 1 usuario 2 usuario 3 usuario 4 usuario 5 usuario 6

  14. E ai pessoal

    eu ei que esse forum não é de Banco de Dados

    mais aki vocês respondem mais rapido e geralmente as respostas dao certo

    estou tentando mudar a senha do firebird estou usando esse comando

    gsec -user SYSDBA -pass masterkey -modify SYSDBA -pw SENHA_QUE_QUISER

    em casa deu certo

    mais aki no meu serviço da esse erro

    unavablile database

    unable open to database

    alguém sabe o que pode ser

×
×
  • Criar Novo...