Eduardo,
No post do QC, tem um comentário sobre uma alteração que foi feita na
FMTBcd.pas.
Me manda um aplicação exemplo e o script da tabela por favor.
[]'s
Andreano
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of
Eduardo Silva dos Santos
Sent: Sunday, July 27,
Olá Andreano, quem reportou o problema foi o Ricardo Lima.
2008/7/28 Andreano Lanusse [EMAIL PROTECTED]
Eduardo,
No post do QC, tem um comentário sobre uma alteração que foi feita na
FMTBcd.pas.
Me manda um aplicação exemplo e o script da tabela por favor.
[]'s
Andreano
From:
amigos estou com a segte rotina
procedure TForm3.RzDBRadioGroup1Click(Sender: TObject);
begin
// 1
if (Form3.RzDBRadioGroup1.ItemIndex = 0) and // Probabilidade =
Altamente Improvável
(Form3.RzDBRadioGroup2.ItemIndex = 0)then // Gravidade = Levemente
Prejudicial
Begin
Andreano mandei para seu e-mail.
Segue aqui também anexo, se mais alguem quiser fazer o teste.
Uso SQLServer 2005 Express e BDS2006.
A aplicação de teste tem campos do tipo int,float, money e numeric,
basta gravar valores negativos nos campos float e money(bcd) entre 10 e
99 e depois manda
Pessoal,
Quando definimos a versão de um projeto no Delphi 7, como posso fazer para
recuperar essas informações na aplicação?
Att,
Marcos A. Ferreira
Consultor SAP/ABAP
São Paulo - SP
+55 1183376968
Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você
não for o
Quem procura, acha! ;)
Retrieve version information for a specified file
http://www.swissdelphicenter.ch/en/showcode.php?id=1047
Read the version of a file
http://www.swissdelphicenter.ch/en/showcode.php?id=27
Obtain DLL-specific version information
Olá, bom dia a todos...
Criei uma rotina [1] para adicionar parâmetros a um objeto TOraStoredProc (ODAC
6.25) em tempo de execução, mas a mesma me retorna o erro Invalid property
value. Já codifiquei a rotina de 'n' formas diferentes, todas sem sucesso.
A situação é: a variável rParam recebe o
Amigo,
Dá uma olhada no site da DevMedia e no site da ActiveDelphi que vc já vai
conseguir pegar a mão rapidinho com os artigos deles. Uma dica de livro seria
o Dominando Delphi 6 - A Bíblia do Marco Cantù. Existem edições mais atuais
tratando do Delphi 2005 por exemplo, mas se vc conseguir
Olá Willian, certo vez vi algo parecido no Forum do ODAC, acho que você tem
que usar um tipo que parêmetro que pertence ao ODAC se não me engano
TDAParam.. não tenho certeza, de qualquer forma segue o endereço do forum,
se você postar lá certamente o pessoal da DevArt resolve rapidinho
HI!
Utilizo desde o tempo que não era DBO.
O único problema é que trabalha no modo síncrono, ou seja, bloqueia a aplicação
durante a execução do SQL, nem criando threads.
Se alguém souber como fazer para não travar a aplicação, agradeço.
Bai!
º.·´¯`·. º.·´¯`·. º.·´¯`·.
Não sei se o resultado seria o esperado, mas, você podia experimentar criar
uma Thread com uma instância de objetos Zeos ( TZSql ouTZReadOnlySql ) que
encapsula a SQL que deseja executar, e chamá-la de dentro da aplicação, que
por sua vez, terá o controle da Thread sem ficar bloqueada.
E aí pessoal, me tirem uma dúvida bem simples sobre o bloco try-finally.
try
label1.caption:= 'iukhkhgh';
...
...processo demorado...
finally
label2.caption := label1.caption + (resultado do processo demorado);
...continua com o código...
end;
Agradeço
É claro que é um bloco, mas ele pode
O finally só será executado após o provesso demorado.
2008/7/28 Onjahyr - GMAIL [EMAIL PROTECTED]
E aí pessoal, me tirem uma dúvida bem simples sobre o bloco try-finally.
try
label1.caption:= 'iukhkhgh';
...
...processo demorado...
finally
label2.caption := label1.caption + (resultado
Olá, Eduardo...
Valeu pela resposta, mas acabei encontrando referências a um método da classe
TOraStoredProc que faz exatamente oq eu preciso. Então, minha função acabou
ficando assim:
procedure TOraDBConnection.CreateStoredProcParam(StoredProc:
TCustomOraStoredProc;
PFiledType: TFieldType;
Blz, valew. (a muito tempo eu usava assim mas tinha minhas dúvidas)
José Mário Silva Guedes escreveu:
O finally só será executado após o provesso demorado.
2008/7/28 Onjahyr - GMAIL [EMAIL PROTECTED] mailto:onjahyr%40gmail.com
E aí pessoal, me tirem uma dúvida bem simples sobre o bloco
Boa tarde pessoal
Preciso fazer filtro dentro de uma consulta num aplicativo com BD em
access. Já tentei de várias formas mas não estou conseguindo filtrar.
Eu coloco as datas em 2 maskedit, nunca fiz isso antes. Preciso
converter os valor para date?
Se alguém puder me ajudar com esse código
Amigo,
Acho que você está usando de forma errada errada o bloco try finally.
Este se destina a a executar algo, mesmo que ocorra alguma exceção ou
que você tenha que sair do bloco por algum motivo: exemplos
Objeto: TObjeto.Create;
try
usa o objeto...
finally
Objeto.Free;
end;
Cara,
procedure TForm1.ButtonClick(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT * FROM TABELA WHERE CAMPO_DATA BETWEEN :DATA1
AND :DATA2');
Query1.ParamByName('DATA1').AsDateTime := StrToDateTime(MaskEdit1.Text);
Query1.ParamByName('DATA2').AsDateTime
Att,
Marcos A. Ferreira
Consultor SAP/ABAP
São Paulo - SP
+55 1183376968
Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você
não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode
usar, copiar, ou divulgar as informações nela contidas ou tomar
Depende do tipo de processo, os processos que desviam o cursor devem
primeiramente terminar para que o bloco Finally seja executado, normalmente
os processos que envolvem Looping...
Exemplo, quando você executa o método Form1.ShowModal estiver entre o
Try ... Finally o fluxo é enviado
Pessoal,
vou experimentar o Fortes Report. qual desses devo instalar? ou tenho que
instalar os dois?
Delphi7CLX Arquivo compactado padrão ZIP* 803 Kb 29/10/2004
Delphi7VCL Arquivo compactado padrão ZIP* 776 Kb 29/10/2004
Att,
Marcos A. Ferreira
São Paulo - SP
+55 1183376968
Esta
Não, você não precisa converter para Date, mas tem que saber qual o banco
está utilizando pois cada banco implementa uma forma diferente de data, ou
seja no SQLServer é ANO/MES/DIA, no Firebird é MES/DIA/ANO então você
tem que se ater a este detalhe para poder formatar corretamente a data...
Pessoal,
Boa tarde...
Tenho um formulario com um listbox e dois botões um com seta para cima
e outra com seta para baixo (ordenação). Meu problema e que nao estou
conseguindo ordenar os itens do meu list box.
Exemplo quando seleciono o primeiro e clico no botao para baixo queria
que ele
Olá Willian, que bom que deu certo,
quanto ao tempo de resposta da Devart é relativo, todas as vezes que postei
no Forum (e olha que tem tempo que posta lá) tive minhas dúvidas respondidas
no dia seguinte.
outra forma mais rápida é enviar um e-mail para o suporte com o nº do seu
registro de
Olá eu tenho armazenado numa query um valor qualquer tipo 19,29, só que
eu quero que ele se transforme em 19P29, ou seja quero ler o valor
armazenado e no lugar da virgula colocar o P , como faço isso
obrigado
//Desce o item selecionado
procedure TForm1.btn1Click(Sender: TObject);
var
NovoIndex : Integer;
begin
if not (lbx1.ItemIndex = lbx1.Items.Count-1) then
begin
NovoIndex := lbx1.ItemIndex + 1;
lbx1.Items.Move(lbx1.ItemIndex, NovoIndex);
lbx1.ItemIndex := NovoIndex;
Juliano,
Se você utilizar parâmetros na query como mostrei, o componente se
encarrega de mandar corretamente a data para o banco.
--
Boa Leitura,
Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi.blogspot.com
StringReplace ???
Vinicius dos Santos
Blog: http://tuplas.blogspot.com
http://www.msisolucoes.com.br
- Original Message -
From: rzzanatta
To: delphi-br@yahoogrupos.com.br
Sent: Monday, July 28, 2008 3:10 PM
Subject: [delphi-br] duvida
Olá eu tenho armazenado numa query
VCL
CLX é a biblioteca para compatibilidade com o Kylix.
O Kylix foi descontinuado, logo a CLX. Mas ainda está presente por
compatibilidade
2008/7/28 Marcos Ferreira [EMAIL PROTECTED]
Pessoal,
vou experimentar o Fortes Report. qual desses devo instalar? ou tenho que
instalar os dois?
Extraído da mensagem original:
(...)uma consulta num aplicativo com BD em access.
Atte,
Ricardo.
--- Em seg, 28/7/08, Juliano Silva - Yahoo [EMAIL PROTECTED] escreveu:
De: Juliano Silva - Yahoo [EMAIL PROTECTED]
Assunto: RES: [delphi-br] consulta entre datas
Para: delphi-br@yahoogrupos.com.br
Use o evento OnGetText do objeto TField associado ao campo da seguinte maneira:
procedure TForm1Query1CampoNumericoGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if DisplayText then
if not Sender.IsNull then
Text := StringReplace(FormatFloat('##0.00',
Era exatamente isso minha dúvida, você acertou em cheio.
Agradecido
Juliano Silva - Yahoo escreveu:
Depende do tipo de processo, os processos que desviam o cursor devem
primeiramente terminar para que o bloco Finally seja executado,
normalmente
os processos que envolvem Looping...
Olá,
Tenho um Soap Http Client implementado e funcionando em D7 a um bom tempo para
consulta CEP's.
Cliente atualizou servidor para 64 bits e agora o dito cujo dá AV.
Só acontece em máquinas com S.O. 64 bits.
Talvez alguém já tenha passado por isso ?
[]'s
Davi.
[As
Fornece mais detalhes sobre teu SOAPHTTPClient. Deduzo eu que tu codificastes
um aplicativo pra acessar um webservice. Se for, tu usas uma unit que traduz as
chamadas ao webservice?
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Mon, 28 Jul
E ae, ninguém sabe nada a respeito?
--- Em delphi-br@yahoogrupos.com.br, Onjahyr - GMAIL [EMAIL PROTECTED]
escreveu
E ae Pessoal, blz?
Tô com um problema. Uso o Delphi 7 e estou criando um aplicativo
para uma Assistência Técnica de computadores, os caras querem que o
programa rode de um
Exatamente! Este é o código da unit!
cepwsdlPortType = interface(IInvokable)
['{3E7EC10C-CAC0-3F39-B591-CA8F8E9208FB}']
procedure ConsultarCEP(const user: WideString; const pass: WideString;
const cep: WideString; out endereco: WideString; out bairro: WideString; out
cidade:
Bom, pra começar esse endereço do websrvice não existe! Tentei acessá-lo pelo
IE e ... nem tchum!
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Mon, 28 Jul 2008 15:52:00 -0300
Subject: RES: [delphi-br] SOAPHTTPClient - Access Violation em
Sim! O endereço é fictício.
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem
Nascimento da Rocha
Enviada em: segunda-feira, 28 de julho de 2008 15:58
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: RES: [delphi-br] SOAPHTTPClient -
Sim, mas como é que vai ser pra validar essa unit com um endereço fictício? Eu
num consigo ver como fazer isso sem o endereço real!
Já aviso logo que se for o endereço do webservice dos correios, ele foi
desativado faz uma pá de tempo! Cadê o endereço real pra poder avaliar? De
repente, pode
Cara, existe uma opção que você desabilita o lance de ficar pedindo senha e
confirmação para tudo no Vista... lá em usuários do Vista, desabilitando
esta funcionalidade, ele para de pedir as confirmações e senhas...
Não é o que você precisa, mas em meu caso funcionou bem já que os usuários
que
Entendo!
Mas estou dizendo que neste exato momento eu abro esta aplicação em um ambiente
32 bits e a consulta procede sem erros.
Se neste exato momento eu testar em um ambiente 64 bits acontece o dito cujo do
AV.
De qualquer forma te passei os endereços em PVT.
[]'s
Acho melhor que vc passe o endereço em private pro Rubem, que se dispôs a te
ajudar, Davi.
Atte,
Ricardo.
--- Em seg, 28/7/08, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu:
De: Rubem Nascimento da Rocha [EMAIL PROTECTED]
Assunto: RE: RES: RES: [delphi-br] SOAPHTTPClient - Access
Manda um código de exemplo da chamada de método do WS que tá com problema. De
repente, sei lá, talvez seja necessário alguma diretiva de compilação pra que o
código possa rodar em ambiente 64 bits. Mas é apenas uma dedução. Alguém da
Seria isso!
Uma manifestação do Andreano ou do Bruno seria interessante neste assunto!
GetcepwsdlPortType.ConsultarCEP('', '', edCEP.Text, endereco, bairro, cidade,
uf);
showmessage(endereco + #13#10 +
bairro + #13#10 +
cidade + #13#10 +
Pessoal é sexta-feira, tem que se inscrever antes para participar.
From: Andreano Lanusse
Sent: Friday, July 25, 2008 1:56 PM
To: 'delphi-br@yahoogrupos.com.br'
Subject: Tiburon Preview - online próxima sexta - 1 de agosto
Comunidade Delphi,
Na próxima sexta, 1º de agosto, às 11h (horário de
É, eu sei, mas o problema é exatamente para executar outro aplicativo
(de instalação por exemplo). Descobri que a função ShellExecute não
existe na API do Windows Vista, porisso não consegue executar nada, tem
que partir para outra função (tem que verificar o sistema operacional e
usar uma
string := StringReplace(string, valor_antigo, valor_novo,
[rfIgnoreCase, rfReplaceAll]);
Odail Della Niesi Junior
São Pedro-SP
Vinicius Santos - MSI escreveu:
StringReplace ???
Vinicius dos Santos
Blog: http://tuplas.blogspot.com http://tuplas.blogspot.com
http://www.msisolucoes.com.br
Eu, particularmente, faria o código da seguinte maneira:
var
lWsCEP: cepwsdlPortType;
endereco, bairro, cidade, uf: string;
begin
lWsCEP := GetcepwsdlPortType();
try
try
lWsCEP.ConsultarCEP('', '', edCEP.Text, endereco, bairro, cidade, uf);
except
on E: Exception do
Em teoria é a mesma coisa! Mas vou tentar por desencargo e dou retorno para
lista!
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rubem
Nascimento da Rocha
Enviada em: segunda-feira, 28 de julho de 2008 16:54
Para:
Tentei! Não funcionou!
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Davi
Eduardo Borges Wall
Enviada em: segunda-feira, 28 de julho de 2008 16:59
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: RES: RES: RES: RES: [delphi-br]
Andreano, confirme por favor o link, pois não estou conseguindo acesso.
http://latam.codegear.com/br/tiburonpreview.
Obrigado
Roberto
- Original Message -
From: Andreano Lanusse
To: delphi-br@yahoogrupos.com.br
Sent: Monday, July 28, 2008 4:42 PM
Subject: [delphi-br] RE:
é por causa do Ponto ao final do link.. :-)
http://latam.codegear.com/br/tiburonpreview
2008/7/28 Roberto [EMAIL PROTECTED]
Andreano, confirme por favor o link, pois não estou conseguindo acesso.
http://latam.codegear.com/br/tiburonpreview.
Obrigado
Roberto
- Original Message
Tira o . do final do link que vai...
Ou usa esse link http://gofrom.us/7L
--
José Henrique (Zote)
Analista de TI
Bludata Software
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Roberto
Enviada em: segunda-feira, 28 de julho de 2008 17:21
Para:
Boa Tarde Colegas,
Tenho uma rotina que envia e-mail usando o cliente
de e-mail para do
windows via MAPI. que está abaixo. Quando o cliente tem o
Outlook, Outlook
express, thunderbird... funciona perfeitamente.
Agora
estamos em um cliente que utiliza Lotus Notes e quando chamo a
Estou fazendo conexão com a Internet via IP remoto ou local (isso
porque às vezes o usuário estará dentro da própria empresa usando a
rede interna). Só que algumas vezes funciona, outras não e algumas
vezes dá Acesso Negado, geralmente na conexão remota wireless.
Tenho uma URL para acesso
Grande Andreano,
Esse evento vai ser disponibilizado pra download após a sua realização, tal
qual o Delphi Day?
Pergunto isso por causa de quem não puder participar no dia (onde eu me incluo)
:-)
Obrigado,
Leandro
- Original Message -
From: Andreano Lanusse
To:
Oi Leandro,
Este evento em particular não.
[]'s
Andreano
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of
Leandro
Sent: Monday, July 28, 2008 1:47 PM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] RE: Tiburon Preview - online próxima sexta - 1 de
agosto
Alguem conheçe algum componente quem tenha uma TreeView com CheckBox, ou
uma rotina que faça isso?
___
Yahoo! Mail - Sempre a melhor opção para você!
Experimente já e veja as novidades.
Na JEDI VCL (JVCL) tem um componente de treeview com esse recurso.
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Mon, 28 Jul 2008 18:41:32 -0300
Subject: [delphi-br] TreeView com CheckBox
Alguem conheçe algum componente quem tenha uma
Então, é bom ver com alguém da Embarcadero o que pode ser isso. Sugiro uma
busca no QualityCentral pra saber se não existe algum workaround sobre isso ao
usar Delphi 7 (deduzo eu que vc esteja usando essa versão).
Sds.
To: delphi-br@yahoogrupos.com.br
From:
Prezado Andreano,
Primeiro, o Link está com problemas.
Segundo, Novo isso, Novo aquilo, etc,etc...o que gostaria de saber é se
os bugs da Versão 2007 serão resolvidos ou não.
Não adianta colocar um monte de coisas novas se também teremos bugs e mais
bugs NOVOS.
Abraços,
olá amigo!
tenta colocar os dados em um array de ordena essa array e depois envia pra o
listbox.
Att.
Benedito Regis de Oliveria Filho
mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Cel: (41) 91250864
Daysoft Serviços de Tecnologia Ltda.
Function TFProcessar.SubstituirCaracteres(Text, Busca, Troca: String):
String;
var
n, i: integer;
begin
i := length(Busca);
for n := 1 to length(Text) do
begin
if Copy(Text, n, i) = Busca then
begin
Delete(Text, n, i); Insert(Troca, Text, n);
end;
end;
Result:= Text;
Senhores,
A série continua TEM COISA QUE EU NÃO POSSO GUARDAR SÓ PRA MIM
hauahuahuahau
Observem a query que esta dentro de um componente ADOQuery...
SELECT AI.*
FROM AliquotaIcms AS AI
WHERE (1=1) and (2=2)
ORDER BY dsc_AliqIcms
HUhauhauhauhauha . where (1=1) and (2=2)
Voce pode tentar a funcao StringReplace para fazer a substituicao
StringReplace(TEXTO,TEXTOASERSUBSTITUIDO, TEXTOASUBSTITUIR, [rfReplaceAll]);
Exemplo:
Var Texto: String;
Texto:='BrasilArgentinaBrasil';
Texto:=StringReplace(Texto,'Argentina',Brasil,[rfReplaceAll]);
A variável
Boa tarde,
Vc pode fazer a ordenacao utilizando uma variavel auxiliar..
Fiz um exemplo pro botão pra CIMA
aux := ListBox1.Items.Strings[listbox1.itemindex];
ListBox1.Items.Strings[listbox1.itemindex] :=
ListBox1.Items.Strings[listbox1.itemindex - 1];
Boa tarde pessoal,
estou tendo um problema de lentidão em BD. Faço tudo com queries e depois que o
banco passou a ter uns 60 registros em umas 4 tabelas, para abrir uma consulta
demora uma eternidade, em um Pentium II 400 demora uns 3 minutos para abrir
esta janela. Alguém saberia como resolver
Boa noite,
Gostaria de saber como faço para saber quantos registros foram
retornados em uma consulta..
por exemplo
select * from table where campo1=campo1;
gostaria de saber como faço uma condição caso ele retornar mais de 20
registros por exemplo;
eu estou usando access e sqlquery...
eu
Eu acho melhor fazer isso direto no SELECT. Manda um CAST pra varchar
e substitui no próprio SELECT (dependendo de que banco vc esta usando,
isso é mole, mole)...
Abs
Marcello Felipelli
--- Em delphi-br@yahoogrupos.com.br, Vinicius Santos - MSI
[EMAIL PROTECTED] escreveu
StringReplace ???
Pode ser que o programador fazia a substituição do 1=1 e 2=2 por outras
condições em tempo de execução
Isto é comum em rotinas de relatório ou pesquisa
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcello Felipelli
Enviada em: segunda-feira, 28 de
João,
Aqui vai o link: http://latam.codegear.com/es/tiburonpreview
Fica muito difícil eu saber que bug você se refere, você poderia encaminhar a
lista de bugs, acompanhada um test case ou o número do report no QC, juntamente
o serial number do seu produto.
[]'s
Andreano
cara eu n sei ao certo mas tenta fazer assim,
inteiro = query.execsql;
n tenho certeza
Douglas Takahara escreveu:
Boa noite,
Gostaria de saber como faço para saber quantos registros foram
retornados em uma consulta..
por exemplo
select * from table where campo1=campo1;
gostaria de
O Portal da Devmedia tá apinhado de video-aulas para Delphi e outras
ferramentas. Vale a pena fazer a inscrição.
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN: [EMAIL
Olá Douglas...
Faz o seguinte:
with ObjetoQrery do
begin
if Active then
Close;
SQL.Text := 'SELECT * FROM TABELA WHERE CAMPO = CONDICAO';
Open;
end;
rNumRegistros := ObjetoQuery.RecordCount;
Não tem erro...
---
Att.:
Willian Jhonnes
Já trabelhei em um banco de dados, não me lembro qual no momento, que tinha
esta cláusula mesmo... queria dizer:
Campo1 = Campo1 e Campo2 = Campo2 e etc...
Ou seja, trazer registros repetidos nos campos mencionados... bom, não sei
se to falando bobagem, mas que tinha isso tinha, e funcionava...
Boa noite!
Tente colocar o código abaixo num TSQLQuery por exemplo:
[ Código SQL - Início ]
Select Count( * ) as Contagem From Sua_Tabela Where Campo = Campo
[ Código SQL - Final ]
E faça o seguinte num botão, por exemplo ( evento OnClick )
[ Código Delphi/Object Pascal - Início ]
Var
total
Não vejo nada de anormal nisso. Já vi esse tipo de código. Geralmente
escrito por ferramentas que geram código.
É uma condição meio que dinâmica que é pra ser ignorada...ou seja, 1=1
sempre...
[]s
Topolniak.
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fellipe
77 matches
Mail list logo