Bom dia ,
Alguem conhece ou sabe se tem alguma vaga para estagiar como programador
delphi, eu sou recem formado e preciso adquirir experiencia.
Quem souber , eu agradeço.
att
Xavier
__
Fale com seus amigos de graça com o
Tem a função Ceil da Unit Math.
On 1/11/07, Paulo Sérgio Dias (GMail) [EMAIL PROTECTED] wrote:
Pessoal:
Existe alguma funcao pronta do Delphi (7 ou superior) que
arredonde um valor decimal (real, extended, etc.) sempre para o
valor inteiro mais proximo ?
Por exemplo:
12,01 para 13
Bom dia,
Peço licensa à lista, pois este assunto é mais relacionado ao windows que ao
Delphi propriamente.
Alguém já se deparou com o seguinte problema:
Tenho uma rede com 7 máquinas, 3 com windows 98 e 4 com windows XP.
Criei uma aplicação com Delphi 7, que fica em uma das máquinas e as outras
Antes da linha Application.Initialize; de Prog2.dpr (programa a ser chamado),
coloque o código abaixo:
if ParamStr(1) 'MinhaSenha' then begin
{ Para usar ShowMessage, coloque Dialogs no uses }
ShowMessage('Execute este programa através de Prog1.EXE');
Halt; { Finaliza }
end;
-
Não sei se posso te ajudar com isso...
Normalmente os erros de I/O é porque o arquivo esta em uso ou é só de leitura.
[]'s
Zucchi
- Original Message -
From: Luizcm_jr
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 11, 2007 8:18 AM
Subject: Re: [delphi-br] Escrever
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo no
Delphi, alguma função que realize esse procedimento?
Desde já agradeço a colaboração de todos.
Obrigado.
Multiplique o numero por -1
Fri, 12 Jan 2007 08:42:43 -0200, Marcelo [EMAIL PROTECTED] escreveu:
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo no
Delphi, alguma função que realize esse procedimento?
Desde já agradeço a colaboração de
Abs( Valor );
- Original Message -
From: Marcelo
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 7:42 AM
Subject: [delphi-br] Converter negativo em positivo
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo
use a matemática:
x := x * (-1)
rsrsr
- Original Message -
From: Marcelo
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 8:42 AM
Subject: [delphi-br] Converter negativo em positivo
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum
if Variavel 0 then
Variavel := (Variavel * -1);
Eduardo
Marcelo escreveu:
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo no
Delphi, alguma função que realize esse procedimento?
Desde já agradeço a colaboração de todos.
Obrigado.
e se o nro. for positivo como fica ???; o certo é usar o ABS()
Stainle
Desenvolvimento (Anderson) [EMAIL PROTECTED] escreveu:
use a matemática:
x := x * (-1)
rsrsr
- Original Message -
From: Marcelo
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 8:42
Abs(x)
- Original Message -
From: Eduardo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 9:04 AM
Subject: Re: [delphi-br] Converter negativo em positivo
if Variavel 0 then
Variavel := (Variavel * -1);
Eduardo
Marcelo escreveu:
Amigos da
Edit1.Text := IntToStr(abs(-2));
Stainle
Marcelo [EMAIL PROTECTED] escreveu:
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo no
Delphi, alguma função que realize esse procedimento?
Desde já agradeço a colaboração de todos.
Variavel := abs(Variavel);
Stainle
Eduardo [EMAIL PROTECTED] escreveu:
if Variavel 0 then
Variavel := (Variavel * -1);
Eduardo
Marcelo escreveu:
Amigos da lista. Bom dia.
Existe alguma forma de se converter algum número negativo em positivo no
Delphi, alguma função que
nessa maquina com XP tem alguma diferenca de confguracao, tipo programas
instalados
service packed, todas tem a mesma versao de XP atualizadas???
Em 12/01/07, Sandro [EMAIL PROTECTED] escreveu:
Bom dia,
Peço licensa à lista, pois este assunto é mais relacionado ao windows que
ao Delphi
Bom dia PessoALL,
Resolvi cirar este tópico... pq tentei todas as soluções nos tópicos existentes
e não funcionaram.
Meu problema é o seguinte:
Quando eu insiro uma palavra com acentuação na aplicação ( delphi ) com
acentos... no DB ( mysql ) fica tudo trocado, e qdo insiro diretamente no
Do dicionário Michaelis, chamo a atenção para a 3ª definição:
es.tu.pi.dez
(ê), s. f. 1. Qualidade de estúpido. 2. Falta de inteligência, de
juízo, de discernimento. 3. Brutalidade, grosseria, indelicadeza.
Não existe patch para a estupidez humana
Parece-me que você é uma prova viva dessa
use o Collate latin1_swedish_ci que vai resolver, aqui eu uso e rodo normal.
no componente ZQuery veja em Option a opção doOEMtranslate... pode ser
isso.
qual a versão do Zeos?
Em 12/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED]
escreveu:
Bom dia PessoALL,
Resolvi cirar este
Bom dia PessoALL,
Meu problema é o seguinte:
Quando
eu insiro uma palavra com acentuação na aplicação ( delphi ) com
acentos... no DB ( mysql ) fica tudo trocado, e qdo insiro diretamente
no banco, na aplicação fica toda trocada.
Ja tentei: utf8, latin1 no default character
No collate, já
Amigos,
Alguem tem alguma funcao ai que mostra o progresso de uma query num gauger ou
numa barra de progresso mesmo.
Obrigado
Rodrigo
__
Fale com seus amigos de graça com o novo Yahoo! Messenger
http://br.messenger.yahoo.com/
[As partes
Todas estão atualizadas, a única diferença é que a máquina problemática é um
notebook HP
- Original Message -
From: Gabriel Filho
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 8:31 AM
Subject: Re: [delphi-br] Meio off: executável x XP
nessa maquina com
Eduardo VC É O CARA!
Essa dica: Option a opção doOEMtranslate
Resolveu o meu problema. Vlw mesmo.
A versão do Zeos é 6.5.1
Mais uma vez... vlw pela força.
Att.
Wilian Domingues
Analista de Sistemas
- Mensagem original
De: Eduardo Silva dos Santos [EMAIL PROTECTED]
Para:
Tive um problema assim, mas com um programa chamado putty.
O executável putty.exe acabava de ser instalado e dava a mensagem de que
estava corrompido e precisava ser reinstalado. Resolvi colocando o arquivo
abaixo com o nome putty.exe.manifest na mesma pasta do executável.
?xml version=1.0
E ai galera,
Alguém já implementou algo para controle de filas de atendimento?
Sandro
[As partes desta mensagem que não continham texto foram removidas]
Se vc quiser sempre o valor positivo, sim, pois essa funcao retorna o
valor absoluto do numero
Em 12/01/07, Nivaldo Stainle [EMAIL PROTECTED] escreveu:
e se o nro. for positivo como fica ???; o certo é usar o ABS()
Stainle
Desenvolvimento (Anderson) [EMAIL
Edu,
Obrigado mesmo... deu certo..
só mais uma pergunta..
Ah.. possibilidade do Prog1 no meu caso..ser executado.. mas em modo SILENT?
valeu.
Junior - Araraquara/SP
- Original Message -
From: Eduardo Frighetto
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, January 11,
Que bom que deu certo Wilian, bom trabalho aee.
Em 12/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED]
escreveu:
Eduardo VC É O CARA!
Essa dica: Option a opção doOEMtranslate
Resolveu o meu problema. Vlw mesmo.
A versão do Zeos é 6.5.1
Mais uma vez... vlw pela força.
Att.
Walter,
eu respeito as pessoa , mais quando vem e-mail que a pessoa assina como
w29m
eu perco a paciencia, creio que isso seja uma falta de respeito com a
comunidade se
esconder atraz de palavras que não significam absolutamente nada.
o que você acha sobre isso ?
- - - -
att' Paulo
Bom dia a todos, alguem tem algum exemplo de como se sua o TabControl ?
Obrigado
[As partes desta mensagem que não continham texto foram removidas]
w29m ([EMAIL PROTECTED]),
Venho perante o grupo pedir desculpas pela minha falta de paciência com a
sua pergunta. Espero que você não guarde ressentimentos.
Mais também peço a você e aos outros participantes da lista que tenham
também mais respeito começando por ASSINAR o nome nos
Bom Paulo,
Vc não perguntou isso para mim, mas mesmo assim eu gostaria de responder a vc.
Na netiqueta das listas de discussões, um dos conselhos mais frequentes é nem
sempre se identificar nas mensagens, pois muitos utilizam nicknames, como o
caso da nossa colega Maníaca e outros tantos que já
Olá, Marcos,
Então.. isso funcionará, provavelmente, se eu colocar a nova unit Consts em
todos os meus packets! Isso porque, caso ela não esteja explicitamente incluída
no meu pacote, ela pegará de algum dos DCPs incluídos na seção required do
packet! Certo!?
A questão é.. eu queria refazer
Boa tarde,
pessoal comprei o programa Delphi Studio 8.0 so que estou tentando
instalar naum estou conseguindo, lembrando que comprei piratão mesmo
pq é para o meu uso em casa.
e o serial que veio informando não estou conseguindo. se alguem puder
me falar um serial e o codigo Key tb ficarei
Henrique,
Não tenho absoluta certeza, mas acho que o compilador não vai pegar a unit
Const.pas através de algum outro pacote na seção required, como vc falou.
Para não ter que adicionar a unit em todos os projetos, tente colocar a unit
modificada num lugar comum a todos os projetos e depois
Pessoal agradeco a colaboração de todos.
Fiz a conversão utilizando o método abs e deu certo.
Obrigado.
Nivaldo Stainle escreveu:
Variavel := abs(Variavel);
Stainle
Eduardo [EMAIL PROTECTED]
mailto:ecastroa_edu%40yahoo.com.br escreveu:
if Variavel 0 then
Variavel := (Variavel * -1);
Query.Open;
Gauge1.MaxValue := Query.RecordCount;
Gauge1.Progress := 0;
while not Query.EOF do
begin
Gauge1.Progress := Gauge1.Progress + 1;
// os códigos aqui dentro.
Query.Next;
end;
//
do NOD32 IMON 1973 (20070112) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
[As partes desta mensagem que não continham texto foram removidas]
Paulo,
Os comentários feitos por mim e pelo Diogo, foram apenas isso,
comentários a respeito da sua atitude.
No meu caso fiz um comentário da frase que você coloca na sua
assinatura. E convenhamos, você há de concordar, na verdade já o fez
nesse e-mail que estou respondendo, que agiu de forma
Paulo,
faço minhas as palavras do Andrei. Você deve concordar que você foi mal
educado o que não significa que você é mau educado. Se foi assim que você me
entendeu peço desculpas também esperando que possamos dar este assunto por
encerrado.
On 1/12/07, Andrei Luís [EMAIL PROTECTED] wrote:
Obrigado Andrei, você fui muito útil.
Quando precisar saber o significado de alguma palavra sei quem chamar.
- - - -
att' Paulo Batalhão - [EMAIL PROTECTED]
arphanet.com http://www.arphanet.com/
batalhao.eti.br http://www.batalhao.eti.br/
saudeamericana.com.br http://www.saudeamericana.com.br/
André, onde você encontrou essa solução?
- Original Message -
From: André - Gmail
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 9:24 AM
Subject: Re: [delphi-br] Meio off: executável x XP
Tive um problema assim, mas com um programa chamado putty.
O
]
__ Informação do NOD32 IMON 1973 (20070112) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
Olá Pessoal, boa tarde a todos, ingressei no grupo a semana passada e
estou achando muito interessante as dúvidas enviada, muito legal
mesmo.
Bom na minha primeira mensagem já vou mandar uma cabeluda. Tenho
alguns softwares instalados em diversos clientes e quando atualizo as
versões tenho com
Desculpas aceitas, sem ressentimentos.
Mas a proposito, a sua mensagem de desculpas
nao esta assinada.
Brincadeira a parte, as vezes realmente cometemos
deslizes e vez por outra somos obrigados a pedir
desculpas ou dar desculpas, faz parte.
William.
---
Ja fiz essa pergunta antes e não obtive resposta.
Gostaria de saber como fazer para imprimir diretamente na porta como
as LPTs, mas como porta USB. Tenho um sistema q imprime diretametne na
LPT1, porem o cliente comprou uma impressora q tem apenas porta UBS.
Gostaria de estar adaptando meu sistema
Mano use o DOS2USB ou o DOSPRINT
Att.
Inácio Mecena
(65) 3376-1133
(65) 9976-9341
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]
- Original Message -
From: paganato
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 1:32 PM
Subject: [delphi-br]
http://www.chiark.greenend.org.uk/~sgtatham/putty/wishlist/xp-wont-run.html
http://msdn2.microsoft.com/en-us/library/aa374191.aspx
- Original Message -
From: Sandro [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 12, 2007 3:19 PM
Subject: Re: [delphi-br] Meio
Gostaria de saber como fazer para imprimir diretamente na porta como
as LPTs, mas como porta USB.
Há tempos, fiz um programinha chamado IMPTXT que recebe o nome de um arquivo
como parâmetro e imprime em impressoras USB. Funciona também para impressoras
que estão conectadas à rede via um
Leonardo:
Queria saber se alguem sabe a diferença entre o SQLDataSet e o SQLQuery que se
encontram na paleta dbExpress. Pois eu sei que ambos fazem acesso ao banco e
que ambos sao descendentes do TDataset. Sendo que o SQLDataSet dependendo da
especificacao do CommandType ( query, table ou
graça com o novo Yahoo! Messenger
http://br.messenger.yahoo.com/
[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 NOD32 IMON 1973 (20070112) __
Esta mensagem foi
vixi, virou festa !!! pirataria é crime (e não importa onde você vai utilizar)!
baixa o turbo http://www.turboexplorer.com/ é DI GRÁTIS meu querido.
é FUnfá que é uma beleza.
- - - -
att' Paulo Batalhão - [EMAIL PROTECTED]
arphanet.com http://www.arphanet.com/
batalhao.eti.br
Preciso imprimir um livro de producao e estoque que contem 1102 paginas, ele
esta dividido por Grupo (Group), porem em algumas paginas, ele usa somente meia
pagina e salta para a proxima e preenche ela pagina totalmente,sendo isto
intermitente, me socorram por favor.
sds
Auriston
me interessei pelo teu componente poderia me mandar por favor?
Att.
Inácio Mecena
(65) 3376-1133
(65) 9976-9341
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]
- Original Message -
From: Paulo Sérgio Dias (GMail)
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January
Bom tarde.
Desenvolvo em Delphi 7 / Firebird 1.5
Em um determinado cliente, o software funciona em 3 micros ( 1 servidor
e 2 estações, obvio, rss).
De um tempo para cá, todo dia de manhã o sistema não entra de jeito
nenhum. O cliente me disse
q por volta das 10:00 o sistema começa a funcionar
do NOD32 IMON 1973 (20070112) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
[As partes desta mensagem que não continham texto foram removidas]
__ Informação do NOD32 IMON 1973 (20070112) __
Esta mensagem foi
Rodrigo, verifique duas coisas, se quando o sistema não conecta você consegue
disparar ping para o
servidor e para as outras máquinas na rede , estou disconfiado que pode ser o
Hub/Switch que está
negando fogo.
observe tambem se não está havendo conflito de IP.
se resolver
* mande as
Amigos,
Como faço para criar um ClientDataSet (em tempo de execução) herdado de
um que eu já tenha criado(em modo desin) ; tentei fazer mas está
ocorrendo alguns erros...
Os DataSetProvider de uma aplicação n-tier estão perdendo a conexão da
propriedade DataSet sendo necessário que eu ligue novamente a
propriedade sempre que executo a aplicação. Não sei se isso ocorre
pelo grande número de DataSetProvider da aplicação.
Alguém já resolveu um problema como esse?
Verifique se na configuração do Grupo está para mudar de página. se estiver
basta desmarcar.
Verifique tbm, seu select... tipo, ordene ele pelo grupo seu... vamos supor:
seu grupo é por CodBAR
select * from produto
where...
order by codbar
isso facilita a vida do ReportBuilder.. :o)
[]s
Em
Diogo, se liga! piadinha de mrd@ a sua hein.
- - - -
att' Paulo Batalhão - [EMAIL PROTECTED]
arphanet.com http://www.arphanet.com/
batalhao.eti.br http://www.batalhao.eti.br/
saudeamericana.com.br http://www.saudeamericana.com.br/
fusame.com.br http://www.fusame.com.br/
Não existe patch para a
Boa Tarde pessoal,
estou com um problema muito intrigante, tenho um sql que pelo IBExpert ele me
retorna um resultado e pelo Delphi retorna outro.
Vou detalhar:
SELECT
TABELA.COD,
TABELA.ID,
TABELA.ID_GR,
TABELA.CODRED,
TABELA.DESC,
TABELA.TP_CON,
TABELA.DIG,
Boa Tarde pessoal,
estou com um problema muito intrigante, tenho um sql que pelo IBExpert ele me
retorna um resultado e pelo Delphi retorna outro.
Vou detalhar:
SELECT
TABELA.COD,
TABELA.ID,
TABELA.ID_GR,
TABELA.CODRED,
TABELA.DESC,
TABELA.TP_CON,
TABELA.DIG,
Qual sistema operacional, se for XP ou W98se pode compartilhar a impressora
usb e no prompt de comando digitar o seguinte:
NET USE LPT1: \\MICRO\IMPRESSORA /PERSISTENT:YES
digitar tanto no micro local quanto nos micros da rede.
Feito isso sua impressora usb pode reeber relatorios que forem
Eu também já pesquisei, na epoca eu usar o clipper.
Não tem jeito de ir direto como a lp1, tem que usar gerenciador do windows.
Tem algumas soluções mas sempre usam o gerenciador do windows, o comando
AssignFile('LPT1:')
Luiz Carlos
- Original Message -
From: paganato
To:
Pessoal, tenho a seguinte estrutura:
TB DSP CDS
Coloquei filtros no CDS, porém está muito lento!
Pergunta, se eu colocar os mesmos filtros na table, o que chega no CDS já
está filtrado ok?
Porque fica muito mais rápido, estou certo?
Obrigado!
[As partes desta mensagem que não continham
isso pode ajudar
http://forum.devmedia.com.br/viewtopic.php?t=83487sid=22ad92da3f3430c70143cf346890bb4f
e
executo a aplicação. Não sei se isso ocorre
pelo grande número de DataSetProvider da aplicação.
Alguém já resolveu um problema como esse?
__ Informação do NOD32 IMON 1973 (20070112) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
Olá Ricardo, essa semana eu fiz algo nesse sentido.
fiz assim no site eu guardo um arquivo txt chamado financeiro_version.txt
dentro dele eu tenho a versão atual do sistema ex: 1.22.56
quando o cliente entra no sistema, tenho uma rotina que baixa esse arquivo,
abre e compara a linha da versão
trabalhe com SQLDataSet principalmente por Bi-Direcional.
mais recomendo que você utilize o ZeosLib (que é mais crocante e salgadinho)
http://sourceforge.net/projects/zeoslib/
espero ter ajudado.
- - - -
att' Paulo Batalhão - [EMAIL PROTECTED]
arphanet.com http://www.arphanet.com/
Eu uso a data do executável como base para atualização através da
seguinte função:
try
Data_Local := DateTimeToStr(FileDateToDateTime(FileAge(Prog_Local)));
except
Data_Local := DateTimeToStr( 0);
end;
try
Data_Remoto :=
Bom tarde.
Desenvolvo em Delphi 7 / Firebird 1.5
Gostaria de uma sugestão para controle de versões do projeto.
Tenho um sistema na qual varios programadores estão desenvolvendo modulos.
Como gerenciar para que qdo todos de juntem fiquem todos atualizados?
Qual a melhor forma de se trabalhar com
Eu utilizo e recomendo o CVS com o Tortoise como Cliente
[As partes desta mensagem que não continham texto foram removidas]
(desculpem se ja´ receberam esta mensagem - nos ultimos dias, minhas mensagens
nao t^em
aparecido na lista logo na 1a vez que as envio).
Gostaria de saber como fazer para imprimir diretamente na porta como
as LPTs, mas como porta USB.
Há tempos, fiz um programinha chamado IMPTXT que recebe o
Leonardo:
Queria saber se alguem sabe a diferença entre o SQLDataSet e o SQLQuery que se
encontram na paleta dbExpress. Pois eu sei que ambos fazem acesso ao banco e
que ambos sao descendentes do TDataset. Sendo que o SQLDataSet dependendo da
especificacao do CommandType ( query, table ou
Alguem já testou se programas Delphi (3,4,5,6,7 ou superior) funcionam
bem no Windows Vista ?
Encontraram algum tipo de incompatibilidade ?
Grato pela atencao de todos
Paulo
Alguem ja´ testou programas feitos em Delphi no Windows Vista ?
Tenho programas feitos em Delphi 3, 5, 7 2006.
Ha´ alguma incompatibilidade ?
Paulo
[As partes desta mensagem que não continham texto foram removidas]
Boa Noite Pessoal,
Nossa, quanto tempo...rs... a correria tem me tirado daqui...rs..
Vcs teriam algum material ou link relacionado sobre Refatoração de sistemas?
Estou precisando elaborar um projeto a ser apresentado na empresa sobre o
assunto, para levantar o estímulo do pessoal ao assunto para
Pessoal,
Tenho um dbgrid com o campo CPF/CNPJ, os dados que estao no grid as
vezes sao de pessoas fisicas (CPF) e as vezes de Pessoas Juridicas (CNPJ), o
que eu estou tentando fazer eh que no momento que eu va descendo ou subindo a
seta de navegacao ele va mudando a mascara de
Para os iniciantes em Delphi com Firebird eu aconselho esta apostila e-book
do link abaixo:
http://www.mpsoftwares.com/modules.php?name=Downloads
http://www.mpsoftwares.com/modules.php?name=Downloadsd_op=viewdownloadcid
=19 d_op=viewdownloadcid=19
e também para banco de dados MySQL e Zeos
Para os iniciantes em Delphi com Firebird eu aconselho esta apostila e-book
do link abaixo:
http://www.mpsoftwares.com/modules.php?name=Downloads
http://www.mpsoftwares.com/modules.php?name=Downloadsd_op=viewdownloadcid
=19 d_op=viewdownloadcid=19
e também para banco de dados MySQL e Zeos
80 matches
Mail list logo