Disponibilizei a versão 2.18A do UserControl no endereço abaixo:
http://www.upshare.me/files/hQRQel1282304804/UserControl2.18a.rar.html
Não sei ainda se existe uma versão mais nova. Mas veja se esta lhe ajuda.
Trabalho com UserControl a muito tempo e não tenho o que me queixar dele.
Em 23 de julho de 2010 10:11, Ralp Alves Bezerra ral...@gmail.comescreveu:
Nobres colegas,
Recentemente tive um problema com a importação de um arquivo.
Com a ajuda dos nobres colegas e o envio de um exemplo pelo Walter,
consegui sanar o problema.
A importação foi realizada. Porém
linha do arquivo
Ler código dentro de email é terrível. Se vc colocar o código no Pastebin (
http://pastebin.com) vai nos ajudar a te ajudar.
--
Dirlei Dionísio
Novo artigo: // Não comente seu código
http://MaisQueBomCodigo.blogspot.com
Em 23 de julho de 2010 10:11, Ralp Alves Bezerra ral
Nobres colegas,
Recentemente tive um problema com a importação de um arquivo.
Com a ajuda dos nobres colegas e o envio de um exemplo pelo Walter, consegui
sanar o problema.
A importação foi realizada. Porém, fazendo uma analise mais detalhada, notei
que primeira linha do arquivo nunca
Alves Bezerra ral...@gmail.com ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Enviadas: Terça-feira, 13 de Julho de 2010 16:09:57
Assunto: RES: [delphi-br] Importação de Arquivo
Não estou conseguindo montar uma rotina para pegar os dados contidos
dentro das
not Eof ( arq ) do begin
AuxLinha := '';
AuxPed := '';
AuxChassi := '';
AuxLinha := Copy(linha,53,1);
AuxPed := Copy(linha,1,10);
AuxChassi := Copy(linha,51,10);
end;
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Enviadas: Terça-feira, 13 de Julho de 2010 16:09:57
Assunto: RES: [delphi-br] Importação de Arquivo
Não estou conseguindo montar uma rotina
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
mailto:ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
Enviadas: Terça-feira, 13 de Julho de 2010 16:09:57
] Importação de Arquivo
Já pensou em dar um StringReplace nas , trocando por ; ai voce
teria um
separador padrão ai facaria muito mais facil de trabalhar
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
mailto:ralprd%40gmail.com
Para: delphi-br
Depois de muito quebrar a cabeça aqui, solicitei a geração de um novo arquivo
para importação. E para minha surpresa, os valores não mais tinham as casas
decimais com vírgula e sim ponto.
Acredito que possa ter ocorrido um erro na geração do arquivo anterior.
Esta é uma das linhas de
: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Enviadas: Terça-feira, 13 de Julho de 2010 16:09:57
Assunto: RES: [delphi-br] Importação de Arquivo
Não estou conseguindo montar uma rotina para pegar os dados
voce teria um
separador padrão ai facaria muito mais facil de trabalhar
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd%40gmail.com
mailto:ralprd%40gmail.com mailto:ralprd%40gmail.com
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br
%40yahoogrupos.com.br ]
Em nome de Ralp Alves Bezerra
Enviada em: quarta-feira, 14 de julho de 2010 05:56
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Assunto: RES: RES: [delphi-br] Importação de Arquivo
Pois é, este formato esta me deixando louco aqui.
Existem os
: Tuesday, July 13, 2010 5:04 PM
Subject: Res: RES: [delphi-br] Importação de Arquivo
Já pensou em dar um StringReplace nas , trocando por ; ai voce teria um
separador padrão ai facaria muito mais facil de trabalhar
De: Ralp Alves Bezerra ral...@gmail.com mailto:ralprd
funcionar perfeitamente.
Em 14 de julho de 2010 10:03, Ralp Alves Bezerra ral...@gmail.com
mailto:ralprd%40gmail.com escreveu:
Depois de muito quebrar a cabeça aqui, solicitei a geração de um novo
arquivo para importação. E para minha surpresa, os valores não mais tinham
as casas decimais com
Nobres colegas, estou tentando importar para o meu banco de dados um arquivo
no formato txt com o formato abaixo:
601,029,201000,02,01,20100512,12050002,201005,04,122,0003,2
,002,,33901400,100.000,00
601,029,201000,02,01,20100517,17050003,201005,04,122,0003,2
,002,,33901400,130.00
Não estou conseguindo montar uma rotina para pegar os dados contidos dentro
das aspas duplas e delimitadas por vírgula.
Existe um campo no formato 100.000,00 que também contém vírgulas em seu
conteúdo.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem
Nobres colegas,
Recentemente peguei na internet um exemplo de como aplicar zoom em um
componente EDBImage.
Coloquei um ScrollBox e dentro dele, coloquei o componente EDBImage.
No incremento e decremento do zoom estou utilizando o seguinte código:
Botão incremento:
EDBImage1.Width
AO RESPONDER ESTA MENSAGEM
--
Grupo G2 Tecnologia Sistemas
Ralp Alves Bezerra
Diretor de Tecnologia
Av. 13 de Maio, 853 - 2º andar
Bairro de Fátima - 60.040-530
Fortaleza - Ceará - Brasil
(85) 3257-6662 / 8872.4325 / 9215.2100 / 9600.9796
[As partes desta mensagem que não continham texto
Nobre colegas,
Estou precisando montar um form onde ao clicar em um número de processo as
imagens possam ser mostradas em miniaturas (thumbmails) do lado direito da
tela.
Tenho uma tabela com todos os processos gravados e outra com as imagens
destes processos ligadas pelo código do
Desejo a você um feliz aniversário!!!
Abraço.
Ralp Alves
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de jeanpapa10
Enviada em: quinta-feira, 10 de junho de 2010 13:20
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: [OFF] Aniversário do
Venho aqui mais uma vez solicitar a opinião dos nobres colegas.
Já trabalho há alguns anos com delphi e não pretendo larga-lo tão cedo.
Porém, aqui em nossa empresa surgiu à necessidade de migrar um de nossos
sistemas que é desk para a web. (sistema de gestão escolar com controle de
Mais uma vez, gostaria de agradecer aos nobres colegas da lista por tirar mais
esta dúvida.
Após muita conversa aqui na empresa, decidimos pela utilização do PHP para a
migração e desenvolvimento de nosso sistema.
Abraço a todos.
[As partes desta mensagem que não continham texto foram
Aqui na empresa eu utilizei o ESF Database Migration da EasyFrom.
É uma ferramenta muito boa, pois faz o serviço todo sozinho.
http://www.easyfrom.net/
Abraço.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Richardson Freddo
Enviada em:
Caro Márcio, não sei bem se é isso que deseja, mas de uma olhada.
http://docs.google.com/viewer?a=v
http://docs.google.com/viewer?a=vq=cache:AMRpUDKVYUQJ:nf-eletronica.com/bl
og/%3Fdl_id%3D68+validar+telefone+NCM+delphihl=pt-BRpid=blsrcid=ADGEESjCB
a
propriedade de ordenação do mesmo.
Depois faça o loop no StringList e obterá o resultado desejado.
Alexandre
Em 8 de abril de 2010 08:16, Ralp Alves Bezerra ral...@gmail.com escreveu:
Bom dia nobres colegas.
Estou utilizando esta rotina para pegar as imagens de uma pasta e salvar
Bom dia nobres colegas.
Estou utilizando esta rotina para pegar as imagens de uma pasta e salvar no
banco firebird.
if FindFirst('C:\G2DOC\G2Imagem\*.jpg', faAnyFile, Arq) = 0 then
begin
repeat
DM.cds_TCM_A.Insert;
(scanner). Porém, também preciso desta função para
pegar todos os arquivos de uma pasta e salvar diretamente no banco.
Já procurei na net, porém, não consegui uma rotina que pudesse efetuar o
trabalho que estou precisando.
Estou utilizando Delphi 7 e Firebird 2.1.
Abraço.
Ralp Alves Bezerra
@yahoogrupos.com.br
Assunto: Re: [delphi-br] Problema com firebird
Em 22/03/2010 10:07, Ralp Alves Bezerra escreveu:
Nobres colegas, estou tendo o seguinte problema em minhas tabelas.
1 - Ao incluir em minha tabela utilizando FOR, a inclusão e processada
normalmente.
Porém, quando entro no ibexpert
Muito bom! Já está nos favoritos
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Silvio Clecio
Enviada em: segunda-feira, 22 de março de 2010 04:22
Para: destinatarios-nao-revelados:
Assunto: [delphi-br] [DICA] Site com várias dicas Delphi
Link ditero:
Nobres colegas, estou tendo o seguinte problema em minhas tabelas.
1 - Ao incluir em minha tabela utilizando FOR, a inclusão e processada
normalmente.
Porém, quando entro no ibexpert e tento excluir me aparece o erro de há pelo
menos um registro com os mesmos valores:
Cannot delete
;
end;
Porém, se informar 5 no campo QtdPag é mostrado no dbgrid os 5 registros,
mas no banco é gravado somente 1 registro.
Como poderia resolver este problema?
Abraços.
Ralp Alves Bezerra
__
Não deixe rastros ao navegar na Internet
Alves Bezerra
[As partes desta mensagem que não continham texto foram removidas]
fazer split dos valores separados por vírgula, você pode utilizar
uma função que fiz para isso. Disponibilizei em:
http://pastebin.com/ZfAGxK5i (use à vontade, mas mantenha a atribuição).
Dirlei.
Ralp Alves Bezerra escreveu:
Nobres colegas,
Estou tentando importar um arquivo texto
Nobres colegas,
Estou tentando importar um arquivo texto no seguinte formato:
601,029,200900,01,01,20091201,01120001,200912,01,031
601,029,200900,01,01,20091201,01120001,200912,01,031
601,029,200900,01,01,20091201,01120001,200912,01,031
Porém, esbarrei no qualificador de texto
Washington André Muller da silva
###
NextCorp Informática Ltda
www.nextcorp.com.br
nextc...@nextcorp.com.br mailto:nextcorp%40nextcorp.com.br
0xx-(51)-3037-6605
###
From: Ralp Alves Bezerra
Sent: Monday, February 22, 2010 1:59 PM
To: delphi-br@yahoogrupos.com.br
Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a lista.
Teria uma maneira via Delphi de configurar a pasta em que as imagens serão
digitalizadas.
Ex.: Ao abrir meu sistema o mesmo já configurar a pasta que desejo salvar as
imagens.
As imagens serão digitalizadas em
;
end;
Espero ter ajudado.
Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra
ral...@gmail.comescreveu:
Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a
lista.
Teria uma maneira via Delphi de configurar a pasta em que as imagens serão
digitalizadas.
Ex.: Ao abrir
:= ExtractFilePath(Application.ExeName);
if dlg.Execute then begin
// dlg.FileName tem o nome do arquivo
end;
finally
dlg.Free;
end;
Espero ter ajudado.
Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra
ral...@gmail.com ralprd%40gmail.comescreveu:
Bom dia nobre colegas, estou com uma dúvida
a chave utilizada.
Espero que resolva,
Em 22 de fevereiro de 2010 13:59, Ralp Alves Bezerra
ral...@gmail.comescreveu:
E o seguinte, minha aplicação já executa a digitalização normalmente
salvando em banco ok através do TAcquireImage.
A questão e que foi comprado um scanner que faz a digitalização
Boas férias e um feliz ano!
___
Grupo G2
G2 Tecnologia
Ralp Alves Bezerra
Diretor de Tecnologia
Av. 13 de Maio, 853 - 2º andar Sl. 204
Bairro de Fátima - 60.040-530
Fortaleza - Ceará - Brasil
(85) 3257-6662 / 8872.4325 / 9215.2100
-Mensagem original-
De: delphi-br@yahoogrupos.com.br
Jhosef, não sei se é bem isso que você deseja, mas nestes links tem algumas
matérias bem interessantes sobre o assunto.
http://fernandopassaia.wordpress.com/
http://fernandopassaia.wordpress.com/
http://fernandopassaia.wordpress.com/2009/05/07/dando-valor-ao-seu-trabalho
/
Concordo plenamente com sua colocação, se ficarmos sem tomar um a atitude,
isso vai ocorrer sempre.
__
Grupo G2 Tecnologia
Av. 13 de Maio, 853 - 2º andar Sl. 204
Bairro de Fátima - 60.040-530
Fortaleza - Ceará - Brasil
(85) 3257-6662 / 8872.4325 / 9215.2100
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Marcos
Enviada em: quarta-feira, 21 de outubro de 2009 11:20
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Re: [OFF-TOPIC] - Trabalho de Faculdade - Smartphone
Luiz,
põe seu email aqui, se
Ficou show de bola!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Moacir - GMail
Enviada em: terça-feira, 7 de julho de 2009 18:09
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [OFF-TOPIC] Minha aplicação - AppEngine - Teste
Boa !!!
Label.Caption:=IntToStr((SuaTabela.RecordCount)
Espero que seja isso.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome
de nillgolv
Enviada em: quinta-feira, 2 de julho de 2009 20:21
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Informe total de
Se deseja mudar o DBLookupComboBox1 em tempo de execução, você pode fazer desta
maneira:
DBLookupComboBox1.LookupField :='Locacao';
DBLookupComboBox1:='Locacao';
DBLookupComboBox1 :=d.ds_Locacao;
Inclusive utilizando várias tabelas em um mesmo DBLookupComboBox1
Para zerar faça
Bom dia! Estou utilizando o código abaixo juntamente com o componente
edbImage para salvar uma imagem no firebird 2.1 com dbexpress e Delphi 7:
procedure TfrmAuxiliar.SpeedButton1Click(Sender: TObject);
begin
if application.messagebox('Incluir Bandeira?',
'Bandeira',mb_yesno)=idyes
Poucos dias atrás, coloquei aqui no grupo uma dúvida sobre os campos
RLDbText não mostrarem os dados de uma pesquisa feita através de uma query.
No mesmo dia, o amigo Jorley me enviou esta mesnagem:
Amigo, o fortes tem um bug que as vezes perde o Data Source no Report ou
nos RLDbText ou
Bom dia!
Estou tendo um problemão aqui para gerar um relatório com o fortes report.
Tenho uma query e um datasource ligado a query para efetuar a pesquisa
conforme abaixo:
If Radio1.ItemIndex=12 then // Turma da Escola
Begin
With qrPesqAluno do
Begin
Close;
Aconteceu aqui comigo, um problema muito interessante:
Possuo uma consulta em sql ligada a um DataSource. Efetuo a pesquisa
normalmente e a mesma é mostrada em um dbGrid.
No meu formulário, tenho um trlReport devidamente ligado ao DS da pesquisa.
Porém, quando mando imprimir através do
Nobres colegas, tenho uma tabela máster devidamente ligada a uma tabela
detalhe feita no ibExpert.
Ocorre é que, quando clico no botão novo da tabela Master, preencho alguns
dados ok! Porém, quando preciso inserir registro na tabela detalhe e mando
salvar o mesmo não é gravado.
Notei que,
Bom dia! Estou utilizando o código abaixo juntamente com o componente
edbImage para salvar uma imagem no firebird 2.1 com dbexpress e Delphi 7:
procedure TfrmAuxiliar.SpeedButton1Click(Sender: TObject);
begin
if application.messagebox('Incluir Bandeira?',
'Bandeira',mb_yesno)=idyes
No caso, não e para mostrar no dbgrid.
Eu tenho o componente edbimage na aplicação, o que queria é ao clicar em um
registro no dbgrid ele mostrasse a imagem no componente.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Jackson Gomes - ToolsComps
Enviada
Bom dia! Estou utilizando o código abaixo juntamente com o componente
edbImage para salvar uma imagem no firebird 2.1 com dbexpress e Delphi 7:
procedure TfrmAuxiliar.SpeedButton1Click(Sender: TObject);
begin
if application.messagebox('Incluir Bandeira?',
'Bandeira',mb_yesno)=idyes
Desculpe, mais o que fiz foi reformular a minha dúvida, pois estavam
pensando que queria mostrar uma imagem no dbgrid e não é este o caso.
Abraços.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Jackson Gomes - ToolsComps
Enviada em: quinta-feira, 21 de
)
end;
Porém, está dando o seguinte erro:
Error reading channel (erro lendo canal)
Quanto ao BlobType dos componentes SqlDataSet e ClientDataSet, qual seria a
melhor opção?
Grato.
Ralp Alves Bezerra
[As partes desta mensagem que não continham texto foram removidas]
cadastrar um registro ao clicar em novo entro com
os dados necessários, até ai tudo bem.
O problema ocorre quando clico em salvar, me aparece a mensagem abaixo:
Não é possível localizar o registro. Nenhuma chave foi especificada.
O que poderia ser?
Gratos.
Ralp Alves Bezerra
Eu Já havia feito isso, porém me é retornada a mensagem: Registro alterado
por outro usuário.
Engraçado que no primeiro sistema que fiz em firebird, não houve problema
algum.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Alisson
Enviada em:
A vaga seria somente para pessoas residentes em Fortaleza/CE
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Clovito
Enviada em: quinta-feira, 7 de maio de 2009 15:59
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Off - Programador Free Lancer
Gostaria de agradecer ao nobre colega Orlando que me ajudou com uma pesquisa
em SQl que não estava dando certo.
Não respondi antes pois tive que fazer uma cirurgia em meu punho e fiquei
vários dias de molho.
Abraços a todos e em especial ao colega Orlando, pela ajuda e tempo a mim
arrependera
De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Ralp Alves Bezerra
Enviada em: quinta-feira, 9 de abril de 2009 07:16
Para: delphi...@yahoogrupos. com. br
Assunto: [delphi-br] Dúvida
Nobres colegas,
Estou tendo uma certa dificuldade em realizar um consulta juntando 2 tabelas
diferentes.
Tenho uma tabela chamada Cardapio_Saida (onde ficam armazenadas todas as
saídas) com os seguinte campos:
CodProd
Produto
Quantidade
Fornecedor
Data
E outra chamada Entradas
Coloque desta maneira: ao invés de TblTabelaValor.String; coloque
TblTabelaValor.AsString;
Abraços
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Infogil
Enviada em: sábado, 28 de março de 2009 12:58
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br]
Nobres colegas, estou tentando criar esta SP no ibexpert mais não estou
conseguindo.
-- STATEMENT --
CREATE PROCEDURE SP_GEN_OUTRO_CURSO_ID
RETURNS (ID INTEGER)
AS
BEGIN
ID = GEN_ID(, 1);
SUSPEND;
END
-- ERROR MESSAGE --
Invalid token.
Dynamic SQL
Utilizo o FortesReport a alguns anos e estou muito satisfeito com o mesmo. E
o melhor que é free!
Ralp Alves
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Hudson Dias
Enviada em: quarta-feira, 18 de fevereiro de 2009 21:46 Ralp
Para:
.
Ralp Alves Bezerra
[As partes desta mensagem que não continham texto foram removidas]
Muito obrigado José, era isso mesmo!
Havia tentado:
Criterio.LookupField :='';
Criterio.LookupDisplay:='';
Sem levar em consideração o LookupSource.
Valeu!
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de JB
Enviada em: quinta-feira, 19 de
Por incrível que pareça realmente estava fazendo isso.
De tanto quebrar a cabeça aqui, sai um pouco para arejar e entre uma cerveja
e outra me veio este erro primário.
Coisas da vida.
Valeu Emanuel.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de
Bom dia nobres colegas.
Estou com uma dúvida aqui e talvez vocês possam me ajudar.
Tenho aqui um sistema desenvolvido em Delphi 7 e utilizando tabelas paradox.
(sistema bem simples)
Tem uma rotina que faz a retirada das mercadorias do estoque (saídas).
Neste caso, tenho um produto com 100
Caro Emanuel,
O campo esta como numérico no banco e no Field em EditFormat e DisplayFormat
coloco a mascara ###,##0.00
Mas os valores estão sendo arredondados Ex. 100-13,8=86,2 mas o valor
retornado é 86 arredondado e por ai vai.
Abraços.
De: delphi-br@yahoogrupos.com.br
; //Aqui acontece o
arredondamento indesejado ao subtrair do estoque
dm.tbProduto.Post;
end;
dm.tbCardapioR.Next;
end;
dm.tbProduto.IndexName:='';
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Ralp Alves Bezerra
Enviada
: 'String' and 'PAnsiChar'
Algúem poderia me dar uma luz a cerca de como imprimir o arquivo?
Ps.: Estou utilizando Delphi 7
Abraços a todos e obrigado!
Ralp Alves Bezerra
São José dos Pinhais
Linux user number 449753
---
Powered by Slackware Linux 12.0
Kernel 2.6.21.5-custom
---
- Mensagem original
De: Ralp Alves Bezerra [EMAIL PROTECTED]
mailto:ralp
Urgente! Precisamos de programador para dar suporte a sistema comercial
desenvolvido em delphi 7 e tabelas paradox.
Não é necessário experiência.
Todos os fontes do sistema se encontram na empresa.
Favor entrar em contato diretamente com a empresa no fone informado.
Remuneração a combinar.
Nobres Colegas,
Em meu form tenho o componente ScrollBox. Minha dúvida é a seguinte:
como faço para que meu forme role utilizando o scroll do mouse?
Estou utilizando Delphi 7
Desde já Agradeço.
Abraços.
Ralp Alves
.
Ralp Alves Bezerra [EMAIL PROTECTED] escreveu:
Nobres Colegas,
Em meu form tenho o componente ScrollBox. Minha dúvida é a seguinte:
como faço para que meu forme role utilizando o scroll do mouse?
Estou utilizando Delphi 7
Desde já Agradeço
Estou utilizando o código abaixo mas o form não rola:
procedure TfrmCadBenef.FormMouseWheel(Sender: TObject; Shift: TShiftState;
WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
Var
msg: Cardinal;
code: Cardinal;
i, n: Integer;
begin
If WindowFromPoint( mouse.Cursorpos ) =
matéria específica sem que seja repetido.
O que ocorre agora é que se pedir uma relação de professores por
matéria, minha sql retorna uma duplicidade, isso é, se o professor
leciona português em 3 escolas diferentes me retorna o nome do professor
duplicado 3 vezes.
Abraços.
Ralp Alves Bezerra
.Text;
dm.cds_Depende.Open;
dm.cds_Servidor.open;
dm.cds_SitFunc.Open;
end;
If dm.cds_Servidor.RecordCount=0 then ShowMessage('Registro não
Encontrado! Verifique as entradas digitadas.')
end;
Utilizo Firebird 2 e delphi 7.
Abraços.
Ralp Alves Bezerra
Nobres colegas,
Estou montando um relatório em fastreport e não estou conseguindo
efetuar o filtro de dados.
Tenho um componente Table um frxDBDataset e frxReport, onde o frxReport
esta ligado ao tfrxDBDataset e este ligado ao tTable.
Para testar efetuei um filtro comum
.Filter:= 'Codigo=' + Edit1.Text;
Table1.Filtered := True;
Em 06/03/08, Ralp Alves Bezerra [EMAIL PROTECTED] escreveu:
Nobres colegas,
Estou montando um relatório em fastreport e não estou conseguindo
efetuar o filtro de dados.
Tenho um componente Table um frxDBDataset e frxReport, onde
preview todos os dados estão sendo exibidos..
ou seja.. se o preview da removendo o filtro.
Em 06/03/08, Ralp Alves Bezerra [EMAIL PROTECTED] escreveu:
Já fiz isso é continua não filtrando. Fiz um outro teste e coloquei um
dbgrid.
No dbgrid aparecem somente os registros filtrados mas
-
From: Ralp Alves Bezerra
To: Delphi BR
Sent: Tuesday, March 04, 2008 6:29 PM
Subject: [delphi-br] Ata de Resultados
Nobres Colegas,
Venho mais uma vez pedir a ajuda dos nobres colegas para poder resolver
uma dúvida que me ocorre:
Tenho um sistema em paradox para
://www.santacasarg.com.br
- Original Message -
From: Ralp Alves Bezerra
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, March 05, 2008 8:56 AM
Subject: Re: [delphi-br] Ata de Resultados
Caro Duarte,
No meu caso todas as informações estão contidas na mesma tabela
CrossTab.
Le e interpreta o que te passei anteriormente ... eu já fiz algo similar ao
que tu precisas utilizando essa técnica que te mandei.
Alessandro DUARTE de Moraes
A.C. Santa Casa do Rio Grande.
http://www.santacasarg.com.br
- Original Message -
From: Ralp Alves Bezerra
Delphi 7, Paradox e FortesReport, mas a
dica poderia ser também em QR se caso fosse mais prático.
Desde já agradeço a ajuda.
Abraços.
Ralp Alves Bezerra
Nobres colegas,
Coloquei em meu projeto o componente usercontrol para controle de acesso.
Em minha máquina roda normalmente, porém, na máquina do cliente ocorre o
seguinte erro:
Exceção EDatabaseError no módulo RDCadServ em 000A1DF1.
unsuccessful metadata update
Table UCCADPERM already exists
Nobres colegas,
Coloquei em meu projeto o componente usercontrol para controle de acesso.
Em minha máquina roda normalmente, porém, na máquina do cliente ocorre o
seguinte erro:
Exceção EDatabaseError no módulo RDCadServ em 000A1DF1.
unsuccessful metadata update
Table UCCADPERM already exists
Salve nobres Colegas,
Estou repassando o endereço de uma site que conta com milhares de
componentes para delphi e outras plataformas de desenvolvimento:
http://www.vclcomponents.com
Existem componentes de todos os tipos possíveis, entre grátis e pagos.
Espero que ajude nossos nobres colegas.
Nobres colegas,
Preciso listar em uma consulta os alunos que tenham o status igual a 1,
7 e 8 somente. Porém a consulta não retorna os dados solicitados.
Já tentei trocar a linha:
Sql.Add('Status=1 and Status=7 and Status=8 and');
por :
Sql.Add('Status=1 or Status=7 or Status=8 and'); mas não
.
Abraços a todos.
Ralp Alves Bezerra
RD Sistemas
[EMAIL PROTECTED]
Gostaria de agradecer a todos os colegas que contribuiram com minha
dúvida sobre como obter a lista de impressoras e salva-las no banco.
O problema foi resolvido.
Abraços.
Nobres colegas, estou precisando pegar a relação de impressoras
instaladas em um determinado micro e mostra-las em um dbgrid.
Tentei a rotina abaixo, porém, as impressoras aparecem na mesma linha no
dbgrid.
with Printer do
begin
BeginDoc;
tbImpressora.Append;
abraço.
Carlos
--- Em delphi-br@yahoogrupos.com.br, Ralp Alves Bezerra
[EMAIL PROTECTED] escreveu
Estou tentando desta maneira
No evento beforeprint do fortesreport coloquei assim:
if RLDBText10.Caption = '01' then
RLDBText10.Font.Color := clRed
else
RLDBText10.Font.Color
Nobres Colegas, estou com a seguinte questão:
Como procedo para mudar a cor de um campo impresso no fortes report de
acordo com a situação do mesmo. Ex. Se o campo for true queria que a cor
do campo impresso ficasse vermelho.
Desde já agradeço atenção
Ralp Alves
Estou tentando desta maneira
No evento beforeprint do fortesreport coloquei assim:
if RLDBText10.Caption = '01' then
RLDBText10.Font.Color := clRed
else
RLDBText10.Font.Color := clBlack;
So que não coloca em vermelho somente os iniciados com 01.
Quando dou preview pela primeira vez
Na rxlib tem um componente que faz o que deseja
Sérgio T. Uetanabaro escreveu:
E não se esqueça do Application.ProcessMesssages após cada sleep... CREDO!!!
Acho q tem outros métodos para isso. procure por componentes que façam isso
de uma forma mais elegante.
[]´s
Sergio
Boa noite Nobres!
Estou efetuando uma pesquisa através da query abaixo:
If Radio1.ItemIndex=0 then // Codigo Escola
Begin
With Query1 do
Begin
Close;
Sql.Clear;
Sql.Add('Select Distinct(CodigoDaEscola) as Código,
Count(CodigoDaEscola) as Qtd from Alunos');
Sql.Add('Group by CodigoDaEscola Order
Caros Colegas, como faço para mudar um tipo de gráfico em tempo de execução?
Estou usando o componente qrChart e gostaria de poder fazer com que o
usuário escolha o tipo de gráfico que deseja imprimir, tipo Pie, Point,
Line, etc.
Obrigado e abraços a todos
Ralp Alves
[As partes desta
1 - 100 de 103 matches
Mail list logo