Capablanca

Para mim isto não ocorre... Quando eu configuro a propriedade DATASOURCE de um DBGRID para um determinado componente DATASET (por exemplo, QUERY), se esta QUERY tiver uma sentença SQL e estiver ATIVA e ABERTA, eu posso ver os dados bem como alterá-los diretamente no DBGRID.

Se é realmente isso Lilia, basta você deixar a propriedade ReadOnly do seu DBGrid configurado para False. Desta forma você poderá editar os valores do DBGrid ao clicar numa célula. Não sei se é bem isso que você estava precisando... Qualquer coisa dá um toque. Abs.

Olá Lilia, tudo bem? (lembra de mim? - rs...) Não consegui entender direito sua pergunta, pois você fala em "tenho que adicionar valores" e depois fala em "editar um campo do DBGrid". Seria assim: após o DBGrid mostrar os resultados, você entra em uma célula e altera os valores atuais? É isto? Abs.

Olá, 1) Faça a instalação completa (FULL) do Firebird em seu servidor; 2) Você precisa fazer a instalação MÍNIMA no computador cliente. Quando você estiver instalando o FB 1.5, existe uma tela com o título: SELECT COMPONENTS - Which components should be installed? Nela, existe um comboBox contendo diversas opções. Selecione "Minimum client install - no server, no tools". 3) Se você estiver utilizando a biblioteca FBCLIENT.dll, verifique se a mesma está localizada na pasta C:\WINDOWS\SYSTEM32 ou C:\WINNT\SYSTEM32; 4) Se você estiver utilizando a biblioteca GDS32.dll, verifique se a mesma está localizada na pasta C:\WINDOWS\SYSTEM32 ou C:\WINNT\SYSTEM32; 5) Se sua rede estiver rodando em TCP/IP, para realizar a conexão, os computadores clientes devem referenciar o banco de dados pelo nome (poderia ser pelo IP também). Assim, no seu caso seria: mdinfo:M:\sistema\cadastro.fbd ou IPdoServidor:M:\sistema\cadastro.fbd Isto você pode especificar diretamente no componente de conexão (por exemplo, ZConnection, SQLConnection, etc.) do seu aplicativo que ficará no cliente. Na verdade, a melhor alternativa seria criar um arquivo com a extensão .INI o qual ficaria responsável por conter a localização do banco de dados no servidor. O seu aplicativo, ao fazer a conexão, obteria as informações da localização do BD através daquele arquivo .INI. 6) Localize o arquivo SERVICES tanto no servidor como no computador cliente, abra-o, e verifique se a linha que contém GDS_DB aponta para 3050/tcp 7) Por fim, no arquivo HOSTS de cada computador cliente, deverá constar o IP do Servidor e ao lado o Nome do Servidor, semelhante à: # Copyright (c) 1993-1999 Microsoft Corp. # # Este é um arquivo HOSTS de exemplo usado pelo Microsoft TCP/IP para Windows. # # Este arquivo contém os mapeamentos de endereços IP para nomes de host. Cada # entrada deve ser mantida em uma linha individual. O endereço IP deve # ser colocado na primeira coluna, seguido do nome de host correspondente. # O endereço IP e o nome do host devem ser separados por pelo menos um # espaço. # # Adicionalmente, comentários (como estes) podem ser inseridos em linhas # individuais ou após o nome de computador indicado por um símbolo '#'. # # Por exemplo: # # 102.54.94.97 rino.acme.com # servidor de origem # 38.25.63.10 x.acme.com # host cliente x 127.0.0.1 localhost 200.252.31.2 mdinfo Abs.

Olá Júnior, Se você quer utilizar o Firebird, dê uma olhada no tutorial que eu elaborei (seção TUTORIAIS do meu site: http://www.capablanca.com.br). Pode lhe ser útil. Abs.

"Um procedimento nada mais é que uma rotina desenvolvida especificamente para executar uma determinada tarefa. Essa tarefa pode inclusive ser genérica, ou seja, servir para várias aplicações. Por exemplo, podemos desenvolver um procedimento para alterar a cor de fundo dos formulários. Podemos criar procedimentos dos mais simples até os mais sofistificados. Depende apenas de você. Um procedimento, diferentemente das funções, não retorna qualquer valor à rotina chamadora. Ele pode ser encarado mais como um comando definido pelo usuário, no sentido de que apenas executa a tarefa para a qual foi concebido. Você declara um procedimento por intermédio da palavra-chave Procedure, seguido pelo nome do procedimento e um par de parênteses, que pode conter ou não uma lista de parâmetros. Para finalizar o corpo do procedimento, utiliza a palavra-chave End. Veja a sintaxe correta para declaração de procedimentos:" procedure NomeProcedimento (parâmetros); Begin <bloco de instruções> End; Extraído do livro: Delphi 7 - Aplicações Avançadas de Banco de Dados - William Pereira Alves - Editora Érica

Desculpe-me pelo equívoco... Estes componentes que eu te passei não possuem arquivos com instruções de instalação (acabei me confundindo com outros). Na verdade é bastante simples: 1) No MENU, selecione TOOLS > ENVIRONMENT OPTIONS; 2) Selecione a guia LIBRARY; 3) Em LIBRARY PATH, digite o sinal de "ponto e vírgula" ";" após o último caminho digitado (verifique se já não existe este sinal; se sim, vá para o próximo passo); 4) Digite em LIBRARY PATH a localização completa do diretório onde você descompactou os arquivos baixados. Por exemplo: ===================================== ;E:\Download\DELPHI\Downloads\Componentes\d_tapi ===================================== 5) Abra os projetos-exemplo que acompanham cada um dos componentes e modifique-os conforme as suas necessidades. Abs.

Sim, é necessário instalá-los. Eles possuem um arquivo contendo os procedimentos de instalação. Caso ainda assim não consiga, dá um toque que eu tento te ajudar.

Olá, Eu encontrei dois componentes FREEWARE que encontram automaticamente a porta COM. Um deles, inclusive, tem um monitor das ligações (CONECTANDO, DESLIGANDO, etc.). O outro permite abrir a janela de diálogo contendo as configurações do MODEM que você está utilizando (semelhante ao discador UOL). Juntando os dois, acho que você consegue criar um SUPER DISCADOR. Primeiro Componente: ==================== http://www.torry.net/vcl/comms/tapi/d_tapi.zip Segundo Componente: =================== http://www.torry.net/vcl/comms/tapi/tapidial.zip Eles possuem até um exemplo pronto para ser usado.

Olá, estão faltando ponto e vírgula em duas linhas. Logo, o código ficaria: if btn2.enabled = true then begin btn2.enabled := false; btn1.enabled := true; btn2.caption := 'OFF'; btn1.caption := 'ON'; end; Onde é que você está digitando estas linhas? Seria dentro do evento OnClick do BTN1? Abs.

Olá, Segue abaixo a unit que eu criei: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Mask; type TForm1 = class(TForm) Button1: TButton; MaskEdit1: TMaskEdit; Edit1: TEdit; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; idade_atual: integer; implementation {$R *.dfm} // A função abaixo foi postada pelo usuário sh@dow em um tópico do site ActiveDelphi (http://www.activedelphi.com.br) // A única alteração que eu fiz foi substituir a variável RESULT (do código original) pela variável IDADE_ATUAL function IdadeAtual(Nasc : TDate): Integer; Var AuxIdade, Meses : String; MesesFloat : Real; IdadeInc, IdadeReal : Integer; begin AuxIdade := Format('%0.2f', [(Date - Nasc) / 365.6]); Meses := FloatToStr(Frac(StrToFloat(AuxIdade))); if AuxIdade = '0' then begin Result := 0; Exit; end; if Meses[1] = '-' then begin Meses := FloatToStr(StrToFloat(Meses) * -1); end; Delete(Meses, 1, 2); if Length(Meses) = 1 then begin Meses := Meses + '0'; end; if (Meses <> '0') And (Meses <> '') then begin MesesFloat := Round(((365.6 * StrToInt(Meses)) / 100) / 30.47) end else begin MesesFloat := 0; end; if MesesFloat <> 12 then begin IdadeReal := Trunc(StrToFloat(AuxIdade)); // + MesesFloat; end else begin IdadeInc := Trunc(StrToFloat(AuxIdade)); Inc(IdadeInc); IdadeReal := IdadeInc; end; idade_atual := IdadeReal; end; procedure TForm1.Button1Click(Sender: TObject); begin IdadeAtual(StrToDate(MaskEdit1.Text)); Form1.Edit1.Text:= IntToStr(idade_atual); end; end. Obs.: eu utilizei um objeto MaskEdit com a seguinte máscara: !99/99/0000;1;_ Abs.

Desculpe-me, mas acho que estamos falando de coisas diferentes. O que você entende por LIMPAR uma label? Para mim significa deixar sua propriedade CAPTION vazia (sem valor; em outras palavras, LIMPA).

Olá, Não conheço outra maneira de "zerar" uma label a não ser esta: Label1.Caption:= ''; // são dois apóstrofos

Firebird, amigo. Eu indicaria o Interbase, mas ele não é "open source" como o Firebird, de modo que você teria que pagar licenças para utilizá-lo. Se você precisar de um tutorial sobre conexão a um banco de dados Firebird, consulte a seção TUTORIAL no meu site (http://www.capablanca.com.br). Abs.

Olá, Não consegui entender direito a sua pergunta. Por acaso você está querendo saber se é possível: 1) O usuário acessa o site; 2) O site irá manipular informações de um banco de dados; 3) Este banco de dados também é utilizado por um programa desenvolvido em Delphi. Se esta for a sua dúvida, a resposta é SIM. Se esta não for a sua dúvida, por gentileza, esclareça-a melhor. Abs.

Olá, Acho que o comando LOCATE pode implementar o que vc. precisa. Exemplo: IBTable1.Locate('NomeDoCampo',AnsiUpperCase(edit1.text),[LoPartialKey]);

Olá Alessandro, Vou fazer o exemplo sem a utilização de parâmetros (como vc. fez ao utilizar :nome_digitado). No evento OnKeyUp do seu objeto Edit1, adicione o seguinte código: IBQuery1.Close; IBQuery1.SQL.Clear; IBQuery1.SQL.Add('SELECT * FROM agenda WHERE nome LIKE ' + #39 + Edit1.Text + '%' + #39); IBQuery1.Open; Abs.

Olá, não se preocupe, pois JobOptions é um recurso do Acrobat, software no qual eu elaborei o tutorial. Para certificar-se disto, visite http://www.planetpdf.com/mainpage.asp?webpageid=1261 Abs.

Olá, Você pode usar o tipo BLOB. Ficaria assim: (...) img BLOB SUB_TYPE 0, (...)

Valeu RM... Muito obrigado! Ele sofrerá uma atualização em poucos dias. A atualização estará relacionada à utilização de um driver (gratuito) Firebird para dbExpress.

Um generator é um contador interno do banco de dados que tem seus incrementos (positivos ou negativos) controlados através de instruçõesSQL (geralmente disparados por triggers para atribuição das chaves primárias das tabelas). No Interbase e no Firebird, ao contrário do que ocorre no MS Access, não existe um campo autoincremento (ou autoenumerado). Desta forma, tanto no IB como no FB precisamos criar um campo do tipo INTEGER e criar um generator para ele. Além disso, podemos criar uma trigger (gatilho) para ativar o generator.

Olá Marcos, Se você já está usando um componente IBDataSet, não há necessidade de inserir um componente IBUpdateSQL, visto que o IBDataSet incorpora as funções tanto de um IBQuery como de um IBUpdateSQL. Deixe só o IBDataSet. Quanto ao erro, em si, verifique: 1) Você criou um GENERATOR? Se sim, configurou-o na propriedade generator field do seu componente IBDataSet?; 2) Você incluiu todos os campos no FIELDS EDITOR (botão direito do mouse sobre o IBDataSet > Fields Editor?; 3) Você configurou corretamente as instruções SQL dentro do DATASET EDITOR (botão direito do mouse sobre o IBDataSet > DataSet Editor?. Em caso de dúvida, dê um toque. Abs.

Olá, Existem diversas maneiras de implementar o que você deseja. Fiz um exemplo utilizando uma delas. Baixe-o em http://www.capablanca.com.br/download/resp...7_VicFalMac.zip. Junto com o projeto acompanha um banco de dados MS Access com os campos que você mencionou. Qualquer problema dá um toque. Obs.: o DBGrid "zebrado" e a as opções de pesquisa "Contém", "Inicia com" e "Termina com" são por minha conta... Abs.

Para qual finalidade você quer criar este vírus?

Dê uma olhada no tutorial no meu site (http://www.capablanca.com.br). Acho que poderá ser útil. O ZeosDBO é freeware. O tutorial vai sofrer uma atualização importante dentro de uma semana. Abs.