Frota C. Júnior wrote:
Desenvoldo em Delphi 7 / Firebird 1.5 / DBExpress / ClientDataSet (n-tier) e
estou muito angustiado pois sem razão aparente quando o usuário opera em uma
janela com grids (wwDBGrid) simplesmente aparece o seguinte erro list index
out of bound e em seguida o grid fica
Bom dia a todos...
Obrigado pela ajuda, mas preciso que o retorno seja:
0123,45
e não
343.434.123.204,54
Obrigado!
bem eu fiz aqui :
procedure TForm1.Button1Click(Sender: TObject);
var cur : currency;
begin
cur:= 343434123204.54;
Paulo Casagrande wrote:
Obrigado pela ajuda, mas preciso que o retorno seja:
0123,45
e não
343.434.123.204,54
Utilize a sua própria rotina sem o StringReplace.
--
Joao Morais
Obrigado!
bem eu fiz aqui :
procedure TForm1.Button1Click(Sender: TObject);
var cur :
Apoio wrote:
bem eu fiz aqui :
procedure TForm1.Button1Click(Sender: TObject);
var cur : currency;
begin
cur:= 343434123204.54;
edit1.Text:=FormatFloat('###,##0.00',cur);
Você não precisa desse monte de jogo da velha. Use apenas ,0.00
--
Joao Morais
end;
end.
o resultado é
0123,45
e não
343.434.123.204,54
Utilize a sua própria rotina sem o StringReplace.
Acho que não dá... se não estou enganado o resultado depende do
DecimalSeparator,
assim sendo não tenho nenhuma garantia que DecimalSeparator é igual = ','
sem o StringReplace o resultado
Por quê você não altera o DecimalSeparator para o que você quer usar?
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Paulo
Casagrande
Enviada em: quarta-feira, 16 de janeiro de 2008 09:42
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Currency para string
Até daria, mas o efeito não seria o mesmo.
--
Atenciosamente:
Evaldo Avelar Marques
Programador Junior: Delphi, firebird/interbase, C# Dot Net, C++
Debian GNU/Linux.
[EMAIL PROTECTED] Belo Horizonte/MG Brazil
Ao invés de colocar um statusbar não daria pra
Ola Evaldo...
Procure na net pela propriedade psOwnerDraw do panel do statusbar...
Encontrei exemplos de se colocar uma progressbar no statusbar a algum tempo,
e pelo que entendi setando esta propriedade pode-se colocar qualquer tipo de
objeto...
Avise de der certo!!
Marcelo Horlle
-
Ola Delphianos,
Peço ajuda no sentido de que estou tendo um erro de Access Violation, ao
abrir o form. O form não tem nenhum outro
form que o chame.
Ele é um form MDIChild, criado assim:
If FrmEntrega2Via = Nil Then
begin
Application.CreateForm(TFrmEntrega2Via, FrmEntrega2Via);
galera eu insisto no formatfloat :
edit1.Text:=formatfloat('.00',123.23);
123,23 = 0123,23
ve se é isso?!
nao importa como seja o formato ele sempre vai te ajudar , é so vc ser criativo
e usar a cabeça
- Original Message -
From: Paulo Casagrande
olá Marcelo ,
A ProgressBar na StatusBar, eu já usei uma vez, e é bem interessante. Mas,
senão me engano, a barra era pintada para a um painel da StatusBar.
Vou pesquisar mais sobre essa propriedade psOwnerDraw.
Na verdade o que eu precisava era manter um botão visível, para que a qualquer
Ola Omar..
Veja no menu Project \ Options se este form nao esta relacionado na coluna
auto-create...
Se nao me engano isso provoca o erro pq vc estaria recriando o mesmo form com o
Application.CreateForm.
Marcelo Horlle
- Original Message -
From: Omar Marques
To:
A um tempo atrás quando eu iniciei no Delphi, eu não entendia muito de evento
de pintura e eu precisei colocar um botão no statusbar.
Cara, eu peguei um SpeedButton e alinhei ele exatamente dentro do statusbar e
funcionou como uma luva! Parecia que fazia parte do statusbar.
É só uma
Opa. Ja verifiquei. Não está na lista Auto-Create;
[]´s
Omar M. Haddad
Analista de Sistemas
- Mensagem original
De: Marcelo - Kappesberg [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 16 de Janeiro de 2008 8:15:31
Assunto: Re: [delphi-br] Ref.Acess
Bom Dia,
Estou usando essa função:
dm.qProdutos.Locate('CODIGO',eCodigo.Text,[loPartialKey,loCaseInsensitive])
para localizar o codigo do produto, ele funciona corretamente, mas se
eu usar um código que tenha '0' antes do resto, ele não consegue achar.
Por exemplo, tem 2 códigos diferentes ('123'
Amigo, ESTOQUE dentro do select está apenas como alias do campo
TPRODUTO.QUANTIDADE mais só por curiosidade eu já tirei o alias fazendo
referencia apenas no campo QUANTIDADE e mesmo assim me retorna 0, ficando da
seguinte forma:
strSql := 'SELECT TPRODUTO.ID, TPRODUTO.DESCRICAO,
Pessoal,
to usando o IdSMTP para enviar e-mails para fornecedores, porem to com
um problema meio estranho aki, eh o seguinte uso um bloco try except,
tipo assim:
try
IdSMTP1.Connect; //Estabelece a conexão
IdSMTP1.Authenticate; //Faz a autenticação
IdSMTP1.Send(IdMessage1);
Evaldo,
Você disse que se colocasse um panel o efeito não seria o mesmo. Que efeito
seria esse?
[As partes desta mensagem que não continham texto foram removidas]
Efeito Estético.
--
Atenciosamente:
Evaldo Avelar Marques
Programador Junior: Delphi, firebird/interbase, C# Dot Net, C++
Debian GNU/Linux.
[EMAIL PROTECTED] Belo Horizonte/MG Brazil
- Mensagem original
De: Alisson Costa Resende [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Pessoal estou enfrentando um problema e gostaria de saber se alguem ja
passou por algo semelhante.
Tenho o Delphi 7 e tento conectar num banco MySql 5. Usei o componente
SQLConnection. E conectou beleza. Mas quando vou usar um SQLDataSet ou
SQLQuery esta dando Access Violation dbexpmysql.dll.
Ola amigos,
Estou trabalhando com fluxo de caixa em delphi, sou iniciante e estou tendo
alguns problemas.
Se alguém tiver algun exemplo e puderem me enviar, ficaria grato pela ajuda.
Rafael
- Mensagem original
De: Wilton Campos [EMAIL PROTECTED]
Para: delphi-br
Bom dia
Sempre programei sozinho, devido sistemas pequenos, estou iniciando um
projeto um pouco mais complexo onde trabalharei com um outro programador,
gostaria de saber como q funciona a programacao em grupo ou seja, com o é
dividido o processo de programação.
Por exemplo no caso do
use zeos;
http://sourceforge.net/project/showfiles.php?group_id=35994package_id=28219
- Original Message -
From: dhsb
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 11:13 AM
Subject: [delphi-br] MySQL - Problemas
Pessoal estou enfrentando um
Creio que faltou a indicar o AuthenticationType.
Eu usu como no exemplo abaixo:
if FieldByName('ServAutentica').AsString = '1' then
Smtp.AuthenticationType := atLogin
else
Smtp.AuthenticationType := atNone;
Espero que ajude em algo.
Boa sorte,
Jefferson
-
nos aqui na empresa usamos jedi vcs: (free)
http://jedivcs.sourceforge.net/
ele lhe ajudara a controlar versoes , o codigo fonte fica num servidor , etc
etc
qualquer duvida na instalação e na utilização posta ae q tenho certeza q muitos
aqui usam ele...
- Original Message -
Lembrando que o Zeos 6.6 ainda é beta e tem uns bug's..
mas tb é uma excelente opção.
Em 16/01/08, Apoio [EMAIL PROTECTED] escreveu:
use zeos;
http://sourceforge.net/project/showfiles.php?group_id=35994package_id=28219
- Original Message -
From: dhsb
To:
Você não entendeu, eu estou procurando por string, porém a string que
eu procuro é '0123', e eu coloco '0123', e ele não acha.
Quando eu procuro a string '123' e coloco '123' ele acha.
Entendeu?
--- Em delphi-br@yahoogrupos.com.br, Vitor Redes
[EMAIL PROTECTED] escreveu
Porque você
Olá dhsb, existem algumas formas,
1 - usar uma versão do mysql no qual o dbexpress do D7 seja compatível.
2 - usar o dbexpress do Delphi 2007, que na verdade nem sei se é totalmente
compatível com o MySQL 5
3 - usar um pacotes de componentes pagos chamado MyDAC que te dá
compatibilidade com
um estranho ...
qual tipo do campo de codigo?
veja se é char ...
usando char seu campo pode estar retornando assim:
0123 no que varchar ele traria assim 0123
ae na consulta ele nunca vai retornar so se vc digitar esses espaços antes
sacou ...
V ae !
- Original Message -
OU SEJA ...
se vc pode e quer gastar $$$
um bom investimento é vc comprar o delphi 2007 ou o mydac e usar o delphi 7
agora se vc tiver quebrado vai de zeos mesmo.
- Original Message -
From: Eduardo Silva dos Santos
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday,
Cara primeiro. Instale um controle de versão.
para você sempre saber o que foi feito e por quem e quando. E evitar que
duas pessoas mexam na mesmo fonte.
segundo comente e padronize seu código para que não aconteça de dois mundo
diferentes fazendo a mesma coisa. Converse com o outro programador e
usu foi cruel...rsrsrsrss (foi mal)
Eu uso
Tu usas
Ele usa
Nós usamos
Vós usais
Eles usam
- Original Message -
From: Jefferson - Fórum
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 11:34 AM
Subject: Re: [delphi-br] Ajuda com IdSMTP
Creio que faltou a
Aos desavisados... Sun Acquires MySQL
http://blogs.mysql.com/kaj/2008/01/16/sun-acquires-mysql/
Em 16/01/08, Apoio [EMAIL PROTECTED] escreveu:
OU SEJA ...
se vc pode e quer gastar $$$
um bom investimento é vc comprar o delphi 2007 ou o mydac e usar o delphi
7
agora se vc tiver
Eu entendi essa parte da organização e tal, porem, e no caso especifico do
Delphi(por exemplo), como faria pra dois programadores mecherem no mesmo
projeto, cadaum faria um projeto separado e depois junta os dois?
ou cada um geraria um executavel e no final fariamos um software principal que
O tipo do campo está como Character...
Esse é o problema???
Então eu deveria colocar alphanumérico???
Vlw
--- Em delphi-br@yahoogrupos.com.br, Apoio [EMAIL PROTECTED] escreveu
um estranho ...
qual tipo do campo de codigo?
veja se é char ...
usando char seu campo pode estar retornando
Só para lembrar, a tabela aqui é .DBF, e os tipos de campos são:
Character, Float, Number, Date, Logical, Memo, OLE, Binary E o
código possui caracteres númericos e alfanuméricos.
Qual seria o tipo de campo certo???
--- Em delphi-br@yahoogrupos.com.br, Apoio [EMAIL PROTECTED] escreveu
um
Fala Rafael
Três coisas:
1. Abra uma nova mensagem com o assunto do qual quer tratar.
2. Que dificuldades vc está tendo?
3. Consulte sempre DEUS (www.google.com.br) para estas questões iniciais.
Aí vão três links pra te ajudar no início:
www.ivansantos.com.br/fluxo.htm
Ta dando o msm erro, fiz as alterações, mas nao teve jeito, mas eh muito
estranho o e-mail ta chegando corretamente inclusive com o anexo, td
perfeito. O negocio eh so o erro q da q faz ele passar pelo except, vou
continuar tentando, mas qualquer ajuda eh bem vida.
Em 16/01/08, Jefferson - Fórum
o jedi vcs faz esse trabalho , ele monitora 2 ou mais maquinas num mesmo
projeto .
ex:
como existe um servidor vcs , ele nao deixara q 2 usuarios modifiquem um mesmo
.pas
fora Ns recursos que ele tem ,
mas pra vc entender melhor baixe o programa , instale ae , procure se informar
mais
Ok entao, sua tabela esta certa assim mesmo como character.
Varchar eh um tipo especial de campo para economizar bytes no banco de dados,
no qual
ele soh usa o tamanho necessario da string armazenada no registro.
Tipo assim, se vc tem um campo char(10) e digitar 0123 ele assim mesmo ocupa
os
Show de bola este componente UserControl, porémAlguém sabe se ele faz
isso:
Exemplo:
Usuário: JOSÉ
Menus do sistema: CADASTRO, ESTOQUE, VENDAS.
Se o JOSÉ tem permissão apenas para o menu ESTOQUE então quero que apenas a
opção ESTOQUE apareça para ele.
Do jeito que fiz aparecem as três
Ola gente,
Alguem da lista ja trabalhou com SDK biokey?
Grato
Hudson Dias
[As partes desta mensagem que não continham texto foram removidas]
muito show mesmo...
no componente principal o Tusercontrol va na prop. : notAllowedItems
mude para false .
- Original Message -
From: Junior
To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 3:54 PM
Subject: [delphi-br] Componente
Tem o Subversion tbm que é utilizado largamente no mundo inteiro.
É livre (grátis, código fonte disponível para eventuais modificações)
fácil de implantar, fácil de aprender.
E o processo vai ser bastante transparente pra vocês.
cada um vai trabalhar com todo o projeto na sua máquina.
No fim do
Claro que faz, pois vc tem os fontes na mão !
Eu fiz algumas adaptações na versão original para meu uso.
Junior [EMAIL PROTECTED] escreveu:
Show de bola este componente UserControl, porémAlguém sabe se ele
faz
isso:
Exemplo:
Usuário: JOSÉ
Menus do sistema: CADASTRO, ESTOQUE,
Se vc tem os fontes é só trocar o Enabled por Visible...
- Original Message -
From: Junior
To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 2:54 PM
Subject: [delphi-br] Componente UserControl
Show de bola este componente UserControl,
O que fazer quando o programa fica preso na barra de ferramentas e nao encerra ?
sds
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
[As partes desta mensagem que não continham texto foram removidas]
galera o user control tem muitas propriedades ...
antes de sair mudando sua versao acho que deviam procurar com calma
essa prop. tem ae como ja falei q muda automaticamente , nao precisa reinventar
e eu particurlarmente acho furada mudar uma versao pois quando os caras do UC
atualizarem a
Apenas complementando o que o Sérgio disse:
É a CodeGear migrou para o SVN.
Boas práticas dizem para dar commit sempre que terminar uma alteração pois
fica mais fácil voltar versão de for o caso. (ex: corrigiu um bug, commit;
terminou de implementar uma nova classe, commit; etc).
E sempre
Boa noite a todos, alguém sabe como eu posso fazer um progreesbar (real)??
Tenho uma função que atualizo a versão do meu projeto copiando a versão
mais atual do servidor para o cliente. Queria que o progressbar mostrasse o
tempo que demora para fazer essa atualização.
Alguém sabe como eu posso
Srs,
Seguinte estou iniciando em delphi e estou com um duvida...bom fiz um
sisteminha de controle de estoque e vendas...tas tbl's
Cliente..fornecedor..produto...tudo ok...porem quando cheguei na venda parei
hehehe
como ficaria o frmVendas...na parte de cima seria o id_venda..o cliente
nao tem nem mais o q dizer ne companheiro quando vc tiver um problema
especifico poste pro grupo
- Original Message -
From: Guionardo Furlan [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 2:44 PM
Subject: Re: [delphi-br] Fluxo de caixa em Delphi
que driver vc instalou pra fazer a conexao ???
- Original Message -
From: Apoio [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, January 16, 2008 11:30 AM
Subject: Re: [delphi-br] MySQL - Problemas
use zeos;
53 matches
Mail list logo