Tbaiano

A conexão ultilizada no FireBird é igual a do Interbase, sinceramente nunca trabalhei com esse componente , não saberia lhe responder, mas se puder usar esse componente para Base de Dados Interbase podera usar da mesma forma no Firebird. Tbaiano

Depende, existe uma forma de se desenvolver uma aplicação 'embarcada', que o usuario de seu programa não vai precisar ter o FireBird instalado, é aconselhavel para programa que não ultilizam trafegos de dados pela Rede, mas que nescessitam de um Banco de dados, esse é o Firebird Embeled(Acho que é assim q se escreve), você integra o firebird em sua aplicação. Se quiser desenvolver sistemas em rede há a nescessidade de ter um FireBird Server no servidor e os demais o FireBird Client. Você só precisa avaliar o tipo de aplicação que ira desenvolver, e escolher a melhor maneira. Você pode desenvolver todo o seu projeto e depois ver se ele vai ser 'embarcado' ou não, é muito simples de se fazer isso, o que define é a ultima compilação. Qualquer duvida. Tbaiano

Nesse site você vai saber tudo sobre FireBird, as ultimas versões e mais... Firebird Tem o donwload, é gratuito e ferramentas para Gerenciar seu banco como o IBExpert, na minha opinião uma das melhores... Tudo é free. Qualquer duvida... Tbaiano

O Delphi 7 , tem um exemplo de comunicação por redes...um chat... esse é o endereço... C:\Arquivos de programas\Borland\Delphi7\Demos\Internet\NetChat Talves isso o ajude... Tbaiano

Cara é o seguinte: Quando estiver fazendo o Mask no Imput Mask Editor, tem um Campo chamado 'Character for BLanks' e ali tera _ (Anderline). Coloque um espaço em branco ali dentro ' ' e não aparecera mais em baixo _ quando estiver em branco. Não sei se é isso que quer... Se não for Informe.... Tbaiano

Ai pessoal to tentando faze... né... Criei uma Trigger que chama essa Procedure no AfterInsert quando inclu-o um Cliente. Essa Procedure ira incluir na Planilha Ai está a Procedure... CREATE PROCEDURE CRIA_PLANILHA AS begin insert into Planilha (codigo, nome) values (12, 'João'); suspend; end Só que esses dados quero que seja os que eu inseri na outra tabela ai estou passando Fixos... porque não Sei... alguém sabe como se faz isso... Valeu ...

E ai galera é q não sei como fazer isso. Não sei se uso Trigger ou Procedure pelo Firebird, queria fazer esse processo no Banco e não pelo Delphi. Tenho em Clientes o entre outros o CODIGO e NOME. queria que qd criasse um novo Cliente na Planilha fosse inserido tb o CODIGO e NOME. Faço isso pelo Delphi mas seria bem melhor se fosse pelo Banco, queria aprender isso. Agradeço se alguém me ajudar...

Olha você pode colocar na opção Fields Editor selecione o campo q deseja formatar e mude as opções: currency = True; ImportredConstraint := R$ Essas opções vão formatar exemplo: 2,369 para R$ 2,37 (Arredonda). Acho q é isso a sua duvida. Qualquer coisa. Tbaiano.

Queria criar uma situação para um Cliente quando ele fosse cadastrado. Estou fazendo isso pelo Delphi, teria como se criar isso atrave do Banco. Uso Firebird... Não sei se Uso Procedure ou Trigger. Se puderem me ajudar... Tbaiano.

Progr'amador, Valeu é isso ai mesmo. Não tinha entendido mas testei e está perfeito. É que eu tenho um Boleto aqui que não é Com a Courier New é com outra letra, e fiquei incucado e não cheguei a testar. Mas valeu mesmo. Tbaiano. Pode Fechar, Colocar Resolvido. Que essa duvida já era...

Var A, B, C : String; begin A := 'Condomínio = R$'; B := 'Box = R$'; C := 'Elevador = R$'; Eu coloquei os Iguais um em baixo do outro até aqui eles não se alinham...

Pessoal não consigo entender o que se refere a Length, Format etc... A Strings não respeitam a ordem ou sei lá vou dar exemplo... Olhem só. Se u Colocar esse Código: Var A, B, C : String; begin A := 'Condomínio = R$'; B := 'Box = R$'; C := 'Elevador = R$'; Se eu fosse colocar isso para um Relátorio por exemplo teria q aparecer mais ou menos os '=' um embaixo do outro certo... Só que não Ficam, eles ficam todos desalinhados, não entendo porque. Teria um jeito de deixar isso tudo um embaixo do outro. E os Length são iguais só q se vão para um Label ou qualquer outro modo de visualização eles se desalinham.. Agradeço se puderem me ajudar, porque preciso disso para terminar um relátorio esse campos são variaveis por isso não coloco no relatório direto assim formatado. Eu gravo as linhas em um .FDB para tercerizar o serviço de impressão dos Boletos bancários. Agradeço mas uma vez. Tbaiano.

Não eu estou gravando isso Num Banco de dados, FireBird varChar (78), imprimo tb. Mas mesmo com a Fonte um espaço em branco sempre sera do mesmo tamanho. Estou vendo outras formas de gravar talvez, inicializando as variaveis já com 39 e nove espaços vou ver e qualquer coisa aviso. Se tiver mais dicas agradeço. valeu pela ajuda. Tbaiano.

O código em si ficou melhor sem fazer repetições mas o problema continua, fica no doc, a quastaão do alinhamento. Exemplo: CONDOMÍNIO = R$ 10,20@@@@@@@@ DMAE = R$ 87,74 GAS = R$ 67,15@@@@@@@@@TARIFA = R$ 10,20 F. RESERVA = R$ 300,00@@@@@@ BOX = R$ 110,00 @@ são espaços em Branco a pagina apaga espaços em branco Ou seja o Length da parte Sublinhada é 39 só que o problema ocorre que a letra 'C' é 1 caracter mas ' ' tb ocupa 1 caracter e é bem menor. E consequentemente 5 'CCCCC' são maior q 5 ' '.Acho que é por isso que ocorre esse problema. O que você Acham? Será que tem uma maneira de resolvar isso. Eu teria q fazer de uma forma q. CONDOMÍNIO = R$ 10,20 @@@@@@@@DMAE = R$ 87,74 GAS = R$ 67,15@ @@@@@@@@@@@@TARIFA = R$ 10,20 F. RESERVA = R$ 300,00@@@@@@@@@BOX = R$ 110,00 Obrigado Tbaiano

Vou testar, mas mais uma vez obrigado pela dica. Tbaiano

Estou trabalhando com Boleto Bancário, Doc etc... A empresa para qual estou trabalhando faz a impressão de seus doc num serviço tercerizado. E atraves do programa organizo a linhas que serão impressas po essa empresa. O fato é que não consigo organizar essas linha para que fiquem uma embaixo da outra. Exemplo: . . . Var Valor1, Valor2, Valor3, Valor4 : String; //essas Strings recebem valores com os devidos Campos assim. Valor1 := 'CONDOMÍNIO = R$' + IBVlCondomínio; Valor2 := 'BOX = R$' + IBVlBox; beleza. mas essa parte está tranquilo... Agora que não fica legal... Faço uma rotina para que Valor1 e Valor3 Fiquem com Tamanho 39 OK!! Assim: while Length(Valor1)< 39 do Begin Valor1 := Valor1 + ' '; End; while Length(Valor3) < 39 do Begin Valor3 := Valor3 + ' '; End; e depois : Table1LIN001 := Valor1 + Valor2; Table2LIN002 := Valor3 + Valor4; Na minha lógica Valor 1 e 3 sempre teão o mesmo tamanho e Valor 2 e 4 serão inseridos sempre na mesma posição o que não acontece. Então na hora de Imprimir o Valor 4 teria que estar na mesma posição do Valor 2 o que não acontece.... Se alguém puer me ajudar.

Isso ai é programa que captura senhas de banco, senhas pessoais , é para isso que quer esperto. Sabe o que tu faz, trabalha e conquista as suas próprias coisas. Valeu. Tbaiano

Pode deixar, Existe a Opção Default mas já coloquei ZERO e não deu certo vou tentar de novo. mas Obrigado foi de grande ajuda.

É já que é no banco, o código, tb não sei... quando insiro pelo banco um dado todos os campos em branco recebem 0 com DEFAULT e não NULL mas quando no sistema eles recebem NULL... É vou ver o que que eu faço... Valeu pela ajuda vou ver uma de criar os dados da planilha de Inquilinos pelo banco e ver no que que dá... Valeu pelas Dicas.

Progr'amador EU PODERIA CRIAR UMA TRIGGER DENTRO DO BANCO PARA QUANDO INSERISSE NA TABELA DE INQUILINOS ELA CRIAVA UMA PLANILHA DE INQUILINOS PARA ESSE MESMO NA TABELA DA PLANILHA INQUILINOS. Ficaria melhor trabalhar no Banco isso ou no Código?

Aquele IBDataSet... da Interbase Quando Insiro um Inquilino crio uma planilha para ele na After Post da Table Inquilino Coloquei isso: If NOt (IBPlaninq.State = dsEdit) and NOT (IBPlaninq.State = dsInsert) then IBPlaninq.Edit; DMlcd.IBPlaninqCODCONDPLANINQ.AsInteger := Strtoint(FcadInq.DBEdiT2.Text); DMlcd.IBPlaninqAPTINQ.AsString := FcadInq.DBEdit3.Text; DMlcd.IBPlaninqBLINQ.AsString := FcadInq.DBEdit4.Text; DMlcd.IBPlaninqPORTINQ.AsString := FcadInq.DBEdit17.Text; Dmlcd.IBPlaninq.Post; Tava funcionando numa boa isso...

Ai Progr'amador eu mudei os meus campos para DEFAULT 0 e funcionou, só que pelo programa o programa quando insere os campos continuam com null... você saberia como posso arrumar isso sem ter que deletar o meu banco e criar de novo... Se puder dar essa mão, eu agradeço.

Valeu mesmo. Vou fazer isso....

Ai Progr'amador descobri o q era. é que tinha 1 campos NULL e a Trigger, não somava nada e anulava. Agora v se poderia me ajudar a criar uma trigger que prevesse qd etiver null, até sei mas fazer um teste em 1 por um, tem uma maneira mais inteligente? Se puder agradeço. tbaiano.

Eu Crio Assim: CREATE TRIGGER TRIG_PLANINQ_GRAVAR FOR PLANINQ ACTIVE BEFORE INSERT OR UPDATE POSITION 0 AS BEGIN ... ... end O IBexpert que coloca a aqueles ^ ^ sei lá pra que isso. Olha só você não saberia porque a trigger só funciona em 1 unico registro da minha tabela e nos outros simplesmente ele coloca NULL cada vez q insiro um dado no Campo VLTOTAL que deveria receber a soma de todos... É isso que não consigo entender. Não sei se estou esquecendo de algum detalhe mas acho que não tenho outras TRIGGER nesse projeto verdade q nenhuma fazendo calculos mas funcionam normalmente, eu estou fazendo esse calculo no Código mas faço ele 3 vezes em lugares diferentes, fazendo no banco resolveria esse problema... Se souber d mais aluma coisa q possa ser... Agradeço a sua Ajuda.