[delphi-br] Indy 9 e Servidor Proxy
Bom dia a todos! Estou utilizando um atualizador de executável, para fazer a atualização automática de um sistema que estamos desenvolvendo. Tudo estava funcionando perfeitamente, até instalar o sistema em um cliente que possui um Domínio e usa Servidor Proxy. Alguém sabe se é possível utizar o o componente IdFTP do pacote Indy em um Servidor Proxy? Obrigado. Ulisses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] sql calculo datas ajuda?
preciso ajuda para criar uma pesquisa sql que a partir de uma data somada a X dias seja comparada a data atual e retorne o numero de dias de vencimento já decorridos. TABELA VENDA id_venda id_prazo dta_venda id_cliente valor 1 3 20/10/2008 100 33,14 2 1 13/05/2008 123 100,22 3 4 20/10/2008 1001 199,13 4 4 10/11/2008 2080 1234,99 23 2 12/08/2008 1023 32,78 TABELA PRAZO id_prazo n_dias 1 30 2 45 3 60 4 90 Como base a data do dia Quantos dias de vencido tem cada venda? Obs: se possivel informar ainda alem das vendas vencidas, o valor total da soma das vendas vencidas. agradeço a todos que ajudarem com sujestões Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] camera ip
Trabalhei um tempo com uma da DLink. Para realizar a conexão entrei em contato com o distribuidor que me mandaram o SDK da câmera! felipe govoni escreveu: boa tarde alguem ja trabalhou com camera ip? podem me dar alguma ajuda? -- Felipe Govoni - Programador Fone 8472-8718 [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
[delphi-br] VDOPrinter - Aproveitando
Olá amigos da lista, aproveitando o embalo alguém sabe se tem algum comando no VDOPrinter para impedir que salte a pagina ao terminar de imprimir ? Estou usando o VDOPrinter para imprimir naquelas fitas tipo cupom e ao terminar a impressão a impressora esta saltando um pedaço de papel. Resumo: Tem como imprimir e ao terminar a impressora não saltar. Desde ja antecipo meus agradecimentos Anderson Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses
Re: [delphi-br] VDOPrinter - Aproveitando
Bom dia! No método EndDoc, altere o parâmetro EjectPage para False. Boa sorte. Ulisses - Original Message - From: Anderson Furtilho To: delphi-br@yahoogrupos.com.br Sent: Thursday, November 13, 2008 10:11 AM Subject: [delphi-br] VDOPrinter - Aproveitando Olá amigos da lista, aproveitando o embalo alguém sabe se tem algum comando no VDOPrinter para impedir que salte a pagina ao terminar de imprimir ? Estou usando o VDOPrinter para imprimir naquelas fitas tipo cupom e ao terminar a impressão a impressora esta saltando um pedaço de papel. Resumo: Tem como imprimir e ao terminar a impressora não saltar. Desde ja antecipo meus agradecimentos Anderson Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Sniffer SQL com ODAC 6.25 p/ Oracle 10g
Bom dia a todos... Tenho, em minhas aplicações, uma classe que gerencia minhas conexões com o Oracle em runtime utilizando o ODAC. Nesta classe, são instanciados, também em runtime, objetos TOraStoredProc para as interações com o BD. Minha necessidade é a seguinte: preciso criar um sniffer SQL que monitore, à partir do SID do usuário, todas as instruções passadas ao BD, mesmo em PL/SQL. Como uso ODAC, e o suporte da Devart deixa muito a desejar, não consegui nada, nem deles (Devart), nem da internet, que me ajudasse. Enfim, minha necessidade é algo muito parecido com o SQL Trace, usado para monitorar o SQL Server. Alguém sabe como resolver isto utilizando o ODAC ou conhece algum componente que faça esta operação? Em tempo: este monitoramento não será realizado nas aplicações distribuídas aos usuários, mas na aplicação que gerencia as atualizações destas aplicações, sendo que apenas a equipe de desenvolvimento poderá utilizá-la. Utilizo Delphi 7, ODAC 6.25, Oracle 10g e Oracle Client 9.0. --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal [EMAIL PROTECTED] --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom ---
Res: [delphi-br] SQL com Union - Ordem Inversa não Funciona
Acabei de testar no FireBird 2.0.3 e funcionou perfeitamente. Olha o SQL que usei: select cd_manifestante, count(cd_atendimento) from atendimento where ds_resposta is null group by cd_manifestante union all select cd_manifestante, count(cd_atendimento) from atendimento where ds_resposta is not null group by cd_manifestante order by 2 desc Luciano Calenzani Simões De: valdir [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 12 de Novembro de 2008 16:05:53 Assunto: Re: [delphi-br] SQL com Union - Ordem Inversa não Funciona O banco é Firebird 2.0. Sim, o dado da coluna já é float. É que utilizo o cast por causa de um bug do Fortes Report que, na banda summary não imprime se não fizer isso. Mas, mesmo que tirasse o cast, não mudaria nada. Obrigado. Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Aplicativo n-tier trava ao tentar carregar servidor
Bom dia pessoal!
Não tenho muita experiência em Delphi e estou apanhando com uma aplicação
n-tier.
Estou usando conexão DBX com firebird.
O problema é que quando executo o cliente, o servidor deveria ser
automaticamente carregado, mas o servidor chega a ir pro Tray mas fica
travado e o cliente não termina de executar também.
Já tentei de tudo mas nada dá certo.
Não sei mais o que fazer, por isso estou recorrendo ao grupo.
Segue abaixo alguns trechos do código.
Grato,
Charlestown
Maringá-PR
-
// DataModule
constructor TDM1.Create(AOwner: TComponent);
begin
inherited;
SocketConnection1.Address := '127.0.0.1';
SocketConnection1.ServerName := 'OdontoServer.rdmMain';
ConnectionBroker1.Connected := True;
if not ConnectionBroker1.Connected then
ShowMessage('Não conectado!');
end;
/
// RemoteDataModule
initialization // uRDMMain
TComponentFactory.Create(ComServer, TrdmMain, Class_rdmMain,
ciMultiInstance, tmApartment);
end.
// Form do Servidor
procedure TfrmConfigServer.FormCreate(Sender: TObject);
begin
if FileExists(GetCurrentDir + '\OdontoDB.Ini') then
begin
ArqIni := TIniFile.Create(GetCurrentDir + '\OdontoDB.Ini');
Try
(*Texto := ArqIni.ReadString('OdontoDB', 'Database', '');
for i := 1 to length(Texto) do
begin
if Copy(Texto,i,1) = ':' then
begin
edBDIP.Text := Copy(Texto,1, i - 1);
edBDName.Text := Copy(Texto,i + 1, length(Texto));
break;
end;
end;
*)
edBDArquivo.Text := ArqIni.ReadString('OdontoDB', 'Database', '');
edBDUsuario.Text := ArqIni.ReadString('OdontoDB', 'User_Name', '');
edBDSenha.Text := ArqIni.ReadString('OdontoDB', 'Password', '');
Finally
ArqIni.Free;
end;
end
else
begin
gravaOdontoDB;
end;
if FileExists(GetCurrentDir + '\OdontoServer.Ini') then
begin
ArqIni := TIniFile.Create(GetCurrentDir + '\OdontoServer.Ini');
Try
edOSIP.Text := ArqIni.ReadString('Server', 'IP', '');
Finally
ArqIni.Free;
end;
end
else
begin
gravaOdontoServer;
end;
end;
procedure TfrmConfigServer.gravaOdontoDB;
begin
ArqIni := TIniFile.Create(trim(GetCurrentDir) + '\' + 'OdontoDB.Ini');
Try
ArqIni.WriteString('OdontoDB', 'DriverName', 'Interbase');
ArqIni.WriteString('OdontoDB', 'Database', edBDArquivo.Text);
ArqIni.WriteString('OdontoDB', 'RoleName', 'RoleName');
ArqIni.WriteString('OdontoDB', 'User_Name', edBDUsuario.Text);
ArqIni.WriteString('OdontoDB', 'Password', edBDSenha.Text);
ArqIni.WriteString('OdontoDB', 'ServerCharSet', '');
ArqIni.WriteString('OdontoDB', 'SQLDialect', '3');
ArqIni.WriteString('OdontoDB', 'ErrorResourceFile', '');
ArqIni.WriteString('OdontoDB', 'LocaleCode', '');
ArqIni.WriteString('OdontoDB', 'BlobSize', '-1');
ArqIni.WriteString('OdontoDB', 'CommitRetain', 'False');
ArqIni.WriteString('OdontoDB', 'WaitOnLocks', 'True');
ArqIni.WriteString('OdontoDB', 'Interbase TransIsolation',
'ReadCommited');
ArqIni.WriteString('OdontoDB', 'Trim Char', 'False');
Finally
ArqIni.Free;
end;
end;
procedure TfrmConfigServer.gravaOdontoServer;
begin
ArqIni := TIniFile.Create(trim(GetCurrentDir) + '\' + 'OdontoServer.Ini');
Try
ArqIni.WriteString('Server', 'IP', edOSIP.Text);
Finally
ArqIni.Free;
end;
end;
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Dicas para programar melhor
Um artigo muito bom que recomendo aos colegas do grupo: http://imasters.uol.com.br/artigo/6980/programacao/dicas_para_programar_melhor/ -- Att. -- José Benedito Software Developer [EMAIL PROTECTED] [EMAIL PROTECTED] +55 19 8116-7826
Re: [delphi-br] Aplicativo n-tier trava ao tentar carregar servidor
Acho que nestes casos, vc deveria colocar antes uma descrição do seu ambiente:
qual versão do Delphi, do FB, e SO. Facilita as pessoas pensarem no seu
problema.
- Original Message -
From: Charlestown Dias da Cunha
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, November 13, 2008 8:33 AM
Subject: [delphi-br] Aplicativo n-tier trava ao tentar carregar servidor
Bom dia pessoal!
Não tenho muita experiência em Delphi e estou apanhando com uma aplicação
n-tier.
Estou usando conexão DBX com firebird.
O problema é que quando executo o cliente, o servidor deveria ser
automaticamente carregado, mas o servidor chega a ir pro Tray mas fica
travado e o cliente não termina de executar também.
Já tentei de tudo mas nada dá certo.
Não sei mais o que fazer, por isso estou recorrendo ao grupo.
Segue abaixo alguns trechos do código.
Grato,
Charlestown
Maringá-PR
--
// DataModule
constructor TDM1.Create(AOwner: TComponent);
begin
inherited;
SocketConnection1.Address := '127.0.0.1';
SocketConnection1.ServerName := 'OdontoServer.rdmMain';
ConnectionBroker1.Connected := True;
if not ConnectionBroker1.Connected then
ShowMessage('Não conectado!');
end;
/
// RemoteDataModule
initialization // uRDMMain
TComponentFactory.Create(ComServer, TrdmMain, Class_rdmMain,
ciMultiInstance, tmApartment);
end.
// Form do Servidor
procedure TfrmConfigServer.FormCreate(Sender: TObject);
begin
if FileExists(GetCurrentDir + '\OdontoDB.Ini') then
begin
ArqIni := TIniFile.Create(GetCurrentDir + '\OdontoDB.Ini');
Try
(*Texto := ArqIni.ReadString('OdontoDB', 'Database', '');
for i := 1 to length(Texto) do
begin
if Copy(Texto,i,1) = ':' then
begin
edBDIP.Text := Copy(Texto,1, i - 1);
edBDName.Text := Copy(Texto,i + 1, length(Texto));
break;
end;
end;
*)
edBDArquivo.Text := ArqIni.ReadString('OdontoDB', 'Database', '');
edBDUsuario.Text := ArqIni.ReadString('OdontoDB', 'User_Name', '');
edBDSenha.Text := ArqIni.ReadString('OdontoDB', 'Password', '');
Finally
ArqIni.Free;
end;
end
else
begin
gravaOdontoDB;
end;
if FileExists(GetCurrentDir + '\OdontoServer.Ini') then
begin
ArqIni := TIniFile.Create(GetCurrentDir + '\OdontoServer.Ini');
Try
edOSIP.Text := ArqIni.ReadString('Server', 'IP', '');
Finally
ArqIni.Free;
end;
end
else
begin
gravaOdontoServer;
end;
end;
procedure TfrmConfigServer.gravaOdontoDB;
begin
ArqIni := TIniFile.Create(trim(GetCurrentDir) + '\' + 'OdontoDB.Ini');
Try
ArqIni.WriteString('OdontoDB', 'DriverName', 'Interbase');
ArqIni.WriteString('OdontoDB', 'Database', edBDArquivo.Text);
ArqIni.WriteString('OdontoDB', 'RoleName', 'RoleName');
ArqIni.WriteString('OdontoDB', 'User_Name', edBDUsuario.Text);
ArqIni.WriteString('OdontoDB', 'Password', edBDSenha.Text);
ArqIni.WriteString('OdontoDB', 'ServerCharSet', '');
ArqIni.WriteString('OdontoDB', 'SQLDialect', '3');
ArqIni.WriteString('OdontoDB', 'ErrorResourceFile', '');
ArqIni.WriteString('OdontoDB', 'LocaleCode', '');
ArqIni.WriteString('OdontoDB', 'BlobSize', '-1');
ArqIni.WriteString('OdontoDB', 'CommitRetain', 'False');
ArqIni.WriteString('OdontoDB', 'WaitOnLocks', 'True');
ArqIni.WriteString('OdontoDB', 'Interbase TransIsolation',
'ReadCommited');
ArqIni.WriteString('OdontoDB', 'Trim Char', 'False');
Finally
ArqIni.Free;
end;
end;
procedure TfrmConfigServer.gravaOdontoServer;
begin
ArqIni := TIniFile.Create(trim(GetCurrentDir) + '\' + 'OdontoServer.Ini');
Try
ArqIni.WriteString('Server', 'IP', edOSIP.Text);
Finally
ArqIni.Free;
end;
end;
[As partes desta mensagem que não continham texto foram removidas]
--
No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.175 / Virus Database: 270.9.2/1785 - Release Date: 11/13/
09:12
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Procedure utilizando o dbExpress
Boa tarde a todos Tenho uma procedure no banco de dados Mysql 5.1, que passa algumas variáveis, preciso ler a mesma no delphi estou utilizando o dbExpress + SQLStoredProc, fazendo as configurações verifiquei que a Propriedade StoreProcName não me traz a procedure, então escrevir o nome da mesma conforme esta no banco e ao conectar gera um erro: DBX Error: Operation Not Supported. Agradeço se alguém poder ajudar
Re: [delphi-br] Desenvolvedor II - 230
Como é fácil criticar. A pessoa vem fazer oferta de emprego e tem que aguentar certos sujeitos que sempre veem o lado negativo de tudo. Se vocês, tem o toque de midas e ganham fortunas, deixem para quem está precisando. Eu mesmo conheço uns quatro programalistas da minha cidade que adorariam esta oferta de emprego. Por favor, empregadores, continuem postando suas ofertas aqui. O problema não é a critica em si, mas da maneira que alguns colocam: se um dia eu tentar contratar um profssional com uma oferta dessa, atirem na minha cabeça Por Favor, tenha dó. Escreva assim: discordo do valor apresentado, o que acho inexeqüível. Fica bem melhor. []s -- From: Moacir - GMail [EMAIL PROTECTED] Sent: Wednesday, November 12, 2008 11:46 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desenvolvedor II - 230 Quem disse que programador come ?? Pelo menos nesta empresinha ai não... Gente o dia que eu tentar contratar um profissional e fizer uma oferta desta, por favor, atirem na minha cabeça !! VERGONHA NA CARA, PELO AMOR DE DEUS [ ]´s Moacir Fellipe Henrique escreveu: Acredito que seja R$4,00 por dia de trabalho... mas... que coisa é essa: Envie o CV com pretenção salarial Pelo amor de Deus, fala quanto a empresa quer pagar e pronto, quem quiser envia... senão fica igual Boi de Piranha... leilão de profissional.. Quem dá menos!?! Dou-lhe uma... rsrssrsrs []s 2008/11/12 Evandro Siqueira [EMAIL PROTECTED] Nem aqui em Sergipe se come tão pouco...hehehehe -- []'s. Evandro Siqueira Programador de Sistemas L'essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel Rodinei (MSN) escreveu: É pra não ter problema de obesidade... ;o) -- From: Alosi yahoo [EMAIL PROTECTED] Sent: Sunday, November 09, 2008 10:04 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desenvolvedor II - 230 entendi direito? 4 reias pra refeição? ht4boportunidades escreveu: Desenvolvedor II - 230 Experiência em: * Desenvolvimento de 2 a 4 anos * Linguagem Delphi * Banco de dados SQL Server Oracle (desejável) * Ferramentas: Excel (bom conhecimento) • Formação Acadêmica: Formado • Local: Centro • Tempo: indeterminado R$ 2.088,00 + VT + VR (R$ 4,00) + Plano de saúde Bradesco (após 3 meses) + plano odontológico + PL (duas vezes ao anos). A resposta as perguntas agiliza nossa comunicação com você! 1. Quanto tempo de experiência e nível de conhecimento em Desenvolvimento na linguagem Delphi? 2. Quanto tempo de experiência e nível de conhecimento em SQL Server? 3. Qual seu conhecimento em Excel? 4. Qual sua expectativa salarial? Por favor, enviar CV para [EMAIL PROTECTED] com pretensão salarial e disponibilidade para iniciar o projeto. Obrigado! Cristina -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- 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: [EMAIL PROTECTED] 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: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Qual a melhor forma para se fazer um fechamento de estoque
Boa tarde !! Estou construindo um sistema de estoque enão tenho experiência em programação e eu gostaria de saber qual a melhor forma para se fazer um fechamento de estoque onde mostre a quantidade anterior, a quantidade que entrou, que saiu e final. Eu não sei por onde começar se tenho que ter outra tabela,nosvos campos, criar views, select entre tabelas, se alguém puder ajudar, estou usando delphi 7, dbexpress, clientdatasets e o firebird 1.5 onde criei os autoinc, e triggers pra atualiação do estoque,data ultima saida, entrada etc, ai estáãoas estruturas das minhas tabelas se alguem puder dar uma dica agradeço muito!! Tabela Estoque_tb PK EST_CODIGO INTEGER NOT NULL, EST_PRODUTO VARCHAR(40), EST_UNIDADE VARCHAR(10), ID_TIPO INTEGER, NOME_ULT_FORNECEDOR VARCHAR(60), DATA_CADASTRO DATE, DATA_ULT_COMPRA DATE, DATA_ULT_SAIDA DATE, NOME_ULT_SOLICITANTE VARCHAR(60), VALORNUMERIC(15,2), VALOR_TOTAL_ESTOQUE NUMERIC(15,2), OBSERVACOES VARCHAR(100), EST_MINIMO INTEGER, EST_MAXIMO INTEGER, QUANTIDADE INTEGER TABELA SAIDA PK ID_SAIDAINTEGER NOT NULL, FK ID_SOLICITANTE INTEGER, DATA_SAIDA DATE, VALOR_TOTAL NUMERIC(15,2), OBSERVACOES VARCHAR(10) TABELA DETALHES_SAIDA PK,FK ID_SAIDA INTEGER NOT NULL, PK,FK EST_CODIGO INTEGER NOT NULL, QUANTIDADE INTEGER NOT NULL, VALORNUMERIC(15,2), VALOR_TOTAL NUMERIC(15,2) TABELA ENTRADA PK ID_ENTRADA INTEGER NOT NULL, FK ID_FORNECEDORINTEGER NOT NULL,DATA_ENTRADA DATE,VALOR_TOTAL NUMERIC(15,2), OBSERVACOES VARCHAR(40), DATA_NOTADATE TABELA DETALHES_ENTRADA = DETALHES_SAIDA _ Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos com até 6,000 fotos! http://www.amigosdomessenger.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Firebird não atualiza
Amigos, estou com Delphi 7 lendo arquivos textos e tentando atualizar
tabelas no Firebird 1.5, leio os textos e coloco num CDS que está
ligado a um Provider que por sua vez está ligado ao SqlDataSet e este
ao SQLConnection(DBExpress), algumas tabelas são atualizadas outras
não, a configuração do DSP estão todas iguais, não uso Transaction,
não sei se precisa, estou perdido, se alguem puder ajudar desde já
agradeço.
Stainle,
segue abaixo o codigo que utilizo:
if FileExists('c:\remoto\descon\txtdes.txt') then
begin
Dados.CDSDes.First;
While not (Dados.CDSDes.Eof) do
begin
Dados.CDSDes.Delete;
end;
Dados.CDSDes.ApplyUpdates(0);
AssignFile(aa, 'c:\remoto\descon\txtdes.txt');
reset(aa);
While not eof(aa) do
begin
readln(aa, linho);
if Dados.CDSDes.FindKey([copy(linho, 1, 8)]) then
begin
Dados.CDSDes.Edit;
Dados.CDSDesRFornece.Value := copy(linho,
9, 20);
Dados.CDSDes.Post;
Dados.CDSDes.ApplyUpdates(0);
end
else
begin
Dados.CDSDes.Insert;
Dados.CDSDesRNrolinha.Value := copy(linho,
1, 8);
Dados.CDSDesRFornece.Value := copy(linho,
9, 20);
Dados.CDSDes.Post;
Dados.CDSDes.ApplyUpdates(0);
end;
end;
[delphi-br] Procedure incorrect number of arguments
Utilizando o ADO (ADOStoredProc1) conseguir visualizar a procedure mais gera o erro: incorrect number of arguments for procedure expected 20 O número incorreto de argumentos para o procedimento esperou 20 Agradeço se alguém poder ajudar!!
Re: [delphi-br] Indy 9 e Servidor Proxy
2008/11/13 Ulisses [EMAIL PROTECTED]: Bom dia a todos! Estou utilizando um atualizador de executável, para fazer a atualização automática de um sistema que estamos desenvolvendo. Tudo estava funcionando perfeitamente, até instalar o sistema em um cliente que possui um Domínio e usa Servidor Proxy. Alguém sabe se é possível utizar o o componente IdFTP do pacote Indy em um Servidor Proxy? Deixe adivinhar. É linux? Se for, o problema não é no proxy mas na configuração do roteamento. Você precisa carregar dois módulos na inicialização do SO. Em meu Slack, as duas últimas linhas do /etc/rc.d/rc.inet2 estão assim: /sbin/modprobe ip_conntrack_ftp /sbin/modprobe ip_nat_ftp. Joao Morais
[delphi-br] Problema - Existe solução?
Bom dia a todos da lista. Sou novo no pedaço! Tenho um cliente que usa um sistema em que usa banco de dados FoxPro6, a empresa que forneceu o programa na época, prestou suporte, menutenção, treinamento, ou seja, supriu todas as necessidades referentes ao software. Oque acontece hoje? Um micro que era usado como uma extensão para esse software, foi substituído. O programa simplesmente parou de funcionar apresentando um erro, parece que ele pega alguma informação do HD, ou da IDE, não sei ao certo. A empresa que forneceu o programa já fechou há 5 anos, então eu não tenho a quem recorrer. Venho pedir uma ajuda a todos vcs, quem puder ajudar serei grato. Não entendo muito de programação em Delphi + acho que o programa em questão foi feito em delphi.
[delphi-br] Segurança em um WebBrowser.
O que significa isso na prática? Aproveitando... não estou conseguindo salvar os links do combo num arquivo. Alguém pode me orientar? Grato Gustavo - RJ
RES: [delphi-br] Desenvolvedor II - 230 - Mais calma...
Pessoal Calma a todos, olha só, não sei o quanto vocês ganham, ou por quanto trabalhariam, no entanto, acredito que existem sim cidades onde os valores são defasados, e acredito que se vocês não aceitariam um proposta destas muitas pessoas aceitariam e não é questão de prostituição salarial... Não conhecemos quem postou a mensagem, pode inclusive ter sido um erro de digitação, ou uma pessoa que não esteja habituada com o ramo, primeiro emprego, sei lá... agora me digam vocês, depois de todos estes comentários ainda sim acreditam que a pessoa postaria novamente outra oferta de emprego? Desta maneira outras empresa também podem estar vendo estes comentários, lembrem-se todos que esta é uma lista muito visitada e temos que ter consciência quando postamos alguma mensagem aqui... Então por favor, mais calma com os comentários Juliano -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jota Pyl Gmail Enviada em: quinta-feira, 13 de novembro de 2008 14:12 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Desenvolvedor II - 230 Como é fácil criticar. A pessoa vem fazer oferta de emprego e tem que aguentar certos sujeitos que sempre veem o lado negativo de tudo. Se vocês, tem o toque de midas e ganham fortunas, deixem para quem está precisando. Eu mesmo conheço uns quatro programalistas da minha cidade que adorariam esta oferta de emprego. Por favor, empregadores, continuem postando suas ofertas aqui. O problema não é a critica em si, mas da maneira que alguns colocam: se um dia eu tentar contratar um profssional com uma oferta dessa, atirem na minha cabeça Por Favor, tenha dó. Escreva assim: discordo do valor apresentado, o que acho inexeqüível. Fica bem melhor. []s -- From: Moacir - GMail [EMAIL PROTECTED] Sent: Wednesday, November 12, 2008 11:46 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desenvolvedor II - 230 Quem disse que programador come ?? Pelo menos nesta empresinha ai não... Gente o dia que eu tentar contratar um profissional e fizer uma oferta desta, por favor, atirem na minha cabeça !! VERGONHA NA CARA, PELO AMOR DE DEUS [ ]´s Moacir Fellipe Henrique escreveu: Acredito que seja R$4,00 por dia de trabalho... mas... que coisa é essa: Envie o CV com pretenção salarial Pelo amor de Deus, fala quanto a empresa quer pagar e pronto, quem quiser envia... senão fica igual Boi de Piranha... leilão de profissional.. Quem dá menos!?! Dou-lhe uma... rsrssrsrs []s 2008/11/12 Evandro Siqueira [EMAIL PROTECTED] Nem aqui em Sergipe se come tão pouco...hehehehe -- []'s. Evandro Siqueira Programador de Sistemas L'essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel Rodinei (MSN) escreveu: É pra não ter problema de obesidade... ;o) -- From: Alosi yahoo [EMAIL PROTECTED] Sent: Sunday, November 09, 2008 10:04 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desenvolvedor II - 230 entendi direito? 4 reias pra refeição? ht4boportunidades escreveu: Desenvolvedor II - 230 Experiência em: * Desenvolvimento de 2 a 4 anos * Linguagem Delphi * Banco de dados SQL Server Oracle (desejável) * Ferramentas: Excel (bom conhecimento) Formação Acadêmica: Formado Local: Centro Tempo: indeterminado R$ 2.088,00 + VT + VR (R$ 4,00) + Plano de saúde Bradesco (após 3 meses) + plano odontológico + PL (duas vezes ao anos). A resposta as perguntas agiliza nossa comunicação com você! 1. Quanto tempo de experiência e nível de conhecimento em Desenvolvimento na linguagem Delphi? 2. Quanto tempo de experiência e nível de conhecimento em SQL Server? 3. Qual seu conhecimento em Excel? 4. Qual sua expectativa salarial? Por favor, enviar CV para [EMAIL PROTECTED] com pretensão salarial e disponibilidade para iniciar o projeto. Obrigado! Cristina -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3610 (20081113) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br
[delphi-br] Post alterando valores
Tenho a sgte procedure procedure TF_Manut.DBEdit11KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key = 13 then begin //calculo da diferença entre o valor medido e o de referência gravdo no F_Setup DBEdit22.Text := FloatToStr(StrToFloat(F_setup.DBEdit2.Text)-StrToFloat(F_manut.DBEDit11.text )); DBEdit7.SetFocus; end; end; tenho várias dessas num formulário ... eu digito o valor do campo no DBEdit11 e qdo teclo enter quero q calcule a diferença entre o valor digitado e outro que armazenei como referência Tudo funciona ... até a hra q vou salvar .. qdo teclo post todos os valores anteriores se alteram ... para o nro do ultimo campo da operação ... não consigo descobrir porque isso acontece .. alguem pode me dar uma dica .. obrigado Cícero Fernandes Eng. Eletricista Eng. de Segurança do Trabalho CREA-SC 27.958-0 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO AMBIENTE! _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de crist_ita Enviada em: quinta-feira, 13 de novembro de 2008 16:28 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Procedure incorrect number of arguments Utilizando o ADO (ADOStoredProc1) conseguir visualizar a procedure mais gera o erro: incorrect number of arguments for procedure expected 20 O número incorreto de argumentos para o procedimento esperou 20 Agradeço se alguém poder ajudar!! [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Desenvolvedor II - 230 - Mais calma...
Só prá acabar com esse papo, vou dizer a realidade. Aqui na Paraíba, precisamente na cidade de Campina Grande, o tickt refeição para área gerencial é em torno de R$ 3,10. O almoço num restaurante a nível médio custa cerca de R$ 2,00, pode-se encontrar até a R$ 1,80. Então, prá que ficar discutindo sobre isso? Cada região tem seu preço e isso não significa que é barato, é o preço do custo de vida da região. E mais, se você não quer, não tem problema, a crise de desemprego é tão grande que com certeza a vaga fica para outra pessoa. Que saco! Chorando de barriga cheia, quero ver se alguém tivesse com menino em casa sem ter o que comer se tava discutinda o preço do tickt. Se toca! Quem disse que programador come ?? Pelo menos nesta empresinha ai não... Gente o dia que eu tentar contratar um profissional e fizer uma oferta desta, por favor, atirem na minha cabeça !! VERGONHA NA CARA, PELO AMOR DE DEUS [ ]´s Moacir Fellipe Henrique escreveu: Acredito que seja R$4,00 por dia de trabalho... mas... que coisa é essa: Envie o CV com pretenção salarial Pelo amor de Deus, fala quanto a empresa quer pagar e pronto, quem quiser envia... senão fica igual Boi de Piranha... leilão de profissional.. Quem dá menos!?! Dou-lhe uma... rsrssrsrs []s 2008/11/12 Evandro Siqueira [EMAIL PROTECTED] mailto:vansiqq%40gmail.com Nem aqui em Sergipe se come tão pouco...hehehehe -- []'s. Evandro Siqueira Programador de Sistemas L'essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel Rodinei (MSN) escreveu: É pra não ter problema de obesidade... ;o) .
Re: [delphi-br] Problema - Existe solução?
Posso lhe assegurar que o FoxPro não faz extensão pelo programa... o que certamente me leva a crer que a empresa possa ter colocado uma informação que identifica o programa... tenho sistemas desenvolvido em FoxPro e não uso este produto ha muito tempo. Se precisar posso dar uma olhada no sistema para avaliar. Abraços Gerson --- Em qui, 13/11/08, [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu: De: [EMAIL PROTECTED] [EMAIL PROTECTED] Assunto: [delphi-br] Problema - Existe solução? Para: delphi-br@yahoogrupos.com.br Data: Quinta-feira, 13 de Novembro de 2008, 9:59 Bom dia a todos da lista. Sou novo no pedaço! Tenho um cliente que usa um sistema em que usa banco de dados FoxPro6, a empresa que forneceu o programa na época, prestou suporte, menutenção, treinamento, ou seja, supriu todas as necessidades referentes ao software. Oque acontece hoje? Um micro que era usado como uma extensão para esse software, foi substituído. O programa simplesmente parou de funcionar apresentando um erro, parece que ele pega alguma informação do HD, ou da IDE, não sei ao certo. A empresa que forneceu o programa já fechou há 5 anos, então eu não tenho a quem recorrer. Venho pedir uma ajuda a todos vcs, quem puder ajudar serei grato. Não entendo muito de programação em Delphi + acho que o programa em questão foi feito em delphi. Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Herança visual no Delphi
Olá pessoal, Muitos já devem ter conhecimento sobre herança visual no Delphi, no link (http://www.4shared.com/dir/5679510/48848609/Uploads.html) pode ser encontrado o arquivo (Use menos códigos) Herança_visual.zip (http://www.4shared.com/file/71380828/795202bf/_Use_menos_cdigos__Herana_visual.html?dirPwdVerified=4f84753f), com exemplos e artigos sobre o assunto. Sobre herança visual: ... o que economiza código é orientação a objetos, e esta é apenas uma forma de aplicá-la João Morais []'s, Silvio Clécio Contatos/Blog Skype: silvioprog E-mail, Yahoo! Messenger: [EMAIL PROTECTED] Gmail, Google Talk: [EMAIL PROTECTED] Hotmail, MSN: [EMAIL PROTECTED] BlogSpot: http://silvioclecio.blogspot.com/ Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
