ricardo_sdl

já tentou usar o try exception?

No tipo do campo você pode defini-lo como tipo graphic, mas não recomendo este procedimento pois isso faria com que seu banco de dados ficasse muito pesado e lento, você pode tentar guardar o caminho da imgem no banco de dados e usá-lo para exibi-la em tempo de execução. Falou cara!!!

Eu descobri como é que se faz, é só ter o FireBird Cliente instalado na máquina cliente e no programa é só colocar o ip ou nome da máquina servidora do banco de dados antes do caminho fisíco do arquivo do banco. Falou pessoal!!!

Tenta esse aqui: procedure TForm1.Button1Click(Sender: TObject); begin {Desliga o windows} ExitWindowsEx(EWX_SHUTDOWN,0); end;

Existe um componente que se chama TryIcon é só procurar na net que você acha.

Olá pessoal alguém sabe resumidamente como faço para acessar um BD em outro computador, eu estou utilizando o FireBird+Delphi7+ZeosDBO, alguém pode me ajudar?

Olha cara eu testei a dica da página que eu mandei mas não consegui fazer então achei esta aqui: 1.Sete a proriedade keypreview do form para true, e a propriedade default dos botões para false(se tiver algum botão) então cloque este código: Procedure TForm1.FormKeyPress(Sender:TObject;var Key:Char); begin if (Key = #13) then begin Key := #0; Perform(wm_NextDlgCtl,0,0); end; end;

No link abaixo você achara a resposta: http://www.ramosdainformatica.com.br/dic_r...s01.php?CDA=219 Falou!

Aleluia! Deus existe e ele ainda me ama! Consegui finalmente criar a Stored Procedure que eu precisava, ela ficou assim: create procedure LOCALIZAR_CLIENTE(PNOME varchar(50)) returns(nome_cliente varchar(50), endereco_cliente varchar(50), cidade_cliente varchar(50), estado_cliente varchar(2), cep_cliente varchar(8), email_cliente varchar(50)) as begin select nome,endereco,cidade,estado,cep,email from clientes where nome containing :PNOME into :nome_cliente,:endereco_cliente,:cidade_cliente, :estado_cliente,:cep_cliente,:email_cliente; suspend; end Falou pessoal!

create procedure localizar_cliente(NOME varchar(50)) returns( nome_cliente varchar(50), endereco_cleinte varchar(50), cidade_cliente varchar(50), estado_cliente varchar(2), cep_cliente varchar(8), email_cliente varchar(50)) as begin select all from clientes where clientes.nome containing :NOME into nome_cliente,endereco_cliente,cidade_cliente, estado_cliente,cep_cliente,email_cliente suspend; end alguém pode ajudar?

Eu achei a função pessoal, é o seguinte: var Entrada:string; begin entrada:=Inputbox('Título','Digite algo','valor default'); end; Era só isso pessoal. Valeu!

Olá pessoal alguém sabe se é possível mostrar uma mensagem para o usuário com um edit por exemplo para entrada de dados? Eu sei que da para fazer isso com um form so gostaria de saber se já tem um jeito pronto de se fazer isso. Desde já agradeco;

E aí pessoal?Tudo em cima? É o seguinte: 1.Alguém sabe de uma boa apostila aboradando Delphi+FireBird+StoredProcedures? 2.Stored Procedures tem que ter parametros? É só isso.

Eu estou usando o IBexpert para gerenciar a conexão com os dados criar tabelas etc, na excluir o generator ele faz exatamente o comando que você falou Bruno Frank, mas retorna este erro: Invalid token. Dynamic SQL Error. SQL error code = -104. Token unknown - line 1, char 5. GENERATOR. O que sera que esta acontecendo?

Olá pessaol, eu estou usando FireBird+Delphi+IBexpert e ta acontecendo o seguinte: eu criei uma tabela depois criei um generator para eladepois excluir esta tabela mas agora não consigo excluir o generator, como faco para exclui-lo? Desde já agradeco;

Aí pessoal como se faz para acessar um Banco de Dados criado no FireBird através de uma aplicação Delphi? Desde já agradeço;

Você pode definir o nome do usuário como atributo chave a tabela. Se bem que eu acho(mas não tenho certeza) que não é bom colocar nomes(strings) como atributos chaves.

Acho que assim funciona: Label1.caption:=IntToStr(Table1.recordcount)

Pode fechar o tópico eu consegui a resposta em outra lista. Eu queria que após uma imagem fosse carregada no componente através do comando loadfromfile ela pudesse ser retirada do componente, para isso é só fazer o seguinte: Image1.picture:=nil; pronto a imagem desparece do componente. Falou pessoal.

Olá cara você pode executar qualquer programa utilizando um comando da biblioteca ShellApi chamado shellexecute, aí vai um exemplo: Declare na uses do seu form a biblioteca ShellApi; depois execute: ShellExecute(Handle,'open','calc.exe','','',1); este comando vai abrir a calculadora do windows, onde esta 'calc.exe' você pode substituir por caminhos de outros programas, falou cara!

Olá pessoal como eu faço para retirar uma imagem da propriedade picture do componente Image depois de eu ter carregado uma de um arquivo, isso tudo em tempo de execução claro. Bem é só isso por enquanto.

LCK vem de Lock, ou seja, de travar. Eles são criados no momento em que você abre a tabela(coisas do paradox), mas quando ocorre algum término anormal de programa esses arquivos não são alterados deixando a tabela travada como se tivesse alguém usando-a, falou galera!

Finalmente, me desculpem pelo trabalho pessoal o problema era o seguinte, tinham dois arquivos .LCK no diretório da aplicação foi só deleta-los e pronto todas as buscas funcionaram perfeitamente. Valeu pelas dicas pessoal!!

Infelizmente o mesmo erro, mas ta dando erro em outra linha que naõ dava erro saca só: query_Pesquisa.SQL.Add('Select * from Classificacao where NomeVulgar="'+texto+'"'); query_pesquisa.Open; O mesmo erro de parametro invalido.

Olá pessoal, infelizmente o código não esta funcionando ainda, continua dando o mesmo erro, parametro inválido. Aí vai o código para vocês darem uma olhada: Eu fiz as alterações sugeridas, as variáveis data_inicial e data_final vem de outra unit. Query_Pesquisa.SQL.Clear; query_pesquisa.Close; if (pesquisa=0) then begin Query_Pesquisa.SQL.Add('Select * from Classificacao where DataColeta>=:data_inicial and DataColeta<=:data_final'); Query_Pesquisa.ParamByName('data_inicial').AsDate:=data_inicial; query_pesquisa.ParamByName('data_final').AsDate:=data_final; query_Pesquisa.Open end;