Re: [delphi-br] Componente ou Solução para Controle de Usuário.
Eu utilizo o user control e esta me atendendo muito bem Fiz algums modificações no fonte.. nada de mais posso disponibilizar se quiser Acho q tenho os arquivos orginais tambem Versao 2.31 Acho que no sourceforge esta desatualizado mas de uma olhada http://sourceforge.net/projects/usercontrol/ Abraços Daniel Azevedo Em 19/08/2010 17:03, Marciano Venter escreveu: Boa tarde pessoal, estou procurando um componente bom pra controle de acesso dos usuarios, eu utilizada o UserControl, mas o site está fora do ar a um tempinho e não tenho o arquivo, estou procurando pelos arquivos dele ou por outra opção. Alguma sugestão ? Atenciosamente, -- Marciano Venter Email: venter.marci...@gmail.com mailto:venter.marciano%40gmail.com Celular: (51) 9672 6093 venter.marci...@gmail.com mailto:venter.marciano%40gmail.com marcianoven...@hotmail.com mailto:marcianoventer%40hotmail.com [image: Twitter] http://www.twitter.com/ventermarciano@ventermarciano [image: Facebook]http://www.facebook.com/profile.php?id=10304177338ref=profile http://www.facebook.com/profile.php?id=10304177338ref=profile Marciano Venter
Re: [delphi-br] Tabela de CEP's
Olá
Eu tinha feito uma View
Mas achei que tinha ficado muito lendo o retorno dos dados
Acho que não tem como fazer Function no FireBird estou na versao 1,5
Intao fiz uma procedure que me retorna os dados
passos os parametros de entrada e na procedure monto a condicao where
de acordo com os filtros informados ataves do comando
EXECUTE STATEMENT
EX
SELECT * FROM V_CEP(:cep, :Rua, :Cidade, :UF )
nos parametros da query de consulta fica algo assim
ParamByName('cep').asstring := QuotedStr('35502427')
ou assim para procurar por parte do logradouro
ParamByName('Rua').asstring := ' %Rua do Ouro%'
os parametros que nao sao preenchidos infromamos vazio
ParamByName('Cidade').asstring := ''
ParamByName('UF').asstring: = .asstring := ''
São muitos dados relacionados e o tempo de retorno é consideravel
a melhor forma que econtrei foi atraves de procedure mesmo
E ficou muito bom. :)
Será que posso disponibilizar a base de ceps ou é contra alguma norma?
Abraços
Daniel Azevedo
Em 20/08/2010 09:13, Rodrigo Rossi escreveu:
Daniel,
Por que uma procedure e não um function ou até mesmo uma view?
Att.
Rodrigo Rossi
Skype: rodrigotrentinrossi
MSN: rdrg_ro...@hotmail.com
Fone: (45) 9963-1897
Cascavel - PR
On 19/08/2010 13:41, Daniel Azevedo wrote:
Eu tenho uma base de ceps que encontrei na net
muito boa por sinal e bem atualizada, com codigo dos municipios e UF
Algumas cidades sao subordinadas a outras intao nao consta cep mas tem a
referencia da cidade a qual é subordinada.
Fiz uma procedure dentro do BD para retornar os dados
Pode ser por cep, parte do logradouro e tal
Na tela de cadastro de clientes por exemplo, qdo informa o cep eu busco
o endereço
atraves da procedure e preencho os campos da tabela cliente
Caso o usuario não saiba o cep, tem um botao de pesquisar ceps, onde ele
localiza atraves da cidade ou parte do logradouro e tal
Clica em ok na tela de pesquisa de ceps e volta para tela de cadastro
preenchendo os campos.
A base inicialmente é em mdb.. mas importei utilizando o Ib_expert
Não sei se é contra as regras eu disponibilizar o link de onde encontrei
Intao se algum moderador liberar eu posto o link do arquivo original
Se for permitido posso liberar a minha base modificada em .fdb no 4shared
Abraços
Em 19/08/2010 11:52, Rodrigo Rossi escreveu:
Bom dia.
Gostaria de saber qual a melhor e/ou a mais usada implementação para
usar a tabela de CEP's dos correios no sistema em FB.
Por exemplo, o usuário está na tela de cadastro de cliente e digita o
CEP do endereço do cliente, quando passa por este campo o sistema
informa automaticamente a rua, bairro, cidade, estado, etc...
Sei que o CEP tem faixas, por isso a minha dúvida.
E também gostaria de saber onde posso encontrar a tabela de CEP's dos
Correios para importar no meu FireBird?
--
Att.
Rodrigo Rossi
Skype: rodrigotrentinrossi
MSN: rdrg_ro...@hotmail.commailto:rdrg_rossi%40hotmail.com
Fone: (45) 9963-1897
Cascavel - PR
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [Bulk] Re: [delphi-br] FIBPlus x IBO
Tente trocar as barras por ponto
19/08/2010 = 19.08.2010
Se nao me engado tem que colocar ente aspas
'19.08.2010'
No delphi use algo do tipo
Data := QuotedStr('19.08.2010');
Daniel Azevedo
Em 19/08/2010 10:34, Pablo Farias escreveu:
O problema aqui ta mais serio que eu imaginava.
Antigamente eu passava a data normal para o servidor fb 2.1 por exemplo
19/08/2010 o servidor mostrava os registros corretamente hoje estou
tendo que passar 08/19/2010 para ele mostrar os registros,
mesmo com o ibexpert estou tendo que fazer isto, alguma sugestao por que
isto esta ocorrendo?
Pablo Farias
Fone(81)9169.3339
develo...@marketingrapido.com.br
mailto:developer%40marketingrapido.com.br
www.marketingrapido.com.br
www.marketsistemas.com.br
Em 19/08/2010 08:14, jalosii escreveu:
trabalho com fib e ibo a anos, aqui nunca usamos Value pra passar
valor a um parametro, sempre com a especificação do campo correto.
AsString
AsDate
AsDateTime
AsTime
AsFloat
AsDouble
AsInteger
AsInt64
e assim por diante.
Altere na passagem dos parametros do seu sql e verifique que funciona.
Alosi
DigitalSystem
Bento Gonçalves-RS
Pablo Farias escreveu:
Ola pessoal,
a alguns dias utilizando o IBO eu fazia assim na passagem de parametro
na consulta
DM.FIDataAgendamento.close;
DM.FIDataAgendamento.ParamByName('varDataEnvio').AsString
:=datetostr(now);
DM.FIDataAgendamento.ParamByName('varFLAG').Value := 0;
DM.FIDataAgendamento.Open;
Hoje com FIB+
tento fazer isto
DM.FIDataAgendamento.close;
DM.FIDataAgendamento.ParamByName('varDataEnvio').AsString
:=datetostr(now);
DM.FIDataAgendamento.ParamByName('varFLAG').Value := 0;
DM.FIDataAgendamento.Open;
Ele da erro na conversão da data.
entao fiz assim
DM.FIDataAgendamento.close;
DM.FIDataAgendamento.ParamByName('varDataEnvio').AsString
:=datetostr(now);
DM.FIDataAgendamento.ParamByName('varFLAG').Value := 0;
DM.FIDataAgendamento.Open;
Porem nao sei por qual motivo ele nao me traz resultado algum mesmo
tendo informações com os dados passados.
Alguem pode me ajudar?
`
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Aplicativo aberto pelo Delphi
Caramba que facil
tinha feito ate uma gambiarra para pegar o titulo da janela do delphi
com o nome do programa
kkk
Finissimo
Valeu Luciano
Em 19/08/2010 13:27, simoesluciano escreveu:
if DebugHook 0 then
begin
showmessage('Debugando');
end
else
begin
showmessage('Executando normal');
end
Luciano C. Simões
--- Em delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br, Daniel Azevedo
falecomdaniel...@... escreveu
Ola galera
Tem como saber se o meu programa esta em modo de Depuração?
Ou seja, se o aplicativo foi aberto pelo Delphi.
Hoje tenho uma rotina que verifica se o Delphi esta aberto.
Caso esteja aberto o sistema ja abre automaticamente.
Sem a necessidade de informar usuario, senha, chave de liberacao e tal.
Isso facilita muito, ninguem merece ficar digitando usuario e senha
toda hora
O problema é que se a pessoa tiver o delphi no computador e estiver
aberto o sistema fica liberado e logado com o usuario master (Bug Faill
rss).
Se alguem tiver uma dica...
Se não voiu ter q tirar esta facilidade do sistema
Valeu.
__._,_.__
Re: [delphi-br] Tabela de CEP's
Eu tenho uma base de ceps que encontrei na net muito boa por sinal e bem atualizada, com codigo dos municipios e UF Algumas cidades sao subordinadas a outras intao nao consta cep mas tem a referencia da cidade a qual é subordinada. Fiz uma procedure dentro do BD para retornar os dados Pode ser por cep, parte do logradouro e tal Na tela de cadastro de clientes por exemplo, qdo informa o cep eu busco o endereço atraves da procedure e preencho os campos da tabela cliente Caso o usuario não saiba o cep, tem um botao de pesquisar ceps, onde ele localiza atraves da cidade ou parte do logradouro e tal Clica em ok na tela de pesquisa de ceps e volta para tela de cadastro preenchendo os campos. A base inicialmente é em mdb.. mas importei utilizando o Ib_expert Não sei se é contra as regras eu disponibilizar o link de onde encontrei Intao se algum moderador liberar eu posto o link do arquivo original Se for permitido posso liberar a minha base modificada em .fdb no 4shared Abraços Em 19/08/2010 11:52, Rodrigo Rossi escreveu: Bom dia. Gostaria de saber qual a melhor e/ou a mais usada implementação para usar a tabela de CEP's dos correios no sistema em FB. Por exemplo, o usuário está na tela de cadastro de cliente e digita o CEP do endereço do cliente, quando passa por este campo o sistema informa automaticamente a rua, bairro, cidade, estado, etc... Sei que o CEP tem faixas, por isso a minha dúvida. E também gostaria de saber onde posso encontrar a tabela de CEP's dos Correios para importar no meu FireBird? -- Att. Rodrigo Rossi Skype: rodrigotrentinrossi MSN: rdrg_ro...@hotmail.com mailto:rdrg_rossi%40hotmail.com Fone: (45) 9963-1897 Cascavel - PR -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Aplicativo aberto pelo Delphi
Ola galera Tem como saber se o meu programa esta em modo de Depuração? Ou seja, se o aplicativo foi aberto pelo Delphi. Hoje tenho uma rotina que verifica se o Delphi esta aberto. Caso esteja aberto o sistema ja abre automaticamente. Sem a necessidade de informar usuario, senha, chave de liberacao e tal. Isso facilita muito, ninguem merece ficar digitando usuario e senha toda hora O problema é que se a pessoa tiver o delphi no computador e estiver aberto o sistema fica liberado e logado com o usuario master (Bug Faill rss). Se alguem tiver uma dica... Se não voiu ter q tirar esta facilidade do sistema Valeu.
Re: [Bulk] [delphi-br] Midas.dll
Olá Ja passei por isso Na maquina onde esta o sistema voce vai em iniciar/executar e digita Se a midas.dll estiver local na maquina regsvr32.exe midas.dll Caso a midas esteja em um servidor ou outro computador Geralmente eu deixo dentro da pasta do meu sistema regsvr32.exe \\servidor\pasta_sistema\midas.dll Em 11/08/2010 17:39, Pablo Farias escreveu: Ola pessoal, estou tendo um problema, que julgava ser facil ser resolvido, porem passei quase o dia todo tentando resolver e nao consegui. O sistema nao importa aonde ele é instalado ele da o erro 'Error Loading Midas.dll' Porem ja tentei colocar no system32 do windows 7 ja tentei copiar para a pasta aonde esta o sistema, e nada de resolver, alguem ja passou por isto e conseguiu resolver de qual forma? Obrigado -- Pablo Farias Fone(81)9169.3339 develo...@marketingrapido.com.br mailto:developer%40marketingrapido.com.br www.marketingrapido.com.br www.marketsistemas.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Importação de Arquivo
A rotina q te mandei faz justamente isso, ignora as virgulas pega a Aspas + a virgula , para identificar o final do campo valido quero dizer... foi esta a intenção mais a noite vou estar com o delphi e posso fazer a rotina funcionar caso ela nao tenha funcionado se ate la nao tiver resolvido eu monto uma e ja faço os testes e te entrego funfando Walter Chagas (Bol) escreveu: é mas e a virgula dos valores decimais?? É um enigma essa parada daí. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br mailto:wchagasj%40bol.com.br http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: 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%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 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-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de Rubem Nascimento da Rocha Enviada em: terça-feira, 13 de julho de 2010 15:54 Para: delphi-br Assunto: RE: [delphi-br] Importação de Arquivo Prioridade: Alta Qual é exatamente a sua dificuldade? Sds. To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: ral...@gmail.com mailto:ralprd%40gmail.com mailto:ralprd%40gmail.com Date: Tue, 13 Jul 2010 15:50:44 -0300 Subject: [delphi-br] Importação de Arquivo 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 601,029,201000,02,01,20100517,17050004,201005,04,122,0003,2 ,002,,33901400,1.000,00 601,029,201000,02,01,20100524,24050005,201005,04,122,0003,2 ,003,,33903000,10.000,00 601,029,201000,03,01,20100503,03050009,201005,04,122,0003,2 ,006,,33903900,100,00 Já vasculhei a net e até o momento ainda não consegui nenhum êxito. Algum dos nobres colegas já efetuou este tipo de importação com um arquivo neste formato? Estou utilizando Delphi 7/Firebird 2.1 Grato. Ralp Alves __ Informa��o do ESET Smart Security, vers�o da vacina 5276 (20100713) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: RES: RES: [delphi-br] Importação de Arqui vo
blz Ralp a rotina ... mas nao testei pq fiz meio de cabeça sem usar o delphi mas a ideia acho q é essa mesmo while not Eof ( arq ) do begin readln(arq,linha) for i:= 0 to Length(linha) do begin // verifica se é diferente de if linha[i] '' then begin //== Verifica se a proxima poscicao é , que indica o final do campo if (linha[i] + linha[i+1]) ',' then valorValido := valor + linha[i] else begin // Trate o valor aki, grave no banco de dados end; end; end; end; Ralp Alves Bezerra escreveu: Desculpe Daniel, troquei o seu nome pelo do Walter. Não sei o que houve aqui em meu micro. Meu outlook parou de funcionar e não consigo recuperar minhas mensagens. Poderia me enviar novamente a rotina? Abraço. 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 Daniel Azevedo Enviada em: terça-feira, 13 de julho de 2010 17:24 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Importação de Arquivo A rotina q te mandei faz justamente isso, ignora as virgulas pega a Aspas + a virgula , para identificar o final do campo valido quero dizer... foi esta a intenção mais a noite vou estar com o delphi e posso fazer a rotina funcionar caso ela nao tenha funcionado se ate la nao tiver resolvido eu monto uma e ja faço os testes e te entrego funfando Walter Chagas (Bol) escreveu: é mas e a virgula dos valores decimais?? É um enigma essa parada daí. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br mailto:wchagasj%40bol.com.br mailto:wchagasj%40bol.com.br mailto:wchagasj%40bol.com.br http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com mailto:whitesockets%40hotmail.com mailto:whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Marcelo To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: 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%40gmail.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 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 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-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de Rubem Nascimento da Rocha Enviada em: terça-feira, 13 de julho de 2010 15:54 Para: delphi-br Assunto: RE: [delphi-br] Importação de Arquivo Prioridade: Alta Qual é exatamente a sua dificuldade? Sds. To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br From: ral...@gmail.com mailto:ralprd%40gmail.com mailto:ralprd%40gmail.com mailto:ralprd%40gmail.com mailto:ralprd%40gmail.com Date: Tue, 13 Jul 2010 15:50:44 -0300 Subject: [delphi-br] Importação de Arquivo 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 601,029,201000,02,01,20100517,17050004,201005,04,122,0003,2 ,002,,33901400,1.000,00 601,029,201000,02,01,20100524,24050005,201005,04,122,0003,2 ,003,,33903000,10.000,00 601,029,201000,03,01,20100503,03050009,201005,04,122,0003,2 ,006,,33903900,100,00 Já vasculhei a net e até o momento ainda não consegui nenhum êxito. Algum dos nobres colegas já efetuou este tipo de importação com um arquivo neste formato? Estou utilizando Delphi 7/Firebird 2.1 Grato. Ralp Alves
Re: [delphi-br] Importação de Arquivo
Cara como eu estou sem delphi no momento fiz uma rotina rapida aki q deve te dar uma luz desculpe se ela nao funcionar corretamente, mas acho q vai te dar uma luz while not Eof ( arq ) do begin readln(arq,linha) for i:= 0 to Length(linha) do begin // verifica se é diferente de = if linha[i] '' then begin // Verifica se a proxima poscicao é , que indica o final do campo = if (linha[i] + linha[i+1]) ',' then valorValido := valor + linha[i] else begin // Trate o valor aki, grave no banco de dados = end; end; end; end; Ralp Alves Bezerra escreveu: 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 601,029,201000,02,01,20100517,17050004,201005,04,122,0003,2 ,002,,33901400,1.000,00 601,029,201000,02,01,20100524,24050005,201005,04,122,0003,2 ,003,,33903000,10.000,00 601,029,201000,03,01,20100503,03050009,201005,04,122,0003,2 ,006,,33903900,100,00 Já vasculhei a net e até o momento ainda não consegui nenhum êxito. Algum dos nobres colegas já efetuou este tipo de importação com um arquivo neste formato? Estou utilizando Delphi 7/Firebird 2.1 Grato. Ralp Alves [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET Smart Security, versão da vacina 5276 (20100713) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
[delphi-br] Re: Alterar posição das tabs (iwtabcontrol )
Não sei se vai ter esta propriedade neste componente mas verifique PageIndex se nao me engano ela define a posição da ordem dos Tabs Adriano Santos escreveu: Eric, É que tem uns componentes no IW que não deixam mudar em tempo de projeto. O TreeView por exemplo só consigo mudar indo no DFM. não sei é o caso do TabControl, preciso olhar no Delphi pra ter certeza. Adriano Santos +55 (11)8219-5420 http://twitter.com/asrsantos Enviado de meu iPhone Em 21/06/2010, às 01:10, eric_developer developer.syst...@yahoo.com mailto:developer.systems%40yahoo.com escreveu: ué, mas é só clicar na guia, seja em tempo de projeto ou execuçã o. expliquem melhor... Eric Developer Systems www.magaldi.eti.br --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br, Marcelo Moacir Florindo marceloflori...@... escreveu Adriano é isto mesmo, quero mudar a posição do tab fisicamente. Att, Marcelo Em 20 de junho de 2010 22:28, Adriano Santos asrsan...@... escreveu: Eric, Acho que ele quer fazer isso via projeto. Não entendi direito o que ele quer. Tô sem Delphi nessa máquina, se for o mesmo problema do Tr eeView imagino que só indo no DFM. Clica com o direito no Form e use Vi ew as Text. Localiza o código da aba e muda o trecho de código para onde des eja. Depois clica com o direito e View as Form. No IwTreeView só funciona de ssa forma para mudar os itens em projeto. Amanhã no escritório dou uma olhada nisso direito. Se não for isso a dica do Eric funciona. -- Adriano Santos http://twitter.com/asrsantos www.delphitodelphi.blogspot.com 2010/6/20 eric_developer developer.syst...@... Olá, IWTabControl1.ActivePage:=0; // primeira guia IWTabControl1.ActivePage:=1; // segunda guia ... Eric Developer Systems www.magaldi.eti.br --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br %40yahoogrupos.com.br, Marcelo Moacir Florindo marceloflorindo@ escreveu Colegas, Tenho 2 tabs quero alterar a posição delas, Qual seria o procedimento? Grato, -- Marcelo Moacir Florindo Analista/Desenvolvedor http://www.gestaotec.com.br [As partes desta mensagem que não continham texto foram remo vidas] [As partes desta mensagem que não continham texto foram removida s] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- Marcelo Moacir Florindo Analista/Desenvolvedor http://www.gestaotec.com.br [As partes desta mensagem que não continham texto foram removidas] __ Informa��o do ESET Smart Security, vers�o da vacina 5214 (20100621) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: [delphi-br] Variável Global
Algumas variaveis globais eu utilizo no meu DataModule ja que é preciso pelo menos ter ele criado para criar a minha conexão com o banco de dados Depois vc pode transferir para outro form.. no caso o principal... caso tenha necessidade Eny Urias escreveu: Sei que muitos falam que não há como criar uma variável global no Delphi... Que a única forma é vc colocar como publica numa Unit e usar essa Unit nos forms... Mas acontece que eu possuo um form de login que é liberado da memoria após efetuado o login (que aí chama o form principal)... Mas tenho um campo que quero guardar numa variavel para ser utilizado a qualquer momento em qualquer form... como devo proceder? Criar no form login nao dá porque ele vai virar fumaça... criar no form principal nao dá porque no momento do login ele ainda nao foi criado... -- Eny Trova Urias Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, mas um hábito- Aristóteles [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET Smart Security, versão da vacina 5216 (20100621) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: [delphi-br] Actions, executando ações em formulário inativo
Antes da execucao da sua Action Verifique se a Aba Ativa é a que voce quer que seja executada EX: if (key = VK_F2) and (Pagina.ActivePage = Pag1) then // executa a action Jhosef Marks escreveu: Boa tarde, Tenho um sistema que eu estou usando TDI (formulários em abas), acontece que cada vez que eu tento usar uma tecla de atalho (F2, F3, F4, F5, etc...) é diparada a action de outra aba que nem está ativa em vez da aba que realmente está ativa, como eu posso fazer para forçar essas actions a funcionarem apenas nas abas ativas? Vlw... Att, Jhosef Marks de Carvalho Blog: http://www.jhosefmarks.com.br Jesus está voltando E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e buscar a minha face e se converter dos seus maus caminhos, então eu ouvirei dos céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET Smart Security, versão da vacina 5202 (20100616) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] desenvolver um gera dor de relatório para minha aplicação
Eu utilizo o Report Builder para fazer os relatorios na propria aplicacao
Consigo desenhar os relatorios, inclusive minhas instruções SQL
diretamente do meu exe
e salvo os relatorio no banco de dados.
Utilizo o FireBird
Existe demos do proprio componente que ensinam como fazer isso na sua
aplicação..
nada mto dificil.
Depois eu monto um menu na tela principal dinamicamente com os
relatorios personalizados..
OBS: Esta ferramenta para usuario final é um tanto quanto complicado..
visto que o mesmo precisa conhecer a estrutura do banco de dados
Para os desenvolvedores é uma maso na roda... pq qdo precisar de aluma
listagem ou algum relatorio que nao esteja no sistema
pode-se facilmente cria-lo sem precisar atualizar o exe
pra mim é uma maravilha
Abraços..
Walter Chagas (Bol) escreveu:
Valorizar seu projeto é muito relativo. Sugiro primeiramente, antes de
qualquer coisa, o estudo da viabilidade disto. De repente o custo
proposto, tomando-se como base, o tempo de desenvolvimento do
referido, a complexidade do desenvolvimento e debugação, não vai
compensar voce embutir este custo no projeto.
Voce pode sim, ir pesquisando e com o tempo ir implementando alguma
coisa visando projetos futuros, sei lá. Tem que analisar e estudar a
questão de forma a chegar a melhor solução possível e que te atenda
sem te prejudicar.
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br mailto:wchagasj%40bol.com.br
http://delphitocorporerm.blogspot.com/
http://twitter.com/wchagas
MSN: whitesock...@hotmail.com mailto:whitesockets%40hotmail.com
SKYPE: WalterChagasJr
- Original Message -
From: Pedro de Souza
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Sent: Saturday, June 12, 2010 6:27 PM
Subject: Re: [delphi-br] desenvolver um gerador de relatório para
minha aplicação
Dirlei, Paulo primeiramente obrigado pela ajuda. Entendo a
complexidade desse criar um gerador de relatório mais essa é uma
necessidade que vi que poderia ajudar e muito valorizar meu projeto já
que é uma funcionalidade que vemos em grandes sistemas.
Vi inicialmente o projeto MKR e achei muito interessante, para inicio
seria algo como ele. Vou dar uma pesquisada sobre o ReportBuilder e o
FastReport e direi a você qual a conclusão qu terei.
Abs,
Pedro
- Original Message -
From: Paulo Coutinho
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Sent: Saturday, June 12, 2010 3:21 PM
Subject: Re: [delphi-br] desenvolver um gerador de relatório para
minha aplicação
O FastReport permite a você exibir o report designer dele para que você
crie/edite relatórios. Tudo apartir do próprio componente.
--
Atenciosamente,
Paulo Coutinho.
Blog: www.prsolucoes.com/blog
Site: www.prsolucoes.com
Msn: pa...@prsolucoes.com mailto:paulo%40prsolucoes.com
Skype: paulo.prsolucoes
Consultor Certificado Bindows
Em 12 de junho de 2010 12:35, Dirlei Dionísio dir...@gmail.com
mailto:dirlei%40gmail.com escreveu:
Pedro,
Criar um gerador de relatórios é uma tarefa árdua. É preciso criar um
editor
de relatórios, um renderizador para visualizar os relatórios em tela e
outro
para gerar as páginas para impressão, isso tudo respeitando as
configurações
de página que podem variar para cada impressora. É possível fazer
um, mas a
menos que você pretenda comercializar esse gerador, é inviável
repassar o
custo dessa implementação para seu cliente.
Já consegui o que você deseja (permitir aos usuários editar seus
próprios
relatórios), mas usando algum gerador que já possua essa
funcionalidade. Na
época, usei o ReportBuilder - um gerador de rePT?Y div.attach-table
div div a { text-decoration: none; } div.attach-table { width: 400px;
} div.file-title a, div.file-title a:active, div.file-title a:hover,
div.file-title a:visited { text-decoration: none; } div.photo-title a,
div.photo-title a:active, div.photo-title a:hover, div.photo-title
a:visited { text-decoration: none; } div#ygrp-mlmsg #ygrp-msg p a
span.yshortcuts { font-family: Verdana; font-size: 10px;
font-weight: noð SY?ï
[As partes desta mensagem que não continham texto foram removidas]
_
__ Informação do ESET Smart Security, versão da vacina 5194 (20100614)
__
A mensagem foi verificada pelo ESET Smart Security.
http://www.eset.com
Re: [delphi-br] Crystal Reports - Alterar a conexão em tempo de execução
Veja se isto te ajuda *Criar uma fonte de dados no ODBC do windows pelo Delphi *http://www.weinrich.eti.br/dicas/delphi_001.htm#Dica_005 eu não testei para ter certeza q funciona... Att Josimar Zimermann escreveu: Bom dia companheiros! Aqui na empresa desenvolvemos relatórios utilizando a ferramenta /Crystal Reports/. Para conectar no banco de dados e selecionar as tabelas necessárias, utilizamos o ODBC. Na criação do relatórios selecionamos uma base de dados com um nome *X*. Na integração do relatório com o Delphi, O ODBC deve estar apontado para uma base de dados com o mesmo nome para o relatório funcionar. Gostaria de saber se é possível alterar em tempo de execução o nome da base na qual o relatório irá conectar-se para buscar as informações. Agradecido, Josimar Zimermann [As partes desta mensagem que não continham texto foram removidas] mailto:josim...@yahoo.com.br?subject=%5bdelphi-br%5d+crystal+reports+-+alterar+a+conex%e3o+em+tempo+de+execu%e7%e3o | através de email mailto:delphi...@yahoogrupos.com.br?subject=%5bdelphi-br%5d+crystal+reports+-+alterar+a+conex%e3o+em+tempo+de+execu%e7%e3o | Responder através da web http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJycnQ5a21uBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzIxMDE1MgRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEyNzY1MjExMjM-?act=replymessageNum=210152 | Adicionar um novo tópico http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJlcXFlZmRuBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTI3NjUyMTEyMw-- Mensagens neste tópico http://br.groups.yahoo.com/group/delphi-br/message/210152;_ylc=X3oDMTM4NW5xcHJsBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzIxMDE1MgRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzEyNzY1MjExMjMEdHBjSWQDMjEwMTUy (1) Atividade nos últimos dias: * Novos usuários http://br.groups.yahoo.com/group/delphi-br/members;_ylc=X3oDMTJmNzYwcmZiBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwN2dGwEc2xrA3ZtYnJzBHN0aW1lAzEyNzY1MjExMjM-?o=6 1 Visite seu Grupo http://br.groups.yahoo.com/group/delphi-br;_ylc=X3oDMTJlYjhzbTJ2BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwN2dGwEc2xrA3ZnaHAEc3RpbWUDMTI3NjUyMTEyMw-- -- __ Informação do ESET Smart Security, versão da vacina 5195 (20100614) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: [delphi-br] [MAF] Largura e Altura dos componentes no Windows
Tente alterar o Style do botão Veja maios no Help do Delphi vc tem algumas opções. bsAutoDetectWhen using Windows 3.x, the bitmap button uses the standard Windows 3.x look. When using a later version of Windows, the bitmap button uses a newer look. bsWin31Uses the standard Windows 3.1 look, regardless of which version of Windows is running. bsNew Uses a new bitmap button look, regardless of which version of Windows is running. Marcos Abreu Ferreira escreveu: fiz o que voce falou. Por exemplo. Um botao que fica a 10pixels do fim do FORM no Windows 'sem frescura', fica com barra de rolagem no Windows 'com frescura'. Ai arrumando para sair a barra de rolagem, o botão ficaria como se fosse à 10 pixels no Windows 'com frescura' e a 15 pixels no 'sem frescura'. Somente queria saber se existe uma forma de deixar os dois com a mesma cara... Em 14 de junho de 2010 13:06, Dirlei dir...@gmail.com escreveu: Você chegou a experimentar o que sugeri? Acho que vai resolver a questão das barras de rolagem dos forms. Em Seg, 2010-06-14 às 12:00 -0300, Marcos Abreu Ferreira escreveu: Dirlei, a barra de rolagem fica no FORM Em 14 de junho de 2010 11:50, Dirlei escreveu: A barra de rolagem aparece onde, exatamente? Se for a rolagem horizontal dos grids, uma opo voc ajustar os tamanhos dos grids com a configurao do seu Windows 'com frescuras', de forma que a aparencia fique razoavel com ou sem 'frescura'. -- Dirlei Dionsio Novo artigo: O estgio House do bom programador http://MaisQueBomCodigo.blogspot.com Em Seg, 2010-06-14 s 11:07 -0300, Marcos Abreu Ferreira escreveu: Pessoal, uso o Windows com a opo grfica para melhor desempenho, onde ele fica parecido com o Windows 98. Acontece que alguns clientes usam o Windows com com as propriedades grfica mais cheio de 'enfeites' e ai aparecem barras de rolagem tanto horizontal quanto vertical nas aplicaes. Como vocs fazem isso? Por exemplo. Tenho uma aplicao que tem dois Grd, a da esquerda tem tamanho fixo e o da direita tem a posio LEFT fixa e o WIDTH dela varia conforme o tamanho da tela da aplicao. Acerto os valores para funcionar direito no meu Windows, ai quando vou experimentar em outros Windows, aparecem as barras de rolagem. Qual a soluo que vocs encontraram para isso? -- Att, Marcos A. Ferreira So Paulo - Brasil +55 11 9309-3936 +55 11 8905-9889 MSN: maferreira%40hotmail.it Google Talk: maferreira.f2 Skype: maferreira.f2 LinkedIn: http://www.linkedin.com/in/maferreira/ Esta mensagem pode conter informao confidencial e/ou privilegiada. Se voc no for o destinatrio ou a pessoa autorizada a receber esta mensagem, no pode usar, copiar, ou divulgar as informaes nela contidas ou tomar qualquer ao baseada nestas informaes. Se voc recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperao. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. [As partes desta mensagem que no continham texto foram removidas] -- Att, Marcos A. Ferreira So Paulo - Brasil +55 11 9309-3936 +55 11 8905-9889 MSN: maferre...@hotmail.it maferreira%40hotmail.it Google Talk: maferreira.f2 Skype: maferreira.f2 LinkedIn: http://www.linkedin.com/in/maferreira/ Esta mensagem pode conter informao confidencial e/ou privilegiada. Se voc no for o destinatrio ou a pessoa autorizada a receber esta mensagem, no pode usar, copiar, ou divulgar as informaes nela contidas ou tomar qualquer ao baseada nestas informaes. Se voc recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperao. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir
Re: [delphi-br] [MAF] Largura e Altura dos componentes no Windows
Tente alterar o Style do botão Veja maios no Help do Delphi vc tem algumas opções. bsAutoDetectWhen using Windows 3.x, the bitmap button uses the standard Windows 3.x look. When using a later version of Windows, the bitmap button uses a newer look. bsWin31Uses the standard Windows 3.1 look, regardless of which version of Windows is running. bsNew Uses a new bitmap button look, regardless of which version of Windows is running. Marcos Abreu Ferreira escreveu: fiz o que voce falou. Por exemplo. Um botao que fica a 10pixels do fim do FORM no Windows 'sem frescura', fica com barra de rolagem no Windows 'com frescura'. Ai arrumando para sair a barra de rolagem, o botão ficaria como se fosse à 10 pixels no Windows 'com frescura' e a 15 pixels no 'sem frescura'. Somente queria saber se existe uma forma de deixar os dois com a mesma cara... Em 14 de junho de 2010 13:06, Dirlei dir...@gmail.com escreveu: Você chegou a experimentar o que sugeri? Acho que vai resolver a questão das barras de rolagem dos forms. Em Seg, 2010-06-14 às 12:00 -0300, Marcos Abreu Ferreira escreveu: Dirlei, a barra de rolagem fica no FORM Em 14 de junho de 2010 11:50, Dirlei escreveu: A barra de rolagem aparece onde, exatamente? Se for a rolagem horizontal dos grids, uma opo voc ajustar os tamanhos dos grids com a configurao do seu Windows 'com frescuras', de forma que a aparencia fique razoavel com ou sem 'frescura'. -- Dirlei Dionsio Novo artigo: O estgio House do bom programador http://MaisQueBomCodigo.blogspot.com Em Seg, 2010-06-14 s 11:07 -0300, Marcos Abreu Ferreira escreveu: Pessoal, uso o Windows com a opo grfica para melhor desempenho, onde ele fica parecido com o Windows 98. Acontece que alguns clientes usam o Windows com com as propriedades grfica mais cheio de 'enfeites' e ai aparecem barras de rolagem tanto horizontal quanto vertical nas aplicaes. Como vocs fazem isso? Por exemplo. Tenho uma aplicao que tem dois Grd, a da esquerda tem tamanho fixo e o da direita tem a posio LEFT fixa e o WIDTH dela varia conforme o tamanho da tela da aplicao. Acerto os valores para funcionar direito no meu Windows, ai quando vou experimentar em outros Windows, aparecem as barras de rolagem. Qual a soluo que vocs encontraram para isso? -- Att, Marcos A. Ferreira So Paulo - Brasil +55 11 9309-3936 +55 11 8905-9889 MSN: maferreira%40hotmail.it Google Talk: maferreira.f2 Skype: maferreira.f2 LinkedIn: http://www.linkedin.com/in/maferreira/ Esta mensagem pode conter informao confidencial e/ou privilegiada. Se voc no for o destinatrio ou a pessoa autorizada a receber esta mensagem, no pode usar, copiar, ou divulgar as informaes nela contidas ou tomar qualquer ao baseada nestas informaes. Se voc recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperao. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. [As partes desta mensagem que no continham texto foram removidas] -- Att, Marcos A. Ferreira So Paulo - Brasil +55 11 9309-3936 +55 11 8905-9889 MSN: maferre...@hotmail.it maferreira%40hotmail.it Google Talk: maferreira.f2 Skype: maferreira.f2 LinkedIn: http://www.linkedin.com/in/maferreira/ Esta mensagem pode conter informao confidencial e/ou privilegiada. Se voc no for o destinatrio ou a pessoa autorizada a receber esta mensagem, no pode usar, copiar, ou divulgar as informaes nela contidas ou tomar qualquer ao baseada nestas informaes. Se voc recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperao. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir
Re: [delphi-br] heranca ajudinha simples
olá alessandra a palavra reservada inherited indica que pode haver códigos sendo herdado de outro formulario Segure a tecla CTRL e clique no nome do form : TFmCadUsuarios Vc ira automaticamente ate a declaração dele : TFmCadUsuarios = class(TFrModeloCadastro) neste exemplo ele herda as propriedados do form TFrModeloCadastro Agora basta vc ver o codigo do botao BtnGravar do form TFrModeloCadastro Abraços att alessandra porto escreveu: amigos como faço para consultar o form pai quando não sei o nome dele no projeto e encontro somente isso no form filho. procedure TFmCadUsuarios.BtnGravarClick(Sender: TObject); begin inherited; end; existe algunha tecla ou associação que faço sobre a palavra inherited; que me leve ao codigo do form pai ? estou usando delphi 7 grata __ Informação do ESET Smart Security, versão da vacina 5190 (20100611) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: RES: [delphi-br] (unknown)
Justamente. sobe os arquivos compactados para o www.4shared.com e mande o link pra galera dar uma olhada ra vc Você vai precisar fazer upload de um dos arquivos e compartilhar o link para o pessoal investigar. Ou copiar o início do arquivo pelo bloco de notas e enviar para o grupo, como o Eduardo sugeriu. -- Dirlei Dionísio http://MaisQueBomCodigo.blogspot.com Em 10 de junho de 2010 08:09, Rick Benedet Miranda fluxodote...@yahoo.com.br escreveu: Tanto o Excel qto o Access retornam Erro inesperado causado pelo drivers de banco de dados externo (8961) De: Reinaldo Aparecido Pereira ctocv...@yahoo.com.brctocvl_1%40yahoo.com.br Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Quarta-feira, 9 de Junho de 2010 19:50:52 Assunto: RES: [delphi-br] (unknown) DB é Paradox, o Excel e o Access abre. Reinaldo Aparecido Pereira ( +55(45) 8426-4522 * mailto:reinaldoapere...@yahoo.com.br reinaldoapereira%40yahoo.com.br reinaldoapere...@yahoo.com.br reinaldoapereira%40yahoo.com.br Skype: reinaldoapereira Msn: lista_discus...@msn.com.br lista_discussao%40msn.com.br Ciscopar Consórcio Intermunicipal de Saúde Costa Oeste Analista de Sistemas ( +55(45) 3252-3524 Fag – Faculdade Assis Gurgacz Professor de Graduação ( +55(45) 3321-3900 América Latina Tecnologia e Mercado Gerente Comercial ( +55(45) 3222-0631 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Rick Benedet Miranda Enviada em: quarta-feira, 9 de junho de 2010 17:15 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] (unknown) Boa tarde aos membros da lista. Quero tirar uma duvida com vcs. Seguinte: tenho um arquivo de dados de extensão .db e o sistema ao qual ele pertence foi desenvolvido em Delphi. Contudo não sei em que banco ele foi desenvolvido. Ja tentei visualizar o arquivo pelo Database Desktop mas não obtive sucesso. Será que alguém pode me dar uma luz a esse respeito? Grato - Rick [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET Smart Security, versão da vacina 5186 (20100610) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Aniversário do Bruno Lichot
Apesar de ser novo aki no grupo desejo ao bruno um feliz aniversário saúde e felicidades Abraço Daniel Azevedo Ralp Alves Bezerra escreveu: Desejo a você um feliz aniversário!!! Abraço. Ralp Alves 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 jeanpapa10 Enviada em: quinta-feira, 10 de junho de 2010 13:20 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Re: [OFF] Aniversário do Bruno Lichot Também deixo aqui as minhas felicitações ao Bruno, continue seguindo este caminho que você está trilhando muito bem. PARABÉNS ! De: Jean Alysson --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br , Adriano Santos asrsan...@... escreveu Ae, Hoje é o grande dia. 30 anos de honestidade, comprometimento, garra, luta. Ae Brother, sou seu fã cara. Muita paz, alegria, sucesso, luz, saúde e vixi, tudo que o cara lá de cima te mandar. Forte abraço -- Adriano Santos http://twitter.com/asrsantos www.delphitodelphi.blogspot.com [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET Smart Security, versão da vacina 5187 (20100610) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com __ Informação do ESET Smart Security, versão da vacina 5187 (20100610) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: [delphi-br] TVirtualTreeView
de uma olhada neste site http://www.soft-gems.net/index.php?option=com_contenttask=viewid=12Itemid=33 tem alguns helps e demos para o delphi pode ser que t ajude Murilo Cunha escreveu: Pessoal, Realmente preciso de ajuda para resolver esta pendencia em meu sistema. Insisto em perguntar se ha alguem que possa me ajudar com esse assunto abaixo... Obrigado MuriloCunha Pessoal, Tenho a seguinte estrutura em meu TVirtualTreeView para D2010: - Node 1 Node 1.1 Node 1.2 Node 1.3 + Node 2 - Node 3 Node 3.1 Node 3.2 + Node 4 + Node 5 Como eu faço para trocar os CAPTIONS destes Nodes?? Este meu TVirtualTreeView exibe todos os forms que tenho em minha aplicacao e, dentro destes nodes, exibe o nome de todos os componentes que existem em cada form. Quero colocar o nome dos forms no primeiro nivel e os componentes no segundo nivel, como fazer?? Obrigado MuriloCunha __ Informação do ESET Smart Security, versão da vacina 5184 (20100609) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
Re: [delphi-br] TVirtualTreeView
ola MuriloCunha
Vc esta querendo fazer um controle de permissoes para usuarios do sistema?
Abaixo montei 2 rotinas que espero ser util para voce... acredito que
deve funcionar na TVirtualTreeView
de uma olhada no componente User Control..
http://www.usercontrol.net/index.php
ele faz o controle de de permissoes de acesso ao sistema.
onde vc pode liberar alguns botoes do seu form para acesso
ele faz o que vc esta querendo
Lista o nome do for com todos os seus componentes..
assim vc pode selecionar quais componentes os usuarios terão acesso
eu ja o utilizo a bastante tempo e funciona perfeito..
como seu Codigo fonte é aberto vc podera verificar, estudar e utilizar a
rotina que pega os componentes e coloca em uma TreeView
espero ter ajudado..
// para adcionar itens ao TreeView =
procedure TForm1.Button1Click(Sender: TObject);
var MyTreeNode1,
MyTreeNode2: TTreeNode;
begin
with TreeView1.Items do
begin
// Remove qualquer node existente
Clear;
// Adiciona o node raiz }
MyTreeNode1 := Add(nil, 'RootTreeNode1');
// Adiciona um sub item no node adiciona anteriormente
AddChild(MyTreeNode1,'ChildNode1');
// Adiciona outro node raiz}
MyTreeNode2 := Add(MyTreeNode1, 'RootTreeNode2');
AddChild(MyTreeNode2,'ChildNode2');
MyTreeNode2 := TreeView1.Items[3];
AddChild(MyTreeNode2,'ChildNode2a');
Add(MyTreeNode2,'ChildNode2b');
Add(MyTreeNode1, 'RootTreeNode3');
end;
end;
// Para pegar os componente do form =
procedure TForm1.PegaComponentesDoForm;
var i : Integer;
nome : string;
begin
{==
Nesta rotina percorro todos os compentes e pego apenas o
componente que me interessa
fiz assim para vc ver como fica . se quier pode pegar ainda Tedit etc
se quiser pegar todos os componentes coloque apenas
nome := Components[i].Name
dentro do for
===}
for I:= 0 to ComponentCount -1 do
begin
if (Components[i] is TBitBtn) then
nome := TBitBtn(Components[I]).Name;
if (Components[i] is TButton) then
nome := TButton(Components[I]).Name;
if (Components[i] is TSpeedButton) then
nome := TSpeedButton(Components[I]).Name;
end;
end;
Murilo Cunha escreveu:
Pessoal,
Realmente preciso de ajuda para resolver esta pendencia em meu sistema.
Insisto em perguntar se ha alguem que possa me ajudar com esse assunto
abaixo...
Obrigado
MuriloCunha
Pessoal,
Tenho a seguinte estrutura em meu TVirtualTreeView para D2010:
- Node 1
Node 1.1
Node 1.2
Node 1.3
+ Node 2
- Node 3
Node 3.1
Node 3.2
+ Node 4
+ Node 5
Como eu faço para trocar os CAPTIONS destes Nodes??
Este meu TVirtualTreeView exibe todos os forms que tenho em minha
aplicacao e, dentro destes nodes, exibe o nome de todos os componentes
que existem em cada form.
Quero colocar o nome dos forms no primeiro nivel e os componentes no
segundo nivel, como fazer??
Obrigado
MuriloCunha
--
__ Informação do ESET Smart Security, versão da vacina 5184 (20100609)
__
A mensagem foi verificada pelo ESET Smart Security.
http://www.eset.com
Re: [delphi-br] (unknown)
ola é o banco de dados paradox no Database Desktop creio que consiga visualizar acho q vc consgue abrir ele no excel 2000 Microsoft Access 2007 verifique em http://www.fileinfo.com/extension/db Rick Benedet Miranda escreveu: Boa tarde aos membros da lista. Quero tirar uma duvida com vcs. Seguinte: tenho um arquivo de dados de extensão .db e o sistema ao qual ele pertence foi desenvolvido em Delphi. Contudo não sei em que banco ele foi desenvolvido. Ja tentei visualizar o arquivo pelo Database Desktop mas não obtive sucesso. Será que alguém pode me dar uma luz a esse respeito? Grato - Rick __ Informação do ESET Smart Security, versão da vacina 5185 (20100609) __ A mensagem foi verificada pelo ESET Smart Security. http://www.eset.com
