Re: [delphi-br] duvida

2006-04-04 Por tôpico Cadanos

Valeu , era isso mesmo.



Veja se assim da certo:

referencia : string;


referencia:=FormatFloat('000.00',FrmExp.ADOQuery1.FieldbyName
('referencia').Value);

FormatFloat()

Em 04/04/06, Eduardo Alves <[EMAIL PROTECTED]> escreveu:
>
> O q vc quer fazer com este codigo 
>
> Se o valor q esta no campo é um FLOAT entao use apenas FloatToStr !!!
>
> Vc esta copiando um pedaço sumando o tamanho da string + o valor do campo.
>
> Explique o q vc quer !!!
>
>
>
> Eduardo Castro Alves
> Analista de Sistemas
>
> -Original Message-
> From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
> On Behalf Of Cadanos
> Sent: terça-feira, 4 de abril de 2006 10:46
> To: grupo2
> Subject: [delphi-br] duvida
>
>
>
>
> Galera, como faria para formatar está linha para que o valor referencia
> seja 000,00.
> pois esta saindo 00040 (deveria 000,40).
>
> é uma exportação para txt.
>
> referencia : string;
>
>
> referencia:= copy(vzeros,1,(5-Length(floatTOSTR(
> FrmExp.ADOQuery1.FieldbyName('referencia').Value+floatToStr(
> FrmExp.ADOQuery1.FieldbyName('referencia').Value);
>
> Cadanos
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< 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] duvida

2006-04-04 Por tôpico Cadanos



Galera, como faria para formatar está linha para que o valor referencia seja 
000,00.
pois esta saindo 00040 (deveria 000,40).

é uma exportação para txt.

referencia : string;


referencia:= 
copy(vzeros,1,(5-Length(floatTOSTR(FrmExp.ADOQuery1.FieldbyName('referencia').Value+floatToStr(FrmExp.ADOQuery1.FieldbyName('referencia').Value);

Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 





Re: [delphi-br] Conectar banco access com senha atravez de ADO

2006-04-04 Por tôpico Cadanos


Cara da uma olhada se vc não esta com o access aberto ou com o banco aberto
em outro lugar.





Olá pessoal do grupo!

Precisoo colocar senha no meu banco access, mas não estou conseguindo
acessa-lo com o ADO.

Quando vou coocar o "ConnectinString" e testar a conexão dá o erro:

"Falha no teste de conexão devivo a um erro na inicialização do provedor.
Não é possível iniciar o aplicativo. O arquivo de informações do grupo de
trabalho esta faltando ou foi aberto em modo exclusivo por outro usuário."

Como posso resolver este problema?

Obrigado!

-
 Yahoo! doce lar. Faça do Yahoo! sua homepage.

[As partes desta mensagem que não continham texto foram removidas]



-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos









-- 
< 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] Exportar arquivo TXT

2006-03-29 Por tôpico Cadanos



Bom Dia Pessoal

Preciso de uma juda, sei que uma das coisas basicas e trabalhar com arquivo 
txt, mas não domino muito isso, minha duvida.

Preciso gerar um arquivo txt lendo algumas tabelas, o que é mais facil exportar 
a query direto ou mostrar em um dbgrid e exporta-lo, ou criar uma outra tabela 
com o resultado e depois exporta-lo.

Como posso fazer para que a depois de cada campo da query seja gerado no txt o 
separador ( ; )?

Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 





Re: [delphi-br] Erro no UPDATE

2006-03-15 Por tôpico Cadanos
Eu tentei assim mas me da o seguinte erro :

Instrução sql invalida DELETE, INSERT, SELECT, UPDATE esperado...

with AdoqInsere do begin
close;
AdoqInsere.sql.clear;
AdoqInsere.sql.add ('Updade locacao set dt_devolucao = ' + DB6.Text + '
where cd_locacao = ' + Db4.Text + '');
AdoqInsere.execsql;
ShowMessage(AdoqInsere.SQL.Text);
end;




---



Cara quando tais concatenando a string, não tais trabalhando com parâmetros.

Faça assim:
with AdoqInsere do begin
close;
AdoqInsere.sql.clear;
AdoqInsere.sql.add ('Updade locacao set dt_devolucao = ' + DB6.Text + '
where cd_locacao = ' + Db4.Text + '');
AdoqInsere.execsql;
ShowMessage(AdoqInsere.SQL.Text);
end;

Ou assim:
with AdoqInsere do begin
close;
AdoqInsere.sql.clear;
AdoqInsere.sql.add ('Updade locacao set dt_devolucao = :p1 where
cd_locacao = :p2');
AdoqInsere.Parameters.Items[0].value:= (db6.text);
AdoqInsere.parameters.Items[1].value:=db4.Text;
AdoqInsere.execsql;
ShowMessage(AdoqInsere.SQL.Text);
  end;

Deve resolver o seu problema!

--
José Henrique (Zote)

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cadanos
Enviada em: quarta-feira, 15 de março de 2006 11:02
Para: grupo2
Assunto: [delphi-br] Erro no UPDATE




Pessoal to quebrando a cabeça com o seguinte:


Preciso fazer um Update em um campo de uma tabela onde condição = parâmetro

To tentando da seguinte maneira mas me da o erro list index out of bounds
(0),

Alguém tem um exemplo mais simples para se fazer?



with AdoqInsere do begin
close;
AdoqInsere.sql.clear;
AdoqInsere.sql.add ('Updade locacao set dt_devolucao = ' + DB6.Text + '
where cd_locacao = ' + Db4.Text + '');
AdoqInsere.Parameters.Items[0].value:= (db6.text);
AdoqInsere.parameters.Items[1].value:=db4.Text;
AdoqInsere.execsql;
ShowMessage(AdoqInsere.SQL.Text);
end;

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos







Received: (qmail 29540 invoked by uid 0); 15 Mar 2006 11:04:40 -0300
Received: from 209.73.160.90 by poseidon.bludata.com.br (envelope-from
<[EMAIL PROTECTED]
>, uid 0) with qmail-scanner-1.25
 (clamdscan: 0.85/974. spamassassin: 3.0.2.
 Clear:RC:0(209.73.160.90):SA:0(-1.5/5.0):.
 Processed in 5.059156 secs); 15 Mar 2006 14:04:40 -
X-Qmail-Scanner-Mail-From:
[EMAIL PROTECTED]
via poseidon.bludata.com.br
X-Qmail-Scanner: 1.25 (Clear:RC:0(209.73.160.90):SA:0(-1.5/5.0):. Processed
in 5.059156 secs)
Received: from unknown (HELO n31a.bullet.scd.yahoo.com) (209.73.160.90)
  by poseidon.bludata.com.br with SMTP; 15 Mar 2006 11:04:35 -0300
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
bîExt7r9mocSEF1XEziYDZLuTLMd/Wk0AguxABDMHrjt+TocAZDr+XLKvsH6DbSbrjFU7ZYXOoWU
cYR5/kaZitWO03KMznXMikHQDpIhOY9GSuOmaK2X643CvhvEIMEi;
Received: from [66.218.66.59] by n31.bullet.scd.yahoo.com with NNFMP; 15 Mar
2006 14:04:26 -
Received: from [66.218.66.36] by t8.bullet.scd.yahoo.com with NNFMP; 15 Mar
2006 14:04:26 -
X-Yahoo-Newman-Property: groups-email
X-Sender: [EMAIL PROTECTED]
X-Apparently-To: delphi-br@yahoogrupos.com.br
Received: (qmail 82869 invoked from network); 15 Mar 2006 14:04:23 -
Received: from unknown (66.218.66.217)
  by m30.grp.scd.yahoo.com with QMQP; 15 Mar 2006 14:04:23 -
Received: from unknown (HELO smtp.uol.com.br) (200.221.4.198)
  by mta2.grp.scd.yahoo.com with SMTP; 15 Mar 2006 14:04:22 -
Received: from Valdir (unknown [200.250.222.26])
by scorpion1.uol.com.br (Postfix) with ESMTP id D7B9E7941
for ; Wed, 15 Mar 2006 11:04:16 -0300 (BRT)
Message-ID: <[EMAIL PROTECTED]>
To: "grupo2" 
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 6.00.2800.1437
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1441
X-Originating-IP: 200.221.4.198
X-eGroups-Msg-Info: 1:12:0:0
From: "Cadanos" <[EMAIL PROTECTED]>
Sender: delphi-br@yahoogrupos.com.br
MIME-Version: 1.0
Mailing-List: list delphi-br@yahoogrupos.com.br; contact
[EMAIL PROTECTED]
Delivered-To: mailing list delphi-br@yahoogrupos.com.br
List-Id: 
Precedence: bulk
List-Unsubscribe: <mailto:[EMAIL PROTECTED]>
Date: Wed, 15 Mar 2006 11:01:54 -0300
Subject: [delphi-br] Erro no UPDATE
Reply-To: delphi-br@yahoogrupos.com.br
Content-Type: text/plain; charset=O-8859-1
Content-Transfer-Encoding: quoted-printable
X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on
poseidon.bludata.com.br
X-Spam-Level:
X-Spam-Status: No, score=.6 required=0 tests=L,BAYES_00,
RCVD_IN_BL_SPAMCOP_NET autolearn= version=0.2




Pessoal to quebra

[delphi-br] Erro no UPDATE

2006-03-15 Por tôpico Cadanos



Pessoal to quebrando a cabeça com o seguinte:


Preciso fazer um Update em um campo de uma tabela onde condição = parâmetro

To tentando da seguinte maneira mas me da o erro list index out of bounds (0), 

Alguém tem um exemplo mais simples para se fazer?



with AdoqInsere do begin
close;
AdoqInsere.sql.clear;
AdoqInsere.sql.add ('Updade locacao set dt_devolucao = ' + DB6.Text + ' 
where cd_locacao = ' + Db4.Text + '');
AdoqInsere.Parameters.Items[0].value:= (db6.text);
AdoqInsere.parameters.Items[1].value:=db4.Text;
AdoqInsere.execsql;
ShowMessage(AdoqInsere.SQL.Text);
end;

[As partes desta mensagem que não continham texto foram removidas]



-- 
< 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] Rave

2006-03-08 Por tôpico Cadanos

Estou fazendo alguns testes com RAVE e encontrei o seguinte problema.
Utilizei a propriedade StoreRav para importar o relatório mas quando tento 
compilar dá:
[Error] RLINK32: Error opening file "..\..\Desktop\Cadastro\FOrmPrincipal.dfm"

O que estou fazendo de errado.?

Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 





Re: [delphi-br] Problemão.

2006-03-07 Por tôpico Cadanos


Paulo se podia me dar mais alguns detalhes..disso:

poderia me dar mais detalhes sobre isso porque meu formLogin não é chamado
através de um botão e sim carrega automaticamente...






lembro de ja ter apanhado com isso também

o que faço é no evento OnShow dar um click no botão que chama a tela de
login
é só aparece a tela de login, e é MDI com filho

procedure TfmPrincipal.FormShow(Sender: TObject);
begin
   Application.OnHint := ShowHint;

   EntrarComNovoUsurio1.Click
end;


Intel +

Paulo Alexsandro - Maceió/Alagoas
Programador - Delphi/NS Basic
http://dprogrammer.cetasistemas.com.br/forum - Participe desta Comunidade
Programação, Banco de dados, Design, Diversão, Etc.
EasyAmolx, controle de almoxarifado com fontes, D7 e DBExpress.
Timer Trab, Valorizando seu tempo

Meu Blog - http://dprogrammer.wordpress.com
AJAX, PHP, Tableless, Padrões Web, etc.

At 17:31 06/03/2006, you wrote:


>Pessoal, vê se alguém pode me ajudar nisso, pois ja faz um tempo que estou
>com este problema e não to conseguindo encontrar solução.
>
>To com o sistema quase todo pronto mas falta funcionar o maldito login.
>
>O problema é o seguinte preciso que a tela de login carregue antes do meu
>formprincipal(FORMMDI).
>Ou seja carregue a tela de login e o formprincipal não seja mostrada na
>tela. (Ja usei hide, visible) mas mesmo assim este formMDI carrega, devo
>estar informando o hide ou o visible no lugar errado, alguém me da a dica
>de como fazer.
>Este formmdi só deverá ser carregado depois que a senha validar (isso ja
>funciona), o problema é so não deixar aparecer o formprincipal...
>
>Cadanos


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< 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] Problemão.

2006-03-06 Por tôpico Cadanos


Pessoal, vê se alguém pode me ajudar nisso, pois ja faz um tempo que estou com 
este problema e não to conseguindo encontrar solução.

To com o sistema quase todo pronto mas falta funcionar o maldito login.

O problema é o seguinte preciso que a tela de login carregue antes do meu 
formprincipal(FORMMDI).
Ou seja carregue a tela de login e o formprincipal não seja mostrada na tela. 
(Ja usei hide, visible) mas mesmo assim este formMDI carrega, devo estar 
informando o hide ou o visible no lugar errado, alguém me da a dica de como 
fazer.
Este formmdi só deverá ser carregado depois que a senha validar (isso ja 
funciona), o problema é so não deixar aparecer o formprincipal...

Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 




Re: [delphi-br] erro

2006-03-06 Por tôpico Cadanos

Não por enquanto o formlogin continua aberto...


Vc cria e destroi o form de login antes do FORmPrincipal (MDIForm)?

Cadanos <[EMAIL PROTECTED]> escreveu:

Pessoal to com o seguinte problemão:


Criei um sistema que o FORmPrincipal (MDIForm) é a Tela onde está o Menu do
sistema e apartir dele abro os outros Form de cadastros etc (MDICHILD), até
ai tudo bem abro o sistema faço os cadastros e etc...

Só que agora precisei criar um form de login que abra antes do formprincipal
eu criei e deixei ele como meu FOrm Main, ele loga o usuario tudo certo mas
quando tento abrir qualquer tela de cadastro da o erro:

class einvalidoperation with message 'Cannot create form. no MDI forms are
currently active', o que pode estar acontecendo?

Qual seria a melhor maneira de se fazer a validação deste form de login que
deverá ser fechado assim que a validação seja feita...

Cadanos..





[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos










-
 Yahoo! Acesso Grátis
Internet rápida e grátis. Instale o discador agora!

[As partes desta mensagem que não continham texto foram removidas]





-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< 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

 




Re: [delphi-br] erro

2006-03-06 Por tôpico Cadanos


Walter,

Me diz uma coisa, neste caso, o meu formprincipal é um MDIForm pois preciso
que as telas de cadastros, consultas etc...não saiam dele... posso continuar
deixando assim e só o formlogin deixar como formnormal?

Cadanos



Crie um form nomal não MDI. coloque-o como primeiro form a ser criado e
exibido ao ser executado seu sistema. se a senha passar, você manda ocultar
ele e criar o form da tela principal com os menus e tudo mais. se a senha
não passar, ce manda a mensagem de aviso pro usuário e deixa a tela de login
e senha exibida.

geralmente eu faço isto a partira de um DM. no meu dpr, vai apenas a criação
do DM. no evento oncreate do DM, eu mando criar a tela de login e fazer a
validação. se passar, ela destroi a tela de login e crio a tela principal do
sistema. Se não passar, fica exibindo a tela de login por 3 vezes. Se o cara
errar 3 vezes, o sistema é fechado.


-Mensagem original-
De: delphi-br@yahoogrupos.com.br
Para: grupo2
Enviada em: 3/3/2006 10:34
Assunto: [delphi-br] erro



  Pessoal to com o seguinte problemão:


  Criei um sistema que o FORmPrincipal (MDIForm) é a Tela onde está o
Menu do sistema e apartir dele abro os outros Form de cadastros etc
(MDICHILD), até ai tudo bem abro o sistema faço os cadastros e etc...

  Só que agora precisei criar um form de login que abra antes do
formprincipal eu criei e deixei ele como meu FOrm Main, ele loga o
usuario tudo certo mas quando tento abrir qualquer tela de cadastro da o
erro:

  class einvalidoperation with message 'Cannot create form. no MDI forms
are currently active', o que pode estar acontecendo?

  Qual seria a melhor maneira de se fazer a validação deste form de
login que deverá ser fechado assim que a validação seja feita...

  Cadanos..





[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos








[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< 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

 




Re: [delphi-br] erro

2006-03-03 Por tôpico Cadanos

Poderia me dar mais detalhes de como trabalhar com uma tela splash?



- Original Message - 
From: "Luis Lopes" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 03, 2006 11:42 AM
Subject: Re: [delphi-br] erro


Eu fiz o seguinte:

Deixei o formPrincipal como MDIForm e como FormMain.
Uso uma tela de splash e crio o form de login no
active do form de splash.

Se o login foi bem sucedido, prossegue. Senão,
interrompe a aplicação (Application.Terminate).

[]´s

Luis Alberto.

--- Giovani Benedetti Penha <[EMAIL PROTECTED]>
escreveu:

> Você tem que deixar o formPrincipal como MDIForm e
> como FormMain. Ele
> deve ser o primeiro form a ser criado na sua
> aplicação (confira no .dpr
> do seu projeto). Você pode criá-lo com
> Visible=false, então criar o
> formLogin. Se o login for bem sucedido, você dá um
> Show no
> formPrincipal. Senão, fecha a aplicação.
>
> Cadanos escreveu:
> >   Pessoal to com o seguinte problemão:
> >
> >
> >   Criei um sistema que o FORmPrincipal (MDIForm) é
> a Tela onde está o Menu do sistema e apartir dele
> abro os outros Form de cadastros etc (MDICHILD), até
> ai tudo bem abro o sistema faço os cadastros e
> etc...
> >
> >   Só que agora precisei criar um form de login que
> abra antes do formprincipal eu criei e deixei ele
> como meu FOrm Main, ele loga o usuario tudo certo
> mas quando tento abrir qualquer tela de cadastro da
> o erro:
> >
> >   class einvalidoperation with message 'Cannot
> create form. no MDI forms are currently active', o
> que pode estar acontecendo?
> >
> >   Qual seria a melhor maneira de se fazer a
> validação deste form de login que deverá ser fechado
> assim que a validação seja feita...
> >
> >   Cadanos..
> >
> >
> >
> >
> >
> > [As partes desta mensagem que não continham texto
> foram removidas]
> >
> >
> >
> >
>
> -- 
>
> *Giovani Benedetti Penha*
> Coordenador de Projetos de TI
> Veltrac Rastreadores de Veículos
> Email: [EMAIL PROTECTED]
>
>
>
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
> MENSAGEM >>>>>
>
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> [EMAIL PROTECTED]
>
> Links do Yahoo! Grupos
>
>
>
> http://br.yahoo.com/info/utos.html
>
>
>
>
>


  Luis Alberto
  Belo Horizonte - MG





___
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos










-- 
<<<<< 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

 




Re: [delphi-br] erro

2006-03-03 Por tôpico Cadanos
Giovani acho que não entendi direito, fiz da seguinte forma

Deixei o formPrincipal como MDIFORM e MAIN Form, blz.
O FormLogin que deveria ser carregado antes que o formprincipal defini como
FormChild, certo?
Apliquei no formprincipal visable = False;
Mas quando compilo a aplicação sempre aparece o formprincipal e no caso
deveria aparecer o formlogin..





From: "Giovani Benedetti Penha" <[EMAIL PROTECTED]>
To: 
Sent: Friday, March 03, 2006 10:42 AM
Subject: Re: [delphi-br] erro


Você tem que deixar o formPrincipal como MDIForm e como FormMain. Ele
deve ser o primeiro form a ser criado na sua aplicação (confira no .dpr
do seu projeto). Você pode criá-lo com Visible=false, então criar o
formLogin. Se o login for bem sucedido, você dá um Show no
formPrincipal. Senão, fecha a aplicação.

Cadanos escreveu:
>   Pessoal to com o seguinte problemão:
>
>
>   Criei um sistema que o FORmPrincipal (MDIForm) é a Tela onde está o Menu
do sistema e apartir dele abro os outros Form de cadastros etc (MDICHILD),
até ai tudo bem abro o sistema faço os cadastros e etc...
>
>   Só que agora precisei criar um form de login que abra antes do
formprincipal eu criei e deixei ele como meu FOrm Main, ele loga o usuario
tudo certo mas quando tento abrir qualquer tela de cadastro da o erro:
>
>   class einvalidoperation with message 'Cannot create form. no MDI forms
are currently active', o que pode estar acontecendo?
>
>   Qual seria a melhor maneira de se fazer a validação deste form de login
que deverá ser fechado assim que a validação seja feita...
>
>   Cadanos..
>
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>

-- 

*Giovani Benedetti Penha*
Coordenador de Projetos de TI
Veltrac Rastreadores de Veículos
Email: [EMAIL PROTECTED]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos









-- 
<<<<< 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] erro

2006-03-03 Por tôpico Cadanos


  Pessoal to com o seguinte problemão:


  Criei um sistema que o FORmPrincipal (MDIForm) é a Tela onde está o Menu do 
sistema e apartir dele abro os outros Form de cadastros etc (MDICHILD), até ai 
tudo bem abro o sistema faço os cadastros e etc...

  Só que agora precisei criar um form de login que abra antes do formprincipal 
eu criei e deixei ele como meu FOrm Main, ele loga o usuario tudo certo mas 
quando tento abrir qualquer tela de cadastro da o erro:

  class einvalidoperation with message 'Cannot create form. no MDI forms are 
currently active', o que pode estar acontecendo?

  Qual seria a melhor maneira de se fazer a validação deste form de login que 
deverá ser fechado assim que a validação seja feita...

  Cadanos..





[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 




Re: [delphi-br] Comparar login e senha

2006-03-02 Por tôpico Cadanos


Valeu Elazar.era isso mesmo...



Cadanos;

seria isso.


Atenciosamente;
Elazar

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Cadanos
Enviada em: quinta-feira, 2 de março de 2006 14:06
Para: grupo2
Assunto: [delphi-br] Comparar login e senha


{Tabela de usuarios por exemplo com o campo de nome e senha }

USUARIOS
 NOME
 SENHA

Sql do dataset.

SELECT COUNT(NOME) CONTADOR
FROM USUARIOS
WHERE NOME = :NOME
  AND SENHA = :SENHA

ai voce pede para o usuario informar o login e senha em um edit e usa o
parambyname para ajustar os dados acima


Ex.

DataSet.ParamByName('NOME').AsString := edtNome.Text;



NO Programa verifica usando
 if DataSet.FieldByName('CONTADOR').AsInteger = 0 then
ShowMessage('Login Invalido')
  else
ShowMessage('Login Valido');

Pessoal tem como eu comparar um campo de usuário e senha e retornat true
ou false, através de um dataset?
Ou seria melhor criar um procedimento?

Alguém pode me dar um exemplo?


Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE





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 Termos do Serviço
do Yahoo!.



___
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com


-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



Links do Yahoo! Grupos










-- 
<<<<< 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] Comparar login e senha

2006-03-02 Por tôpico Cadanos


Pessoal tem como eu comparar um campo de usuário e senha e retornat true ou 
false, através de um dataset?
Ou seria melhor criar um procedimento?

Alguém pode me dar um exemplo?


Cadanos

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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

 




Re: [delphi-br] Limpar os DBEdit's

2006-03-02 Por tôpico Cadanos
Bom Dia Leonardo.

Eu uso no Events OnCreate do Form o clear.
Desta maneira os campos são carregados em branco
Ex.

DBEdit1.clear;
DBEdit2.clear;


To: 
Sent: Wednesday, March 01, 2006 4:24 PM
Subject: Re: [delphi-br] Limpar os DBEdit's


Amigos
Usando DBEdit's ao chamar a janela de cadastro os dados ficam carregados?
Como vocês trabalham nessa situação?
Obs.: A minha intenção é deixar os DBEdit's em branco.
Obrigado


Rubem Nascimento da Rocha escreveu:
>
> O único momento em que se pode dizer que os DBEdits são 'limpos' é
> quando vc
> inclui um novo registro ao dataset. Neste momento, como temos um registro
> vazio, e os DBEdits mostram o conteúdo dos campos de um dataset, todos os
> DBEdits mostram-se vazios.
>
> Componentes TDBEdit, bem como outros componentes data-aware, não podem
> ser
> simplesmente limpos, como acontece em um TEdit. Isto pq o TEdit não
> possui
> um vínculo com um dataset, e toda a operação para alimentar um dado
> dentro
> do mesmo deve ser feito pelo programador, assim como limpar seu texto
> (Edit1.Text := '').
>
> Se quiser limpar o conteúdo de DBEdits, das duas uma: 1) Na inclusão
> de um
> novo registro, ele faz isso de forma implícita, ou (complementando); 2)
> Atribuir o valor NULL ou uma string nula para o campo associado ao
> DBEdit em
> questão.
>
> Sds.
>
> >From: "Leonardo Mascarenhas" <[EMAIL PROTECTED]>
> >Reply-To: delphi-br@yahoogrupos.com.br
> >To: 
> >Subject: [delphi-br] Limpar os DBEdit's
> >Date: Wed, 1 Mar 2006 14:55:26 -0300
> >
> >Olá amigos
> >
> >Estou usando os componentes dbExpress com DBEdit's ao gravar ou
> cancelar o
> >registro os DBEdit's não são limpos, qual atitude correta para limpar os
> >DBEdit's?
> >
> >[As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> _
> MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br
>
>
>
> -- 
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>
>
> *Yahoo! Grupos, um serviço oferecido por:*
> PUBLICIDADE
>
>
> 
> *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 Termos do
>   Serviço do Yahoo! .
>
>


___
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com




-- 
< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >



Links do Yahoo! Grupos









-- 
< 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