Ricardo_PF

Olá William, tenho uma dica para a questão do teu menu... Tente fazer ele com o componente TPanel (cada botão um panel). Assim você poderá no evento onEnter e onExit, respectivamente, alterar a aplicação conforme necessário (inclusive mudar a cor do panel onde o cursor está posicionado). Outra dica, é de que as telas com conteúdo que serão manipuladas pelos botões (panels) sejam um Page Control (TPageControl). Assim você pode mandar mostrar a tab que compete ao botão onde o mouse está no momento. Por exemplo: procedure tfrmform.panel1enter(sender: tobject); begin pagecontrol.activepageindex := 1; end; Vlw.

Se o seu ID_ORCA for um campo do tipo string, tenta fazer assim: sql.add ('SELECT SUM (total_Fin) AS TOTAL FROM TBL_Itens_Orca WHERE ID_ORCA = ' + quotedstr(dbedit120.text));

Boa tarde, alguém saberia me dizer se há uma maneira de saber se o sistema que eu fiz, quando abrir, detectar se já está em execução no mesmo computador. Ou seja, não quero deixar que o usuário abra duas vezes o programa no mesmo computador. Obrigado.

Pois é... me precipitei... foi mal... não li o título!@

Sheets d um pageControl?

Certo, problema resolvido !!! *** Dica quente! Conheço um monte de gente que estava com o mesmo problema que o meu Vlw Micheus.

Hum... boa... vou ver isso. Ainda não sabia que eu podia modificar essa propriedade. Obrigado, Ricardo.

tentei... mas não funcionou... alguma dica +? Vlw.

Olá, estou com um probleminha e acredito ser mais simples do que imagino, mas não estou conseguindo resolver. Tenho duas conexões com um mesmo banco de dados, para isso utilizo TIBDataBase (e transaction), as duas conexões são realizadas uma com TIBQuery e a outra com TIBDataSet, sendo a primeira para consulta a tabela que a segunda é responsável pela manutenção. Cada uma dessas queries estão conectadas ao banco ao mesmo tempo, através de conexões diferentes. Porém após realizar manutenção (novo registro) da tabela, e abrir e fechar a query de consulta, a mesma não busca o último registro cadastrado. Estou fazendo +- o seguinte: queryManutencao.insert; //TIBDataSet ... queryManutencao.post; queryManutencao.transaction.commitretaining; ... queryConsulta.close; //TIBQuery queryConsulta.open; Aguém poderia me dar uma dica de como posso fazer para conseguir atualizar os registro sem a necessidade de fechar a conexão da query de consulta, pois o sistema está funcionando em rede e o processo close-open de um database é muito demorado. Obrigado, Ricardo.

Bom, seguinte, eu não sei manipular variáveis DWORD. Por exemplo, como faço para colocar o conteúdo dela em um ShowMessage()? Obrigado, Ricardo.

Olá, estou tentando trabalhar com um tipo de variável chamado DWORD - descobri que um tipo Double Word (Cardinal)... tudo bem, só que não estou conseguindo "extrair" o conteúdo dela. Vlw por qualquer ajuda, Ricardo.

Utiliza o Firebird Server http://www.firebird.com.br A versão estabilizada atual é a 1.5.3

Olá, gostaria de saber se alguém poderia me indicar algum material, ou conde encontrá-lo, sobre manipulação de Buffers. Obrigado, Ricardo.

você seleciona o arquivo no windows explorer clica com o botão direito e seleciona a opção renomear (ou pressione F2) e digita o nome que quiser! hehehe desculpa a brincadeirinha... mas é o seguinte... sempre que você compilar o exe vai ficar com o nome do projeto... e pra mudar o nome do projeto fica um pokinho mais complicado (dá mas não é aconselhvel)... porém o exe é um arquivo independente e pode ser renomeado sem problemas... falou.

Olá, estou com um probleminha, acho que alguém deve saber como fazer isso. Estou fazendo meu primeiro programa em Delphi para funcionar em rede. Porém notei que os registros não são atualizados somente fechando as tabelas... então achei a solução de fechar a conexão e abri-la novamente. Assim sempre que alguém inserir um registro para o outro saber que foi inserido ele deverá clicar em "Atualizar". Porém tem muito controle para fazer por trás disso. Alguém saberia me dizer como posso fazer um sistema com uma especie de atualização automática de registros? Estou utilizando o Firebird. Obrigado.

Olá, por gentileza, alguém saberia me indicar uma apostila onde eu encontre como fazer um loading (gauge ou progress bar) em flash, sendo que este será mostrado enquanto é carregada a minha animação? Obrigado.

Olá, alguém saberia me dizer como faço para transformar um campo varchar em insteger via SQL? Por exemplo: SELECT "STRTOINT(CAMPO)" FROM TABELA; Estou utilizando Firebird. Obrigado, Ricardo.

Olá, alguém sabeira me dizer como faço para transformar um campos varchar em integer via SQL, por exemplo: SELECT "STRTOINT(CAMPO)" FROM TABELA; Estou utilizando Firebird. Obrigado, Ricardo.

você tah usando qual banco de dados?! Não esqueça q em alguns bancos a data tem o formato mm/dd/yyyy

Tah... mas qual é a tua dúvida... ou problema???

tah cheio na internet... antes d postar passa no nosso amigo Google!

olha os posts anteriores... acabaram d postar sobre isso.

isso, usa a do sistema. porém se a hr no pc estiver errada o programa não vai funcionar como o esperado. a função pra pegar a data é Date e para pegar a hora é Time. Ricardo.

faz assim resultado := strtofloat(edit1.text) + strtofloat(edit2.text); falou!

Olá, estou com o seguinte problema: Possuo 2 variáveis sendo uma um TForm (frm) e outra um TComponentClass (frmClass). Em minha aplicação tenho as seguintes linhas: Application.CreateForm(frmClass, frm); frm.showModal; frm.Free; Quando essas linhas são executadas pela primeira vez tudo ocorre bem, porém na segunda vez não passa da primeira linha e dá um erro de leitura de memória. Esse formulário que está sendo criado é do tipo fsNormal, portanto acretido que não seja problema com o ShowModal. Essas linhas são chamadas de dentro de outro formulário que é do tipo fsMDIChild, ou seja, é um formulário de manutenção (Normal) que é chamado de dentro do formulário de consulta (MDIChild). Não sei, mas me parece que o Free não está funcionando como eu imaginava que deveria, porém se peço para percorrer os componentes da aplicação após o Free ele não encontra o formulário (ou seja, teoricamente deve ter funcionado). Grato a ajuda que conseguir, Ricardo.