Alisson te aconselho criar um banco de dados com a estrutura correta
(como vc quer) e em seguida transferir os dados usando um programa para
a transferencia, ou vc cria uma ta tabela paralela com os dados
corretos... transfere os dados para a nova tabela apaga antiga
Alisson Yahoo escreveu:
>
E ainda ele reclama qdo alguém diz pra procurar no Google, eta povo que
só quer copiar/colar...
kkk
Em 16/12/2009 19:52, Leandro escreveu:
> Vou testar nao! Correção! Faz o favor de pelo menos ler o codigo e tentar
> entender o que ele faz, por favor ne! Ctrl C Ctrl V sem Entende
hehehehhe isso ai amigo. de vez em quando eu posto alguma coisa por la. e ai?
montou seu controle financeiro ?
--- Em delphi-br@yahoogrupos.com.br, Silvio Clecio escreveu
>
> Fernando Medeiros escreveu:
> > Sílvio,
> >
> > Faça como eu... arrume um tempo e comece
> > um dia estava cansado d
http://aflsistemas.com.br/blog/2009/04/09/dica-limpar-edit-em-execucao/
ou
http://ricardo-correia.blogspot.com/2009/04/limpando-edits-dinamicamente-no-delphi.html
Em 17/12/2009 08:49, Jefferson Eduardo escreveu:
>
> Pessoal, bom dia!
>
> Tenho um programa no delphi e quando clico no botão salv
procedure LimpaEdit(comp: TComponent);
var
i: TComponent;
c: TComponent;
begin
for i:=0 to comp.ComponentCount - 1 do
begin
c:=comp.Components[i];
if (c is TEdit) then
(c as TEdit).Text:=''
else begin
LimpaEdit(c);
end;
end;
end;
ntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
__ Information from ESET NOD32 Antivirus, version of virus signature
database 4697 (20091217) __
The message was checked by ESET NOD32 Anti
Olá Jefferson
Olhe esta função que uso há alguns anos:
procedure LimparCampos(Fm : TForm);
var
i : Integer;
begin
try
for i := 0 to Fm.ComponentCount - 1 do
Begin
if Fm.Components[i] is TCustomEdit then
(Fm.Components[i] as TCustomEdit).Clear;
if Fm.Components[i] is TLabeledEdit then
faz um for de componentes
* for i := 0 to ComponentCount - 1 do*
* begin *
*if Components[i] is TEdit then*
* TEdit(Components[i]).Clear;*
* end;*
acho que isso resolve...
*Diego Garcia*
Twitter: http://www.twitter.com/drgarcia1986
2009/12/17 Jefferson Eduardo
>
>
> Pessoal, bo
boa tarde pessoal, alguem aki ja utilizou o debub remoto do delphi via
internet? será que é possivel, existe alguma limitação. O material na internet
que eu encontrei (pouco) não fala nada sobre via internet. Desde ja agradeço a
atenção de todos
_
Boa tarde a todos,
Obrigado Luiz, Marcelo e Aureo, para mim foi importante estas informacoes, para
eu ter a confirmacao de que pode haver uma execucao diferente nestes
processadores.
Este cliente onde instalei o sistema é o unico com este processador, e o unico
em que deu erro. Em varios outro
Aos amigos e colaboradores da lista:
Agradeço pelas informações e críticas a respeito.
Primeiro, quando recorremos a lista, é porque já fizemos uma varredura
nos googles e yahoos da vida.
Segundo, o objetivo não é ctrl+c ctrl+v, e sim, resolver o problema
aqui
proposto
Esta rotina poderia ser melhorada da seguinte maneira:
procedure ClearEdits(AOwner: TWinControl = nil);
var
i, cnt: integer;
begin
if not Assigned(AOwner) then
AOwner := Screen.ActiveForm;
cnt := AOwner.ComponentCount;
for i := 0 to cnt – 1 do
if AOwner.Components[i] is
procedure LimpaEdit (Form: TForm);
var
i : Integer;
begin
for i := 0 to Form.ComponentCount - 1 do
if Form.Components[i] is TCustomEdit then
(Form.Components[i] as TCustomEdit).Clear;
end;
// assim limpara todos os Edits, Memos, MaskEdits, etc...
De: Jefferson E
Empresa com atuação nacional que há mais de 25 anos atua na geração de soluções
inteligentes em cobrança. Proporciona expressivos resultados na recuperação de
clientes e ativos financeiros. Atualmente é a maior e a mais bem preparada
empresa deste segmento e grande parte deste sucesso está diret
use o *TXMLDocument*
*
*
*
Diego Garcia*
Twitter: http://www.twitter.com/drgarcia1986
2009/12/17 Adjalma Costa
>
>
> Olá
>
> Preciso consumir um WebService enviando um parametro contendo dados de uma
> tabela de uma base FireBird.
>
> Esse xml tem que ser no formato normal, e não no padrão gera
Ah eu me esqueci de um projeto e na qual uso tbm é o FreeBoleto...
http://www.google.com.br/search?hl=pt-BR&source=hp&q=FreeBoleto&btnG=Pesquisa+Google&meta=cr%3DcountryBR&aq=f&oq=
Att.
Ricardo.
--- Em qua, 16/12/09, Ricardo Diniz escreveu:
De: Ricardo Diniz
Assunto: Re: [delphi-br] Boleto B
*try
frmMain.IdFTP.Connect;
except
on E: Exception do
ShowMessage('Erro: '+E.Message );
end;*
Tente assim pra ver se é o que vc quer
>
[As partes desta mensagem que não continham texto foram removidas]
Pessoal, bom dia!
Tenho um programa no delphi e quando clico no botão salvar, ele limpa os dados
no edit.text e insere no banco, porém, para limpar estou fazendo desse jeito no
código:
EdtCep.Text:=' ';
EdtBairro.Text:=' ';
EdtCidade.Text:=' ';
EdtTelfixo.Text:=' ';
Existe
Olá
Preciso consumir um WebService enviando um parametro contendo dados de uma
tabela de uma base FireBird.
Esse xml tem que ser no formato normal, e não no padrão gerado pelo
ClientDataset. A minha dúvida é: tem algum componente que gere o xml no padrão
normal?
sds
Adjalma
___
e para alterar o nome da tabela em firebird ???
De: Alisson Yahoo
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 17 de Dezembro de 2009 15:14:27
Assunto: Re: [delphi-br] Re: OFF TOPIC-Consultar registro com acentos em
Firebird
Mas e se os cam
Mas e se os campos já existirem? Eu vou ter que trocar um a um via código?
- Original Message -
From: "humberto sales de oliveira"
To:
Sent: Wednesday, December 16, 2009 11:51 PM
Subject: Re: [delphi-br] Re: OFF TOPIC-Consultar registro com acentos em
Firebird
> declare dessa forma
Sobre as dúvidas, todo mundo tem. Mas é notório quando se lê um e-mail onde
claramente existe preguiça em primeiro esgotar as alternativas em solucionar a
dúvida por meio de pesquisas ao Google ou AltaVista e simplesmente postam a
dúvida aguardando de forma insistente como se fosse cliente de op
As vezes eu até fico pensando quando observo isso, o que poderia estar causando
isso:
* Ninguém mais tem dúvidas?
* As dúvidas estão ficando mais complexas?
* O nível técnico caiu?
* O interesse em programar usando Delphi/Object Pascal diminuiu?
* A lista está perdendo o foco técnico e virando ma
Realmente Walter... esta lista já teve dias melhores.
Ultimamente o que mais tem é discussão boba que não leva a nada... a
turma tá parecendo um bando de lavadeira, mas fazer o que, né? Pra
frente é que se anda.
--
[]’s.
Evandro Siqueira
Programador de Sistemas
L’essentiel Lingerie
(79) 3254-
Pessoal,
como descubro quais as possíveis exceções que retornar depois de um try. Por
exemplo, quero me conectar por ftp usando o componente IdFTP da paleta Indy
Clients.
exemplo:
try
frmMain.IdFTP.Connect;
except
end;
e na conversao de String para Integer? Se no campo string tiver uma let
Olha, com todo o respeito, mas voce está mesmo é jogando contra o próprio
patrimonio. Ao justificar isto (que não justifica nada), voce está apenas
apoiando e amparando aqueles que vivem a esperar que a montanha venha a
Maomé.
E o nível da lista Ó!
Agora falar que o Yahoo é combalido, pelo amo
Eu fiz alguma coisa, e gostei do resultado, além da vantagem que se no meio
da caminho vc ficar de saco cheio da ide do delphi pode fazer tudo na mão
mesmo no método tradicional, (obvio vai dar mais trabalho) mas vcl quadran
que o d4php usa, é independente.
2009/12/16 Marcelo Moacir Florindo
>
>
27 matches
Mail list logo