RES: [delphi-br] Dúvida! Existe algum WebService da SEFAZ para obter dados dos contribuintes?

[Rubem Rocha]

http://www.consultacpf.com

WebService de acesso via modelo pré-pago que permite consultar informações
tanto de pessoas jurídicas como pessoas físicas. A empresa é parceira
tecnológica (distribuidor nacional autorizado) do SERASA. A empresa dispõe
ainda de um canal para desenvolvedores (http://dn.consultacpf.com) que
queiram integrar suas aplicações com o WebService.

Sds.

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de felipe govoni
Enviada em: sexta-feira, 20 de agosto de 2010 09:51
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Dúvida! Existe algum WebService da SEFAZ para obter
dados dos contribuintes?

eu acredito que a cdl tenha um serviço parecido, se informe com a cdl de sua
cidade.




Em 20 de agosto de 2010 10:48, Fellipe Henrique
escreveu:

>
>
> Bom dia amigos, um cliente meu, está querendo que ao digitar o CPF ou
CNPJ,
> eu já traga as informações da pessoa... pela NF-e eu consigo pegar pelo
> CNPJ, mas somente empresas que utilizam NFe, pessoas físicas eu não
> consigo.
> Ouvi dizer que o SERASA tem essa informação, que se pagaria uma taxa para
> isso... é verdade? Alguém já fez algo parecido?
>
> Att.
>
> --
> _
>
> T.·.F.·.A.·.
> Fellipe Henrique
> http://blogs.digitumsoft.com.br/fellipeh
> --
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


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





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

Re: [delphi-br] Dúvida! Existe algum WebService da SEFAZ para obter dados dos contribuintes?

[felipe govoni]

eu acredito que a cdl tenha um serviço parecido, se informe com a cdl de sua
cidade.




Em 20 de agosto de 2010 10:48, Fellipe Henrique escreveu:

>
>
> Bom dia amigos, um cliente meu, está querendo que ao digitar o CPF ou CNPJ,
> eu já traga as informações da pessoa... pela NF-e eu consigo pegar pelo
> CNPJ, mas somente empresas que utilizam NFe, pessoas físicas eu não
> consigo.
> Ouvi dizer que o SERASA tem essa informação, que se pagaria uma taxa para
> isso... é verdade? Alguém já fez algo parecido?
>
> Att.
>
> --
> _
>
> T.·.F.·.A.·.
> Fellipe Henrique
> http://blogs.digitumsoft.com.br/fellipeh
> --
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Felipe Govoni
-
GOVONI Sistemas
Fone 8472-8718
www.govoni.com.br


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Dúvida! Existe algum WebService da SEFAZ para obter dados dos contribuintes?

[Fellipe Henrique]

Bom dia amigos, um cliente meu, está querendo que ao digitar o CPF ou CNPJ,
eu já traga as informações da pessoa... pela NF-e eu consigo pegar pelo
CNPJ, mas somente empresas que utilizam NFe, pessoas físicas eu não consigo.
Ouvi dizer que o SERASA tem essa informação, que se pagaria uma taxa para
isso... é verdade? Alguém já fez algo parecido?


Att.

-- 
_

T.·.F.·.A.·.
Fellipe Henrique
http://blogs.digitumsoft.com.br/fellipeh
---


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

Re: [delphi-br] Dúvida com StringGrid

[Domingos]

Ok, funcionou

Muito obrigado Fabrício e os demais

[]'s

Em 14 de julho de 2010 14:16, Fabricio Colombo <
fabricio.colombo@gmail.com> escreveu:

> crie um método conforme abaixo, e associe ao stringgrid dinamicamente
>
> procedure TForm1.StringGridDrawCell(Sender: TObject; ACol, ARow:
> Integer;Rect: TRect; State: TGridDrawState);
> begin
>  with TStringGrid(Sender) do
>  begin
>if (ACol > FixedCols-1) and (ARow > FixedRows-1) then
>begin
>  if Odd(ARow) then
>Canvas.Brush.Color := clYellow
>  else
>Canvas.Brush.Color := clWhite;
>
>  Canvas.FillRect(Rect);
>end;
>  end;
> end;
>
>
> var
>  vStringGrid: TStringGrid;
> begin
>  vStringGrid := TStringGrid.Create(Self);
>  vStringGrid.Parent := Self;
>  vStringGrid.OnDrawCell := StringGridDrawCell;
>
> Em 14 de julho de 2010 10:06, Domingos  escreveu:
>
> >
> >
> > É verdade, havia me esquecido de Parent da classe TComponent, né?
> >
> > Funcionou tudo bem, agora aproveitar a deixa, vocês sabem uma maneira
> > eficiente de zebrar os Grids criados em tempo de execução?
> >
> > Em 13 de julho de 2010 22:21, Fabricio Colombo <
> > fabricio.colombo@gmail.com >
> > escreveu:
> >
> >
> > > Vc tem que definir o Parent do TStringGrid criado.
> > >
> > > Em 13 de julho de 2010 10:32, Domingos  >
> > escreveu:
> > >
> > > >
> > > >
> > > > Olá, bom dia a todos
> > > >
> > > > Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids
> em
> > > um
> > > > form, eu consigo criar um Array de StringGrids e setando o tamanho
> > > executar
> > > > o Create da classe TStringGrid, porém eles não são exibidos no form,
> > > alguém
> > > > pode me ajudar?
> > > >
> > > > Eu utilizo Delphi 6
> > > >
> > > > Obrigado
> > > >
> > > > --
> > > > Att,
> > > > Domingos J. M. de Souza
> > > > GTalk / MSN: domingosp...@gmail.com  > > 40gmail.com>
> >
> > > > Skype: domingospawn
> > > >
> > > > "Imagination is more important than knowledge." - Albert Einstein
> > > >
> > > > [As partes desta mensagem que não continham texto foram removidas]
> > > >
> > > >
> > > >
> > >
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> > >
> > >
> > > 
> > >
> > > --
> >
> > > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> > >
> > >
> > >
> > >
> >
> > --
> > Att,
> > Domingos J. M. de Souza
> > GTalk / MSN: domingosp...@gmail.com 
> > Skype: domingospawn
> >
> > "Imagination is more important than knowledge." - Albert Einstein
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>


-- 
Att,
Domingos J. M. de Souza
GTalk / MSN: domingosp...@gmail.com
Skype: domingospawn

"Imagination is more important than knowledge."  - Albert Einstein


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

Re: [delphi-br] Dúvida com StringGrid

[Fabricio Colombo]

crie um método conforme abaixo, e associe ao stringgrid dinamicamente

procedure TForm1.StringGridDrawCell(Sender: TObject; ACol, ARow:
Integer;Rect: TRect; State: TGridDrawState);
begin
  with TStringGrid(Sender) do
  begin
if (ACol > FixedCols-1) and (ARow > FixedRows-1) then
begin
  if Odd(ARow) then
Canvas.Brush.Color := clYellow
  else
Canvas.Brush.Color := clWhite;

  Canvas.FillRect(Rect);
end;
  end;
end;


var
  vStringGrid: TStringGrid;
begin
  vStringGrid := TStringGrid.Create(Self);
  vStringGrid.Parent := Self;
  vStringGrid.OnDrawCell := StringGridDrawCell;

Em 14 de julho de 2010 10:06, Domingos  escreveu:

>
>
> É verdade, havia me esquecido de Parent da classe TComponent, né?
>
> Funcionou tudo bem, agora aproveitar a deixa, vocês sabem uma maneira
> eficiente de zebrar os Grids criados em tempo de execução?
>
> Em 13 de julho de 2010 22:21, Fabricio Colombo <
> fabricio.colombo@gmail.com >
> escreveu:
>
>
> > Vc tem que definir o Parent do TStringGrid criado.
> >
> > Em 13 de julho de 2010 10:32, Domingos 
> > >
> escreveu:
> >
> > >
> > >
> > > Olá, bom dia a todos
> > >
> > > Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids em
> > um
> > > form, eu consigo criar um Array de StringGrids e setando o tamanho
> > executar
> > > o Create da classe TStringGrid, porém eles não são exibidos no form,
> > alguém
> > > pode me ajudar?
> > >
> > > Eu utilizo Delphi 6
> > >
> > > Obrigado
> > >
> > > --
> > > Att,
> > > Domingos J. M. de Souza
> > > GTalk / MSN: domingosp...@gmail.com 
> > >  40gmail.com>
>
> > > Skype: domingospawn
> > >
> > > "Imagination is more important than knowledge." - Albert Einstein
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> > >
> > >
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > 
> >
> > --
>
> > < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
> >
> >
> >
> >
>
> --
> Att,
> Domingos J. M. de Souza
> GTalk / MSN: domingosp...@gmail.com 
> Skype: domingospawn
>
> "Imagination is more important than knowledge." - Albert Einstein
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida com StringGrid

[Domingos]

É verdade, havia me esquecido de Parent da classe TComponent, né?

   Funcionou tudo bem, agora aproveitar a deixa, vocês sabem uma maneira
eficiente de zebrar os Grids criados em tempo de execução?

Em 13 de julho de 2010 22:21, Fabricio Colombo <
fabricio.colombo@gmail.com> escreveu:

> Vc tem que definir o Parent do TStringGrid criado.
>
> Em 13 de julho de 2010 10:32, Domingos  escreveu:
>
> >
> >
> > Olá, bom dia a todos
> >
> > Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids em
> um
> > form, eu consigo criar um Array de StringGrids e setando o tamanho
> executar
> > o Create da classe TStringGrid, porém eles não são exibidos no form,
> alguém
> > pode me ajudar?
> >
> > Eu utilizo Delphi 6
> >
> > Obrigado
> >
> > --
> > Att,
> > Domingos J. M. de Souza
> > GTalk / MSN: domingosp...@gmail.com 
> > Skype: domingospawn
> >
> > "Imagination is more important than knowledge." - Albert Einstein
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> < FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >
>
>
>
>


-- 
Att,
Domingos J. M. de Souza
GTalk / MSN: domingosp...@gmail.com
Skype: domingospawn

"Imagination is more important than knowledge."  - Albert Einstein


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

Re: [delphi-br] Dúvida com StringGrid

[Fabricio Colombo]

Vc tem que definir o Parent do TStringGrid criado.

Em 13 de julho de 2010 10:32, Domingos  escreveu:

>
>
> Olá, bom dia a todos
>
> Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids em um
> form, eu consigo criar um Array de StringGrids e setando o tamanho executar
> o Create da classe TStringGrid, porém eles não são exibidos no form, alguém
> pode me ajudar?
>
> Eu utilizo Delphi 6
>
> Obrigado
>
> --
> Att,
> Domingos J. M. de Souza
> GTalk / MSN: domingosp...@gmail.com 
> Skype: domingospawn
>
> "Imagination is more important than knowledge." - Albert Einstein
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida com StringGrid

[Dirlei Dionísio]

Deve estar faltando configurar a propriedade Parent dos StringGrids.


--
Dirlei Dionísio
Novo artigo: 5 dicas para aproveitar sua inteligência e criatividade
http://MaisQueBomCodigo.blogspot.com


Em 13 de julho de 2010 10:32, Domingos  escreveu:

>
>
> Olá, bom dia a todos
>
> Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids em um
> form, eu consigo criar um Array de StringGrids e setando o tamanho executar
> o Create da classe TStringGrid, porém eles não são exibidos no form, alguém
> pode me ajudar?
>
> Eu utilizo Delphi 6
>
> Obrigado
>
> --
> Att,
> Domingos J. M. de Souza
> GTalk / MSN: domingosp...@gmail.com 
> Skype: domingospawn
>
> "Imagination is more important than knowledge." - Albert Einstein
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida com StringGrid

[Alisson]

Eu não entendi o que você quis dizer com "setando o tamanho executar o Create 
da classe TStringGrid". Mas, de qualquer maneira talvez o exemplo abaixo possa 
ajudar.




unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, StdCtrls;

type
  TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
  private
{ Private declarations }
Grids : Array of TStringGrid;
  public
{ Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
   SetLength(Grids, Length(Grids) + 1);
   Grids[Length(Grids)-1] := TStringGrid.Create(Self);
   Grids[Length(Grids)-1].Parent := Self;
   Grids[Length(Grids)-1].Top := Length(Grids) * 50;
   Grids[Length(Grids)-1].Left := Length(Grids) * 50;
end;

end.



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

[delphi-br] Dúvida com StringGrid

[Domingos]

Olá, bom dia a todos

Estou com a seguinte dúvida, preciso criar dinamicamente StringGrids em um
form, eu consigo criar um Array de StringGrids e setando o tamanho executar
o Create da classe TStringGrid, porém eles não são exibidos no form, alguém
pode me ajudar?


Eu utilizo Delphi 6


Obrigado

-- 
Att,
Domingos J. M. de Souza
GTalk / MSN: domingosp...@gmail.com
Skype: domingospawn

"Imagination is more important than knowledge."  - Albert Einstein


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

[delphi-br] Dúvida Executável

[Wagne®_Fix]

Olá pessoal boa tarde,

Quero saber se há possibilidades de a pessoa abrir o programa por um link de 
e-mail já informando o login do usuário por exemplo:

-
E-mail

Link Programa: c:/Programa/Meuprograma.exe wagner.login

-

Ao clicar nesse link eu identificatia o wagner.login para não necessitar da 
pessoa fazer login e senha...

Obrigado,

Wagner


  

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

Re: [delphi-br] Dúvida Simples - Texto em MEMO

[Ricardo Augusto]

Não há como. Multiline strings não são suportadas no Delphi ainda.
Existem alguns experts para a IDE que facilitam trabalhar com esse
tipo de inserção, mas de qq modo, no final, vc vai ter algo como:

mem1.text := '#include '#13 +
   '#include '#13 +...



Em 26 de março de 2010 11:04, Augusto Nascimento
 escreveu:
>
>
>
> Gostaria de saber como posso colocar um texto em um Memo;
>
> assim:
>
> memo1.text :=
>
> //aqui é o texto todo, um código em C
> // O Objetivo desse programa em Delphi é criar um menu com todos os
> programas desenvolvidos nas aulas
>
> >
>
> #include 
>
> #include 
>
> #define p printf
>
> #define s scanf
>
> > int main() {
>
> int num;
>
> p("\tInforme um numero inteiro com 3 algarismos (ex:123): ");
>
> s("%d", &num);
>
> p("\nCentena: %d\n\n", num / 100);
>
> num %= 100;
>
> p("\nDezena: %d\n\n", num / 10);
>
> num %= 10;
>
> p("\nUnidade: %d\n\n", num);
>
> getche();
>
> return 0;
>
> > }
>
> Como eu faço para não precisar colocar:
> "memo1.lines.add("#include");
>
> "memo1.lines.add("#include");
>
> E inserir o texto inteiro de uma vez?
>
> Obrigado
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 


--
_
Ricardo Augusto


"Muitos dos problemas do mundo devem-se ao fato de que os ignorantes estão
completamente seguros e os inteligentes cheios de dúvidas" (Bertrand Russel)




-- 
< 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Dúvida Simples - Texto em MEMO

[Augusto Nascimento]

Gostaria de saber como posso colocar um texto em um Memo;

assim:


memo1.text :=


//aqui é o texto todo, um código em C
// O Objetivo desse programa em Delphi é criar um menu com todos os
programas desenvolvidos nas aulas

>

#include 

#include 

#define p printf

#define s scanf


> int main() {

int num;

p("\tInforme um numero inteiro com 3 algarismos (ex:123): ");

s("%d", &num);

p("\nCentena: %d\n\n", num / 100);

num %= 100;

p("\nDezena: %d\n\n", num / 10);

num %= 10;

p("\nUnidade: %d\n\n", num);

getche();

return 0;


> }


Como eu faço para não precisar colocar:
"memo1.lines.add("#include");

"memo1.lines.add("#include");

E inserir o texto inteiro de uma vez?

Obrigado


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

Re: [delphi-br] Dúvida sobre herança

[Vinicius Santos]

Em 10/02/2010 07:50, Samuel M. Basso escreveu:
> Amigo eu tenho o sistema totalmente em herança desde metodos até da parte
> visual. É muito usado e faz sentido sim Vinicius. Pensa comigo vou tentar te
> explicar me maneira clara.
>
> Em um sistema que vc tem varios cadastros com Codigo e Descrição apenas dois
> campos (situando um exemplo) vc cria essa unit e form da maneira que quiser
> coloca todos dbedit, botoes, metodos tais como ao fechar a tela fazer
> pergunta se realmente desejar fechar, validaçao dos campos caso nao
> preenchimento e pronto.
>
> Todos outros cadastros vc herda desse que criou e todos esses metodos que
> criou nao precisam ser adicionados, poupando muito tempo de programaçao. Se
> um dia encontrar um erro se o erro é da classe pai nao precisa mudar em
> todos os cadastros como é de costume dos programadores simplismente muda em
> um só lugar e esta resolvido. Por isso considero de muito sentido usar
> heranças.
>
Claro que faz sentido usar heranças 

Não faz sentido herdar um método e não querer que ele execute na classe 
ancestral.
Se vc não quer executar o metódo na classe ancestral não o herde, herde 
apenas a classe.

Acho que agora me expliquei melhor. ;)

Re: [delphi-br] Dúvida sobre herança

[Daniel Hiromy]

Obrigado Dirlei. Vou pesquisar à respeito do Strategy

Em 10 de fevereiro de 2010 09:14, Dirlei  escreveu:

>
>
> Daniel,
>
> Isso pode ser um sinal de que o design desse trecho do seu projeto OO
> precisa ser alterado. Talvez a implementação do método que está na
> classe avô deva ser transferida para outra classe. Se te interessar, dê
> uma olhada no Padrão de projeto Strategy. Acredito que seja aplicável no
> seu caso.
>
> [ ]'s
> Dirlei.
>
> Daniel Hiromy escreveu:
>
> >
> >
> > Bom dia pessoal.
> > Como faço para extender um método e chamar só o método da classe avô?
> >
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida sobre herança

[Daniel Hiromy]

Bom dia pessoal.
Desculpem minha pergunta que não foi clara.
Eu tenho uma classe A com um método X.
Tenho uma segunda classe B que herda de A e estende o método X.
Depois crio uma classe C que herda de B, mas que estende apenas o método X
de A, desconsiderando a implementação de B.
Queria saber se isso é possível.


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

Re: [delphi-br] Dúvida sobre herança

[Dirlei]

Daniel,

Isso pode ser um sinal de que o design desse trecho do seu projeto OO 
precisa ser alterado. Talvez a implementação do método que está na 
classe avô deva ser transferida para outra classe. Se te interessar, dê 
uma olhada no Padrão de projeto Strategy. Acredito que seja aplicável no 
seu caso.

[ ]'s
Dirlei.

Daniel Hiromy escreveu:
>  
>
> Bom dia pessoal.
> Como faço para extender um método e chamar só o método da classe avô?
>

Re: [delphi-br] Dúvida sobre herança

[Samuel M. Basso]

Amigo eu tenho o sistema totalmente em herança desde metodos até da parte
visual. É muito usado e faz sentido sim Vinicius. Pensa comigo vou tentar te
explicar me maneira clara.

Em um sistema que vc tem varios cadastros com Codigo e Descrição apenas dois
campos (situando um exemplo) vc cria essa unit e form da maneira que quiser
coloca todos dbedit, botoes, metodos tais como ao fechar a tela fazer
pergunta se realmente desejar fechar, validaçao dos campos caso nao
preenchimento e pronto.

Todos outros cadastros vc herda desse que criou e todos esses metodos que
criou nao precisam ser adicionados, poupando muito tempo de programaçao. Se
um dia encontrar um erro se o erro é da classe pai nao precisa mudar em
todos os cadastros como é de costume dos programadores simplismente muda em
um só lugar e esta resolvido. Por isso considero de muito sentido usar
heranças.

2010/2/9 Vinicius Santos 

>
>
> Em 09/02/2010 10:44, Daniel Hiromy escreveu:
> > Como faço para extender um método e chamar só o método da classe avô?
>
> Simplesmente não faz sentido fazer isso.
>
> Faça a herança da classe, e crie um novo método, já que não quer chamar
> o ancestral.
>
> Ahhh, claro. Para não chamar o método da classe ancestral, basta remover
> o inherited.
>  
>



-- 
Atenciosamente,

Samuel M. Basso
Cel: (54) 8135-3723
Skype: samuelbasso
E-mail/MSN: samuelba...@gmail.com
Web site: www.samuelbasso.com


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida sobre herança

[Vinicius Santos]

Em 09/02/2010 10:44, Daniel Hiromy escreveu:
> Como faço para extender um método e chamar só o método da classe avô?

Simplesmente não faz sentido fazer isso.

Faça a herança da classe, e crie um novo método, já que não quer chamar 
o ancestral.


Ahhh, claro. Para não chamar o método da classe ancestral, basta remover 
o inherited.

[delphi-br] Dúvida sobre herança

[Daniel Hiromy]

Bom dia pessoal.
Como faço para extender um método e chamar só o método da classe avô?


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

[delphi-br] Dúvida IDE Delphi 2006

[Alessandro]

Dúvida que não consigo descobrir, e que eu não gosto.


No Delphi 2006 qdo.abro um projeto, num módulo qualquer, tem lá um SQLQUERY, 
dou um duplo clique abre-se o FIELDEDITOR do componente. Pois bem, crio os 
campos dentro do FieldEditor, logo em seguido pressiono F12 para ir para o 
código do projeto, e esta caixa do FieldEditor fica sobre o código. Alguém sabe 
da propriedade que habilita ou desabilita isto? Tem algo a ver com GExperts, 
pois tenho instalado isto no Delphi 2006.

O que eu quero é que se pressionar o F12 o FieldEditor ou qualquer outra caixa 
de diálogo (tela de parâmetros do SQLQuery, ClientDataSet...) fique atrás do 
código ou tela do projeto. Conseguindo voltar para estas caixas de diálogo pela 
opção Windows do Delphi.

É que troquei de computador e neste ocorre este problema, no micro antigo isto 
não acontecia. Já verifiquei as propriedades em Tools-Options, e não consigo 
mudar isto.

Espero que alguém possa me ajudar, obrigado a todos.
Alessandro


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida com Data Module

[Diego Garcia]

Acho que a maneira mais correta é se referenciar ao Connection que já esta
ativo, evitando assim de ficar conectando varias vezes no banco. pra isso
você vai ter que adicionar a referencia do data module principal nesse data
module novo.

abs.

*Diego Garcia*
Twitter: http://www.twitter.com/drgarcia1986


2009/12/23 Darkzad 

>
>
> Olá pessoal,
>
> Criei um Data Module para todas as tabelas Cadastrais do sistema e
> Adicionei um SQLConnection para conexao com o banco.
>
> Criei outro Data Module só para o Modulo que estou fazendo. A minha
> dúvida é a seguinte eu tenho que adicionar a unit do Outro Data Module
> ou eu posso adicionar outro SQLConnection no novo Data Module?
>
> Desde já agraço
> DarkZad
>
> __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta.messenger.yahoo.com/
>
>  
>


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

[delphi-br] Dúvida com Data Module

[Darkzad]

Olá pessoal,

Criei um Data Module para todas as tabelas Cadastrais do sistema e 
Adicionei um SQLConnection para conexao com o banco.

Criei outro Data Module só para o Modulo que estou fazendo. A minha 
dúvida é a seguinte eu tenho que adicionar a unit do Outro Data Module 
ou eu posso adicionar outro SQLConnection no novo Data Module?


Desde já agraço
DarkZad





__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] Dúvida com Sorteio (Random)

[Silvio Clecio]

Ricardo César Cardoso escreveu:
> Eu ia esperar pra comprovar amanhã, quando ia testar no Delphi, mas acho 
> que usando assim como passado, o resultado sempre será o mesmo. Se não 
> me engano, Randomize é somente um inicializador do gerador de números 
> randômicos, por isso deve ser chamado apenas uma vez, como bem disse o João.

Eu fiquei sabendo disso agora (chamar só na inicialização).

Fiz um teste para embaralhar uns números, e queria que numa contagem de 
0 a 500 ele embaralhasse até acabar as combinações possíveis, ex:

Certo:
1 - 27
2 - 63
3 - 7
4 - 500
5 - 339

Errado:
1 - 27
2 - 500
3 - 7
4 - 500 <<-- repetiu
5 - 339

Queria que, quando ele tivesse esgotado todas as combinações possíveis 
(de 0 a 500), acionasse um LED pro cara resetar a contagem; solução: 
salvar em uma variável os números que já foram exibidos, e não deixar o 
laço "soltar" outro número igual. (posso estar enganado, mas pelo menos 
nos testes que fiz, se não fosse esse "macete" os números iam se repetir 
muitas vezes).

Quem tiver uma solução mais simples, por gentileza, um CTRL+V aqui na 
lista e outro aqui - [http://pastebin.com/] :)

> Atte,
> Ricardo.
> 
> 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
> 
> 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
> compreendida.
> 
> 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--
Silvio Clecio
--
Blog estilo mural - silvioclecio.blogspot.com
Twitter - twitter.com/silvioprog
--
programmer ObjectPascal - silvioprog.blogspot.com
--
"A consciência é o melhor livro de moral que temos; e é, certamente, o 
que mais devemos consultar. Blaise Pascal.

Re: [delphi-br] Dúvida com Sorteio (Random)

[Ricardo César Cardoso]

Eu ia esperar pra comprovar amanhã, quando ia testar no Delphi, mas acho que 
usando assim como passado, o resultado sempre será o mesmo. Se não me engano, 
Randomize é somente um inicializador do gerador de números randômicos, por isso 
deve ser chamado apenas uma vez, como bem disse o João.

Atte,
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em seg, 7/12/09, Joao Morais  escreveu:

De: Joao Morais 
Assunto: Re: [delphi-br] Dúvida com Sorteio (Random)
Para: delphi-br@yahoogrupos.com.br
Data: Segunda-feira, 7 de Dezembro de 2009, 22:26







 



  



  
  
  2009/12/7 Leandro :

> esse nao eh um metodo bom para se gerar um randomico.. pois a função random

> na verdade nao eh randomica rsrs dificil de entender ne!..

>

> faça o teste colocando:

>

> result := '';

> for I := 1 to VTamanho do

> Begin

>     Randomize;

>     result := result + Copy(VMatriz, random(Length( VMatriz)) ,1);

> End;



Use o randomize uma única vez, fora do laço. Melhor ainda se for

executado uma única vez na inicialização do programa.



Joao Morais




 





 



  






  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida com Sorteio (Random)

[Joao Morais]

2009/12/7 Leandro :
> esse nao eh um metodo bom para se gerar um randomico.. pois a função random
> na verdade nao eh randomica rsrs dificil de entender ne!..
>
> faça o teste colocando:
>
> result := '';
> for I := 1 to VTamanho do
> Begin
>     Randomize;
>     result := result + Copy(VMatriz,random(Length(VMatriz)),1);
> End;

Use o randomize uma única vez, fora do laço. Melhor ainda se for
executado uma única vez na inicialização do programa.

Joao Morais

Re: [delphi-br] Dúvida com Sorteio (Random)

[Leandro]

esse nao eh um metodo bom para se gerar um randomico.. pois a função random
na verdade nao eh randomica rsrs dificil de entender ne!..

faça o teste colocando:

result := '';
for I := 1 to VTamanho do
Begin
 Randomize;
 result := result + Copy(VMatriz,random(Length(VMatriz)),1);
End;

end;



2009/12/7 valdirdill 

>
>
> Olá,
>
> Tenho a função abaixo para gerar um código que utilizo no sistema.
> Pela lógica, se chamarmos a função assim:
> "GeraCodigoAlfaNumericoAleatorio(10);" o retorno deveria ser sempre
> diferente. Poderia até repetir, mas a chance disso acontecer, seria tipo uma
> em um bilhão?
>
> O problema: em 610 códigos gerados, o código 6HGX564TQP já se repetiu 23
> vezes. Para isso ocorrer, o resutaldo do "random(Length(VMatriz))" teria ser
> 6-18-17-34-5-6-4-30-27-26. Qual a chance desse sorteio ocorrer exatamente
> igual e nessa mesma ordem? Pois, em 610 tentativas, ocorreu 23 vezes. A
> execução é feita sempre em máquinas diferentes (do usuário), mas mesmo
> assim, isso não poderia ocorrer, poderia?
>
> Qualquer dica ajuda. Obrigado
>
> function GeraCodigoAlfaNumericoAleatorio(VTamanho : Integer) : string;
> Var
> I : Integer;
> VMatriz : String;
> begin
> VMatriz := '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'
>
> result := '';
> for I := 1 to VTamanho do
> result := result + Copy(VMatriz,random(Length(VMatriz)),1);
> end;
>
>  
>



-- 
Leandro, MuTukA


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida com Sorteio (Random)

[JNP - NetSite]

procedure Gera: String;
var
   c: Char;
   s: String;
begin

   Randomize;
   s:='';
   while true do begin
  c:=char(random(91));
  if c in ['0'..'9'] then
 s:=s + c
  else if c in ['A'..'Z'] then
 s:=s + c;

  if length(s) = 6 then
 break;
   end;
end;

Re: [delphi-br] Dúvida com Sorteio (Random)

[Diego Garcia]

Não tenho certeza, mas tente usar o *Randomize *antes de usar o *Random *
*Diego Garcia*

Twitter: http://www.twitter.com/drgarcia1986
Blog:http://www.atocadopanda.com


2009/12/7 valdirdill 

>
>
> Olá,
>
> Tenho a função abaixo para gerar um código que utilizo no sistema.
> Pela lógica, se chamarmos a função assim:
> "GeraCodigoAlfaNumericoAleatorio(10);" o retorno deveria ser sempre
> diferente. Poderia até repetir, mas a chance disso acontecer, seria tipo uma
> em um bilhão?
>
> O problema: em 610 códigos gerados, o código 6HGX564TQP já se repetiu 23
> vezes. Para isso ocorrer, o resutaldo do "random(Length(VMatriz))" teria ser
> 6-18-17-34-5-6-4-30-27-26. Qual a chance desse sorteio ocorrer exatamente
> igual e nessa mesma ordem? Pois, em 610 tentativas, ocorreu 23 vezes. A
> execução é feita sempre em máquinas diferentes (do usuário), mas mesmo
> assim, isso não poderia ocorrer, poderia?
>
> Qualquer dica ajuda. Obrigado
>
> function GeraCodigoAlfaNumericoAleatorio(VTamanho : Integer) : string;
> Var
> I : Integer;
> VMatriz : String;
> begin
> VMatriz := '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'
>
> result := '';
> for I := 1 to VTamanho do
> result := result + Copy(VMatriz,random(Length(VMatriz)),1);
> 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

Re: [delphi-br] Dúvida com Sorteio (Random)

[Ricardo César Cardoso]

É uma boa pergunta, mas não imagino uma resposta convincente... Quanto a se 
repetir em máquinas diferentes do usuário, o que posso dizer que me lembro é 
que a primeira execução de Random é gerada usando a data e a hora do sistema, 
portanto parte do mesmo valor independente do equipamento. A partir daí as 
coisas se randomizam mesmo.

Acho que para limitar essa repetição, seria interessante (porém mais custoso) 
refazer o sorteio em caso de repetição do código, fazendo o paralelo com o 
sorteio de um bingo, onde as "pedras" já retiradas não voltam para o recipiente.

Espero ter contribuido.

Atte,
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em seg, 7/12/09, valdirdill  escreveu:

De: valdirdill 
Assunto: [delphi-br] Dúvida com Sorteio (Random)
Para: delphi-br@yahoogrupos.com.br
Data: Segunda-feira, 7 de Dezembro de 2009, 12:16







 



  



  
  
  Olá,



Tenho a função abaixo para gerar um código que utilizo no sistema. 

Pela lógica, se chamarmos a função assim: "GeraCodigoAlfaNume ricoAleatorio( 
10);" o retorno deveria ser sempre diferente. Poderia até repetir, mas a chance 
disso acontecer, seria tipo uma em um bilhão?



O problema: em 610 códigos gerados, o código 6HGX564TQP já se repetiu 23 vezes. 
Para isso ocorrer, o resutaldo do "random(Length( VMatriz)) " teria ser 
6-18-17-34-5- 6-4-30-27- 26. Qual a chance desse sorteio ocorrer exatamente 
igual e nessa mesma ordem? Pois, em 610 tentativas, ocorreu 23 vezes. A 
execução é feita sempre em máquinas diferentes (do usuário), mas mesmo assim, 
isso não poderia ocorrer, poderia?



Qualquer dica ajuda. Obrigado



function GeraCodigoAlfaNumer icoAleatorio( VTamanho : Integer) : string;

Var

 I : Integer;

 VMatriz : String;

begin

 VMatriz := '1234567890ABCDEFGH IJKLMNOPQRSTUVWX YZ'



result := '';

 for I := 1 to VTamanho do

  result := result + Copy(VMatriz, random(Length( VMatriz)) ,1);

end;






 





 



  






  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] Dúvida com Sorteio (Random)

[valdirdill]

Olá,

Tenho a função abaixo para gerar um código que utilizo no sistema. 
Pela lógica, se chamarmos a função assim: 
"GeraCodigoAlfaNumericoAleatorio(10);" o retorno deveria ser sempre diferente. 
Poderia até repetir, mas a chance disso acontecer, seria tipo uma em um bilhão?

O problema: em 610 códigos gerados, o código 6HGX564TQP já se repetiu 23 vezes. 
Para isso ocorrer, o resutaldo do "random(Length(VMatriz))" teria ser 
6-18-17-34-5-6-4-30-27-26. Qual a chance desse sorteio ocorrer exatamente igual 
e nessa mesma ordem? Pois, em 610 tentativas, ocorreu 23 vezes. A execução é 
feita sempre em máquinas diferentes (do usuário), mas mesmo assim, isso não 
poderia ocorrer, poderia?

Qualquer dica ajuda. Obrigado

function GeraCodigoAlfaNumericoAleatorio(VTamanho : Integer) : string;
Var
 I : Integer;
 VMatriz : String;
begin
 VMatriz := '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ'

 result := '';
 for I := 1 to VTamanho do
  result := result + Copy(VMatriz,random(Length(VMatriz)),1);
end;

Re: [delphi-br] Dúvida com SQL

[Tupy . . . nambá]

DarkZad,

Me pareceu que voce tem dificuldades para expressar o problema que voce tem a 
resolver.

Vamos ver se entendi bem = voce tem uma tabela de cabeçalho do conhecimento, 
que apresenta 3 campos que se referem ao  Remetente, Destinatário e Pagador, 
cujos detalhes podem ser obtidos a partir da tabela de cliente.

Se for isto, sim, voce terá três colunas na tabela de cabeçalho de 
conhecimento, que deverá apresentar apresentar 3 chaves estrangeiras referentes 
ao Remetente, Destinatário e Pagador, oriundas da tabela de cliente. E melhor 
que assim o seja, pois na verdade são "roles" (papéis) que o cliente desempenha 
dentro do processo de envio de uma mercadoria. Estes tres papéis podem se 
referir a um mesmo cliente ou a clientes diferentes, mas todos são clientes. 
Desta forma, voce evita criar 3 tabelas para representar dados que, na 
essência, tem a mesma estrutura. 

Espero de alguma forma ter ajudado a clarear as idéias.

Abraço, boa sorte,
Roberto Camargo.




From: Leandro 
To: delphi-br@yahoogrupos.com.br
Sent: Tue, December 1, 2009 5:37:57 PM
Subject: Re: [delphi-br] Dúvida com SQL

Os erros ort sao maravilhosos rs!

Amigo delphi pode se comunicar com qualquer banco descente.. pois a
linguagem de qualquer banco descente eh sql..

sobre a duvida do nosso amigo ja falei o que ele tem q pesquisar: tem que
fazer uma pesquisa sobre relacionamento em banco de dados 1 para N, N para N
e 1 para 1, onde tera que criar: 2 tabelas, 3 tabelas ou 1 tabela somente
respectivamente.. nao vou explicar aqui pois alem de grande quero que ele
corra atras para aprender.. as vezes eh melhor da a isca para ele pescar..
como diria um dos membros aqui do grupo (acho que era o rubem rsrs)

Um abraço!

2009/12/1 Gilson gindre gindre 

>
>
>
> dixa ver se eu entendi, se vc tem duvidas quanto de que tabela pegar os
> campos, ou se colaca todos em uma tabela só !
>
> isso indepente se é no delphi, vb, java, php, phyton, asp ou estou enganado
> a duvida do rapaz e referente banco estrutura de dados! Ou dependendo de
> como está o banco de dados o delphi não consegue escrever ?
>
> reafirmo meu pensamento, entrei aqui para tentar aprender delphi que é uma
> das poucas linguagens que ainda não trabalhei e me parece que continua tendo
> gente ignorante na discussão!
>
> se eu não me engano com meus 20 anos de programação, vc cria a estrutura do
> banco de dados depois vc escolhe em que linguagem vc quer programar, e me
> corrigam por favor, se o delphi não tem poder de trabalhar com um banco já
> pronto, não presição me ajudar, pois não quero mas aprender delphi não me
> interessa mais, já mandei email me escruindo do grupo, por causa de pessoas
> arrogante, mas continuo recebendo email, se o moderador quiser, pode me
> excluir por gentileza.
>
>
> > To: delphi-br@yahoogrupos.com.br 
> > From: fb...@hotmail.com 
> > Date: Mon, 30 Nov 2009 07:51:31 -0200
> > Subject: RE: [delphi-br] Dúvida com SQL
> >
> >
> > pessoal banco vc pode usar qquer um, com qquer linguagem de programação,
> parece que estou desaprendendo aqui, Dark vc pode fazer o que achar certo
> referente relacionamento, mas vc tem que pensar o seguinte, um bom sitema,
> bem elaborado pensa em problemas futuros, imagina vc precisar de um
> relatório de quem pagou o frete ou seja se é cif ou fob, um relatorio só de
> clientes, então pense nisso, vc pode tambem incluir mais um camo em sua
> tabela, onde vc pode gravar o tipo do cadastro por exemplo ! 1 remetente 2
> destinatario 3 pagador, ai sim futuramente vc terá um parametro para filtrar
> sua consulta, ah pessoal não programo em delphi, entrei aqui para tentar
> aprender, mas tem muita gente ignorante, leio email de todos vcs, e respetio
> todos, e estou aqui afim de aprender delphi com todo respeito, conhecimento
> é uma riqueza que devemos compartilhar, desenvolvo em flex, php e mysql, um
> abraço a todos, epero que me deixem aprender delphi !
>
> >
> >
> >
> >
> >
> > To: delphi-br@yahoogrupos.com.br 
> > From: wchag...@bol.com.br 
> > Date: Sun, 29 Nov 2009 05:35:58 -0300
> > Subject: Re: [delphi-br] Dúvida com SQL
> >
> >
> >
> >
> >
> > Bom se voce acha que isto não tem nada haver com Delphi então é porque
> voce está na área errada ou não é desenvolvedor de software e sim um mero
> pregrador de botão em form.
> >
> > []s
> >
> >
> > Walter Alves Chagas Junior
> > Belo Horizonte - MG - Brazil
> > wchag...@bol.com.br 
> > http://delphitocorporerm.blogspot.com/
> >
> > - Mensagem original 
> > De: Matheus Nabao >
> > Para: "delphi-br@yahoogrupos.com.br " <
> delphi-br@yahoogrupos.com.br >
> > Enviadas: Sexta-feira,

Re: [delphi-br] Dúvida com SQL

[Leandro]

Os erros ort sao maravilhosos rs!

Amigo delphi pode se comunicar com qualquer banco descente.. pois a
linguagem de qualquer banco descente eh sql..

sobre a duvida do nosso amigo ja falei o que ele tem q pesquisar: tem que
fazer uma pesquisa sobre relacionamento em banco de dados 1 para N, N para N
e 1 para 1, onde tera que criar: 2 tabelas, 3 tabelas ou 1 tabela somente
respectivamente.. nao vou explicar aqui pois alem de grande quero que ele
corra atras para aprender.. as vezes eh melhor da a isca para ele pescar..
como diria um dos membros aqui do grupo (acho que era o rubem rsrs)

Um abraço!

2009/12/1 Gilson gindre gindre 

>
>
>
> dixa ver se eu entendi, se vc tem duvidas quanto de que tabela pegar os
> campos, ou se colaca todos em uma tabela só !
>
> isso indepente se é no delphi, vb, java, php, phyton, asp ou estou enganado
> a duvida do rapaz e referente banco estrutura de dados! Ou dependendo de
> como está o banco de dados o delphi não consegue escrever ?
>
> reafirmo meu pensamento, entrei aqui para tentar aprender delphi que é uma
> das poucas linguagens que ainda não trabalhei e me parece que continua tendo
> gente ignorante na discussão!
>
> se eu não me engano com meus 20 anos de programação, vc cria a estrutura do
> banco de dados depois vc escolhe em que linguagem vc quer programar, e me
> corrigam por favor, se o delphi não tem poder de trabalhar com um banco já
> pronto, não presição me ajudar, pois não quero mas aprender delphi não me
> interessa mais, já mandei email me escruindo do grupo, por causa de pessoas
> arrogante, mas continuo recebendo email, se o moderador quiser, pode me
> excluir por gentileza.
>
>
> > To: delphi-br@yahoogrupos.com.br 
> > From: fb...@hotmail.com 
> > Date: Mon, 30 Nov 2009 07:51:31 -0200
> > Subject: RE: [delphi-br] Dúvida com SQL
> >
> >
> > pessoal banco vc pode usar qquer um, com qquer linguagem de programação,
> parece que estou desaprendendo aqui, Dark vc pode fazer o que achar certo
> referente relacionamento, mas vc tem que pensar o seguinte, um bom sitema,
> bem elaborado pensa em problemas futuros, imagina vc precisar de um
> relatório de quem pagou o frete ou seja se é cif ou fob, um relatorio só de
> clientes, então pense nisso, vc pode tambem incluir mais um camo em sua
> tabela, onde vc pode gravar o tipo do cadastro por exemplo ! 1 remetente 2
> destinatario 3 pagador, ai sim futuramente vc terá um parametro para filtrar
> sua consulta, ah pessoal não programo em delphi, entrei aqui para tentar
> aprender, mas tem muita gente ignorante, leio email de todos vcs, e respetio
> todos, e estou aqui afim de aprender delphi com todo respeito, conhecimento
> é uma riqueza que devemos compartilhar, desenvolvo em flex, php e mysql, um
> abraço a todos, epero que me deixem aprender delphi !
>
> >
> >
> >
> >
> >
> > To: delphi-br@yahoogrupos.com.br 
> > From: wchag...@bol.com.br 
> > Date: Sun, 29 Nov 2009 05:35:58 -0300
> > Subject: Re: [delphi-br] Dúvida com SQL
> >
> >
> >
> >
> >
> > Bom se voce acha que isto não tem nada haver com Delphi então é porque
> voce está na área errada ou não é desenvolvedor de software e sim um mero
> pregrador de botão em form.
> >
> > []s
> >
> >
> > Walter Alves Chagas Junior
> > Belo Horizonte - MG - Brazil
> > wchag...@bol.com.br 
> > http://delphitocorporerm.blogspot.com/
> >
> > - Mensagem original 
> > De: Matheus Nabao >
> > Para: "delphi-br@yahoogrupos.com.br " <
> delphi-br@yahoogrupos.com.br >
> > Enviadas: Sexta-feira, 27 de Novembro de 2009 11:38:56
> > Assunto: RE: [delphi-br] Dúvida com SQL
> >
> > O que é que isso tem a ver com Delphi?
>
> >
> > To: delphi-br@yahoogrupos.com.br 
> > From: dark...@yahoo.com.br 
> > Date: Fri, 27 Nov 2009 11:35:26 -0300
> > Subject: [delphi-br] Dúvida com SQL
> >
> > Olá pessoal,
> >
> > Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
> >
> > Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
> > relacionam.
> >
> > Dúvida:
> >
> > No Cabeçalho do Conhecimento tenho os campos:
> > Remetente
> > Destinatário
> > Pagador
> >
> > Pergunta:
> > Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> > que criar uma tabela para cada um deles?
> > Qual impacato eu teria se pegasse os três tabela CLIENTE?
> >
> > É só isso pessoal
> >
> > []'s
> > DarkZad
> >
> > _

Re: [delphi-br] Dúvida com SQL

[Darkzad]

Foi falha minha não colocar OFF no assunto.

Valeu

Joao Morais escreveu:
>  
>
> Caros, vamos combinar algumas coisas.
>
> Primeiro que SQL é sim offtopic, assim como quaisquer outras dúvidas
> de SO e tantas outras coisas que estão indiretamente relacionadas com
> Delphi. E deixar de usar SQL não tem nada a ver com pregador de botão.
> Quem aqui além de mim que faz aplicações sem componentes não-visuais
> que atire o segundo mouse. A propósito, é mais fácil ser um pregador
> de botão escrevendo SQL dentro do ambiente do que o contrário. E por
> fim, a lista tem uma cultura de abranger assuntos indiretamente
> relacionado com o ambiente, o que faz com que Delphi propriamente dito
> seja a minoria das mensagens. Infelizmente.
>
> Enfim, que tal todos deixarem de ser intransigentes com a
> classificação dos assuntos, bem como xaropes com quem está meramente
> manifestando uma opinião?
>
> Joao Morais
>
> 

__
Fa�a liga��es para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

RE: [delphi-br] Dúvida com SQL

[Ricardo César Cardoso]

Agora posso usar sua pergunta: O que isso tem a ver com Delphi?

Abraço,
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.
3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!


--- Em sáb, 28/11/09, Matheus Nabao  escreveu:

> De: Matheus Nabao 
> Assunto: RE: [delphi-br] Dúvida com SQL
> Para: "delphi-br@yahoogrupos.com.br" 
> Data: Sábado, 28 de Novembro de 2009, 20:04
> 
> Olá Ricardo, Tudo Bem?
> Qual foi minha dúvida com SP?
> 
> To: delphi-br@yahoogrupos.com.br
> From: ricardo_engs...@yahoo.com.br
> Date: Sat, 28 Nov 2009 13:47:23 -0800
> Subject: Re: [delphi-br] Dúvida com SQL
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
>  
> 
> 
> 
>   
> 
> 
>     
>       
>       
>       Quase caí da cadeira de rir com essa
> mensagem...
> 
> 
> 
> Nada pessoal, Nabao. That's part of business.
> 
> 
> 
> Abraços, 
> 
> Ricardo.
> 
> 
> 
> 1) Evite escrever suas mensagens usando somente LETRAS
> MAIÚSCULAS.
> 
> 
> 
> 2) Revise o texto de sua mensagem. Uma mensagem bem escrita
> é melhor compreendida.
> 
> 
> 
> 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo
> irrelevante!
> 
> 
> 
> --- Em sáb, 28/11/09, Leandro 
> escreveu:
> 
> 
> 
> De: Leandro 
> 
> Assunto: Re: [delphi-br] Dúvida com SQL
> 
> Para: delphi-br@yahoogrupos.com.br
> 
> Data: Sábado, 28 de Novembro de 2009, 19:44
> 
> 
> 
>  
> 
> 
> 
> E ai Nabao blz!? Comigo tudo na paz.. Vamos la, eu acho que
> qualquer coisa
> 
> 
> 
> que esteja relacionada a delphi pode e deve ser discutida
> aqui e tanto que
> 
> 
> 
> irei ajudar quando possivel. Percebi que em suas msgs
> passadas foi ate um
> 
> 
> 
> pouco arrogante com algumas pessoas e muita das vezes sem
> ajudar nada e
> 
> 
> 
> ainda por cima nervosinho, por isso, nao quero me
> "aprofundar/ perder tempo"
> 
> 
> 
> nessa discussao. Engraçado que a menos de um mes vc
> respondeu perguntas
> 
> 
> 
> relacionadas a Store Procedures e BDs..
> 
> 
> 
> Agora vamos la vou ajudar vc tbm alem do nosso amigo da
> duvida do SQL:
> 
> 
> 
> Chegou pra voce o novo, inovado, inédito, sofisticado
> (redundante nada ne)
> 
> 
> 
> filtro de email tabajaraaa, com ele voce pode criar
> filtros em 3 passos,
> 
> 
> 
> por exemplo pode criar um filtro que faça com que todos os
> emails chatos e
> 
> 
> 
> que te stressam que contenham off-topic ou duvida sql
> desaparecao num piscar
> 
> 
> 
> de olhos, nao perca mais tempo crie ja o seu!!
> 
> 
> 
> desculpa gente mas nao aguentei rs, quiz dar um ar de
> graça na msg rs..
> 
> 
> 
> 2009/11/28 Matheus Nabao 
> 
> 
> 
> >
> 
> 
> 
> > Mas esse é o grupo DELPHI-BR, ele não está com
> dúvida relacionado ao
> 
> 
> 
> > Delphi, mas sim relacionado a BD.
> 
> 
> 
> >
> 
> 
> 
> > O problema dele é SCRIPT SQL, não delphi!
> 
> 
> 
> >
> 
> 
> 
> > Não seria mais fácil as pessoas irem ao Grupo SQL,
> BD que seja fazer
> 
> 
> 
> > perguntas sobre BD?
> 
> 
> 
> >
> 
> 
> 
> > Repito, o que isso tem a ver com Delphi?
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> > To: delphi...@yahoogrup os.com.br
> 
> 
> 
> > From: dark...@yahoo. com.br
> 
> 
> 
> > Date: Fri, 27 Nov 2009 16:31:51 -0800
> 
> 
> 
> > Subject: Re: [delphi-br] Dúvida com SQL
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> > Bom, Vc não utiliza SQL no Delphi para fazer
> consulta, insert e update.
> 
> 
> 
> > ;)
> 
> 
> 
> >
> 
> 
> 
> > DarkZad
> 
> 
> 
> >
> 
> 
> 
> > --- Em sex, 27/11/09, Leandro  com.br> escreveu:
> 
> 
> 
> >
> 
> 
> 
> > De: Leandro 
> 
> 
> 
> > Assunto: Re: [delphi-br] Dúvida com SQL
> 
> 
> 
> > Para: delphi...@yahoogrup os.com.br
> 
> 
> 
> > Data: Sexta-feira, 27 de Novembro de 2009, 22:14
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> >
> 
> 
> 
> > ok matheus entao a proxima vez q vc vier com uma
> duvida q nao seja de
> 
> 
> 
> >
> 
> 

Re: [delphi-br] Dúvida com SQL

[Joao Morais]

Caros, vamos combinar algumas coisas.

Primeiro que SQL é sim offtopic, assim como quaisquer outras dúvidas
de SO e tantas outras coisas que estão indiretamente relacionadas com
Delphi. E deixar de usar SQL não tem nada a ver com pregador de botão.
Quem aqui além de mim que faz aplicações sem componentes não-visuais
que atire o segundo mouse. A propósito, é mais fácil ser um pregador
de botão escrevendo SQL dentro do ambiente do que o contrário. E por
fim, a lista tem uma cultura de abranger assuntos indiretamente
relacionado com o ambiente, o que faz com que Delphi propriamente dito
seja a minoria das mensagens. Infelizmente.

Enfim, que tal todos deixarem de ser intransigentes com a
classificação dos assuntos, bem como xaropes com quem está meramente
manifestando uma opinião?

Joao Morais

RE: [delphi-br] Dúvida com SQL

[Ricardo César Cardoso]

Não vejo problemas em responder uma dúvida de SQL numa lista de Delphi. Basta 
sinalizar com OFF que tudo está ok.

O que não tem nada a ver é essa implicância... Se não lhe agrada, não se 
manifeste oras!

Atte,
Ricardo.


1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.
3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!


--- Em sáb, 28/11/09, Matheus Nabao  escreveu:

> De: Matheus Nabao 
> Assunto: RE: [delphi-br] Dúvida com SQL
> Para: "delphi-br@yahoogrupos.com.br" 
> Data: Sábado, 28 de Novembro de 2009, 10:26
> 
> Mas esse é o grupo DELPHI-BR, ele não está com dúvida
> relacionado ao Delphi, mas sim relacionado a BD.
> 
> O problema dele é SCRIPT SQL, não delphi!
> 
> Não seria mais fácil as pessoas irem ao Grupo SQL, BD que
> seja fazer perguntas sobre BD?
> 
> Repito, o que isso tem a ver com Delphi?
>  
> 
> 
> To: delphi-br@yahoogrupos.com.br
> From: dark...@yahoo.com.br
> Date: Fri, 27 Nov 2009 16:31:51 -0800
> Subject: Re: [delphi-br] Dúvida com SQL
> 
>   
> 
> 
> 
> Bom, Vc não utiliza SQL no Delphi para fazer consulta,
> insert e update.
> ;)
> 
> DarkZad
> 
> --- Em sex, 27/11/09, Leandro 
> escreveu:
> 
> De: Leandro 
> Assunto: Re: [delphi-br] Dúvida com SQL
> Para: delphi-br@yahoogrupos.com.br
> Data: Sexta-feira, 27 de Novembro de 2009, 22:14
> 
>  
> 
> ok matheus entao a proxima vez q vc vier com uma duvida q
> nao seja de
> 
> delphi, que seja de banco de dados, ninguem ira te ajudar
> ok? ja que eh
> 
> assim que prefere..
> 
> ps. tem pessoas que perdem a oportunidade de "nao" serem
> chatas
> 
> 2009/11/27 Matheus Nabao 
> 
> >
> 
> > O que é que isso tem a ver com Delphi?
> 
> >
> 
> >
> 
> >
> 
> > To: delphi...@yahoogrup os.com.br
> 
> > From: dark...@yahoo. com.br
> 
> > Date: Fri, 27 Nov 2009 11:35:26 -0300
> 
> > Subject: [delphi-br] Dúvida com SQL
> 
> >
> 
> >
> 
> >
> 
> >
> 
> >
> 
> > Olá pessoal,
> 
> >
> 
> > Estou desenvolvendo um aplicatico para Emitir
> Conhecimento de Frete.
> 
> >
> 
> > Tenho a Tabela Cliente e a Tabela cabeçalho do
> Conhecimento que se
> 
> > relacionam.
> 
> >
> 
> > Dúvida:
> 
> >
> 
> > No Cabeçalho do Conhecimento tenho os campos:
> 
> > Remetente
> 
> > Destinatário
> 
> > Pagador
> 
> >
> 
> > Pergunta:
> 
> > Esses três campos PODE ser todos pegos da tabela
> CLIENTE ou eu tenho
> 
> > que criar uma tabela para cada um deles?
> 
> > Qual impacato eu teria se pegasse os três tabela
> CLIENTE?
> 
> >
> 
> > É só isso pessoal
> 
> >
> 
> > []'s
> 
> > DarkZad
> 
> >
> 
> >  _ _ _ _
> __
> 
> > Faça ligações para outros computadores com o novo
> Yahoo! Messenger
> 
> > http://br.beta. messenger. yahoo.com/
> 
> >
> 
> >
> 
> >
> 
> >
> 
> >
> 
> >  _ _ _ _
> _ _
> 
> > Você já ama o Messenger? Conheça ainda mais sobre
> ele no Novo site de
> 
> > Windows Live.
> 
> > http://www.windowsl ive.com.br/ ?ocid=WindowsLiv
> e09_MSN_Hotmail_ Tagline_out09
> 
> >
> 
> > [As partes desta mensagem que não continham texto
> foram removidas]
> 
> >
> 
> >
> 
> >
> 
> >  - - --
> 
> >
> 
> > --
> 
> > <<<<< FAVOR REMOVER ESTA PARTE AO
> RESPONDER ESTA MENSAGEM >>>>>
> 
> >
> 
> >
> 
> >
> 
> >
> 
> -- 
> 
> Leandro, MuTukA
> 
> [As partes desta mensagem que não continham texto foram
> removidas]
> 
> __
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
> 
> [As partes desta mensagem que não continham texto foram
> removidas]
> 
> 
> 
> 
>     
> 
>       
>   
> _
> Converse e compartilhe fotos ao mesmo tempo. Saiba como no
> novo Site de Windows Live.
> http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09
> 
> [As partes desta mensagem que não continham texto foram
> removidas]
> 
> 
> 
> 
> 
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER
> ESTA MENSAGEM >>>>>
> 
> Links do Yahoo! Grupos
> 
> 
> 
> 


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

Re: [delphi-br] Dúvida com SQL

[Walter Chagas (Bol)]

Bom se voce acha que isto não tem nada haver com Delphi então é porque voce 
está na área errada ou não é desenvolvedor de software e sim um mero pregrador 
de botão em form.


[]s
 
 
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://delphitocorporerm.blogspot.com/


  - Mensagem original 
  De: Matheus Nabao 
  Para: "delphi-br@yahoogrupos.com.br" 
  Enviadas: Sexta-feira, 27 de Novembro de 2009 11:38:56
  Assunto: RE: [delphi-br] Dúvida com SQL

  O que é que isso tem a ver com Delphi?

  To: delphi-br@yahoogrupos.com.br
  From: dark...@yahoo.com.br
  Date: Fri, 27 Nov 2009 11:35:26 -0300
  Subject: [delphi-br] Dúvida com SQL



  Olá pessoal,

  Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

  Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se 
  relacionam.

  Dúvida:

  No Cabeçalho do Conhecimento tenho os campos:
  Remetente
  Destinatário
  Pagador

  Pergunta:
  Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho 
  que criar uma tabela para cada um deles?
  Qual impacato eu teria se pegasse os três tabela CLIENTE?

  É só isso pessoal

  []'s
  DarkZad

  __
  Faça ligações para outros computadores com o novo Yahoo! Messenger 
  http://br.beta.messenger.yahoo.com/ 

  
  __
  Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de Windows 
Live.
  http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09

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

  

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

  __
  Veja quais são os assuntos do momento no Yahoo! +Buscados
  http://br.maisbuscados.yahoo.com

  

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

Re: [delphi-br] Dúvida com SQL

[Ricardo César Cardoso]

Quase caí da cadeira de rir com essa mensagem...

Nada pessoal, Nabao. That's part of business.

Abraços, 
Ricardo.

1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.

2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor 
compreendida.

3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!

--- Em sáb, 28/11/09, Leandro  escreveu:

De: Leandro 
Assunto: Re: [delphi-br] Dúvida com SQL
Para: delphi-br@yahoogrupos.com.br
Data: Sábado, 28 de Novembro de 2009, 19:44







 



  



  
  
  E ai Nabao blz!? Comigo tudo na paz.. Vamos la, eu acho que qualquer coisa

que esteja relacionada a delphi pode e deve ser discutida aqui e tanto que

irei ajudar quando possivel. Percebi que em suas msgs passadas foi ate um

pouco arrogante com algumas pessoas e muita das vezes sem ajudar nada e

ainda por cima nervosinho, por isso, nao quero me "aprofundar/ perder tempo"

nessa discussao. Engraçado que a menos de um mes vc respondeu perguntas

relacionadas a Store Procedures e BDs..



Agora vamos la vou ajudar vc tbm alem do nosso amigo da duvida do SQL:



Chegou pra voce o novo, inovado, inédito, sofisticado (redundante nada ne)

filtro de email tabajaraaa, com ele voce pode criar filtros em 3 passos,

por exemplo pode criar um filtro que faça com que todos os emails chatos e

que te stressam que contenham off-topic ou duvida sql desaparecao num piscar

de olhos, nao perca mais tempo crie ja o seu!!



desculpa gente mas nao aguentei rs, quiz dar um ar de graça na msg rs..



2009/11/28 Matheus Nabao 



>

> Mas esse é o grupo DELPHI-BR, ele não está com dúvida relacionado ao

> Delphi, mas sim relacionado a BD.

>

> O problema dele é SCRIPT SQL, não delphi!

>

> Não seria mais fácil as pessoas irem ao Grupo SQL, BD que seja fazer

> perguntas sobre BD?

>

> Repito, o que isso tem a ver com Delphi?

>

>

>

> To: delphi...@yahoogrup os.com.br

> From: dark...@yahoo. com.br

> Date: Fri, 27 Nov 2009 16:31:51 -0800

> Subject: Re: [delphi-br] Dúvida com SQL

>

>

>

>

>

> Bom, Vc não utiliza SQL no Delphi para fazer consulta, insert e update.

> ;)

>

> DarkZad

>

> --- Em sex, 27/11/09, Leandro  escreveu:

>

> De: Leandro 

> Assunto: Re: [delphi-br] Dúvida com SQL

> Para: delphi...@yahoogrup os.com.br

> Data: Sexta-feira, 27 de Novembro de 2009, 22:14

>

>

>

> ok matheus entao a proxima vez q vc vier com uma duvida q nao seja de

>

> delphi, que seja de banco de dados, ninguem ira te ajudar ok? ja que eh

>

> assim que prefere..

>

> ps. tem pessoas que perdem a oportunidade de "nao" serem chatas

>

> 2009/11/27 Matheus Nabao 

>

> >

>

> > O que é que isso tem a ver com Delphi?

>

> >

>

> >

>

> >

>

> > To: delphi...@yahoogrup os.com.br

>

> > From: dark...@yahoo. com.br

>

> > Date: Fri, 27 Nov 2009 11:35:26 -0300

>

> > Subject: [delphi-br] Dúvida com SQL

>

> >

>

> >

>

> >

>

> >

>

> >

>

> > Olá pessoal,

>

> >

>

> > Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

>

> >

>

> > Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se

>

> > relacionam.

>

> >

>

> > Dúvida:

>

> >

>

> > No Cabeçalho do Conhecimento tenho os campos:

>

> > Remetente

>

> > Destinatário

>

> > Pagador

>

> >

>

> > Pergunta:

>

> > Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho

>

> > que criar uma tabela para cada um deles?

>

> > Qual impacato eu teria se pegasse os três tabela CLIENTE?

>

> >

>

> > É só isso pessoal

>

> >

>

> > []'s

>

> > DarkZad

>

> >

>

> >  _ _ _ _ __

>

> > Faça ligações para outros computadores com o novo Yahoo! Messenger

>

> > http://br.beta. messenger. yahoo.com/

>

> >

>

> >

>

> >

>

> >

>

> >

>

> >  _ _ _ _ _ _

>

> > Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de

>

> > Windows Live.

>

> > http://www.windowsl ive.com.br/ ?ocid=WindowsLiv e09_MSN_Hotmail_

> Tagline_out09

>

> >

>

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

>

> >

>

> >

>

> >

>

> >  - - --

>

> >

>

> > --

>

> > <<<<< FAVOR REMOVER ESTA PART

Re: [delphi-br] Dúvida com SQL

[Leandro]

E ai Nabao blz!? Comigo tudo na paz.. Vamos la, eu acho que qualquer coisa
que esteja relacionada a delphi pode e deve ser discutida aqui e tanto que
irei ajudar quando possivel. Percebi que em suas msgs passadas foi ate um
pouco arrogante com algumas pessoas e muita das vezes sem ajudar nada e
ainda por cima nervosinho, por isso, nao quero me "aprofundar/perder tempo"
nessa discussao. Engraçado que a menos de um mes vc respondeu perguntas
relacionadas a Store Procedures e BDs..

Agora vamos la vou ajudar vc tbm alem do nosso amigo da duvida do SQL:

Chegou pra voce o novo, inovado, inédito, sofisticado (redundante nada ne)
filtro de email tabajaraaa, com ele voce pode criar filtros em 3 passos,
por exemplo pode criar um filtro que faça com que todos os emails chatos e
que te stressam que contenham off-topic ou duvida sql desaparecao num piscar
de olhos, nao perca mais tempo crie ja o seu!!

desculpa gente mas nao aguentei rs, quiz dar um ar de graça na msg rs..



2009/11/28 Matheus Nabao 

>
> Mas esse é o grupo DELPHI-BR, ele não está com dúvida relacionado ao
> Delphi, mas sim relacionado a BD.
>
> O problema dele é SCRIPT SQL, não delphi!
>
> Não seria mais fácil as pessoas irem ao Grupo SQL, BD que seja fazer
> perguntas sobre BD?
>
> Repito, o que isso tem a ver com Delphi?
>
>
>
> To: delphi-br@yahoogrupos.com.br
> From: dark...@yahoo.com.br
> Date: Fri, 27 Nov 2009 16:31:51 -0800
> Subject: Re: [delphi-br] Dúvida com SQL
>
>
>
>
>
> Bom, Vc não utiliza SQL no Delphi para fazer consulta, insert e update.
> ;)
>
> DarkZad
>
> --- Em sex, 27/11/09, Leandro  escreveu:
>
> De: Leandro 
> Assunto: Re: [delphi-br] Dúvida com SQL
> Para: delphi-br@yahoogrupos.com.br
> Data: Sexta-feira, 27 de Novembro de 2009, 22:14
>
>
>
> ok matheus entao a proxima vez q vc vier com uma duvida q nao seja de
>
> delphi, que seja de banco de dados, ninguem ira te ajudar ok? ja que eh
>
> assim que prefere..
>
> ps. tem pessoas que perdem a oportunidade de "nao" serem chatas
>
> 2009/11/27 Matheus Nabao 
>
> >
>
> > O que é que isso tem a ver com Delphi?
>
> >
>
> >
>
> >
>
> > To: delphi...@yahoogrup os.com.br
>
> > From: dark...@yahoo. com.br
>
> > Date: Fri, 27 Nov 2009 11:35:26 -0300
>
> > Subject: [delphi-br] Dúvida com SQL
>
> >
>
> >
>
> >
>
> >
>
> >
>
> > Olá pessoal,
>
> >
>
> > Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
>
> >
>
> > Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
>
> > relacionam.
>
> >
>
> > Dúvida:
>
> >
>
> > No Cabeçalho do Conhecimento tenho os campos:
>
> > Remetente
>
> > Destinatário
>
> > Pagador
>
> >
>
> > Pergunta:
>
> > Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
>
> > que criar uma tabela para cada um deles?
>
> > Qual impacato eu teria se pegasse os três tabela CLIENTE?
>
> >
>
> > É só isso pessoal
>
> >
>
> > []'s
>
> > DarkZad
>
> >
>
> >  _ _ _ _ __
>
> > Faça ligações para outros computadores com o novo Yahoo! Messenger
>
> > http://br.beta. messenger. yahoo.com/
>
> >
>
> >
>
> >
>
> >
>
> >
>
> >  _ _ _ _ _ _
>
> > Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de
>
> > Windows Live.
>
> > http://www.windowsl ive.com.br/ ?ocid=WindowsLiv e09_MSN_Hotmail_
> Tagline_out09
>
> >
>
> > [As partes desta mensagem que não continham texto foram removidas]
>
> >
>
> >
>
> >
>
> >  - - --
>
> >
>
> > --
>
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
> >
>
> >
>
> >
>
> >
>
> --
>
> Leandro, MuTukA
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> __
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> _
> Converse e compartilhe fotos ao mesmo tempo. Saiba como no novo Site de
> Windows Live.
> http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>


-- 
Leandro, MuTukA


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

Re: Res: [delphi-br] Dúvida com SQL

[Darkzad]

Obrigado Maria, vai ser muito util sua ajuda.

Valeu

Maria das Graças . escreveu:
>  
>
> Na verdade, no conhecimento de frete vc terá 4 campos: remetente, 
> destinatario, consigntario e redespacho. Todos vindos da tabela de 
> cliente, porque dependendo da situação, o pagador será um ou outro, ou 
> em alguns casos raros, 2 deles poderão ser responsáveis pelo 
> pagamento.Exemplo: remetente arca com x% e destinatario z% do valor do 
> frete.
> O impacto seria para selecionar esses campos. Voce teria que fazer
>
> Select
> rem.nome NomeRemetente,
> des.nome NomeDestinatario,
> con.nome NomeConsignatario,
> red.nome NomeRedespacho
> >From tabelaconhecimento tab
> Left outer join tabelacliente rem on (rem.codigo = tab.remetente)
> Left outer join tabelacliente des on (des.codigo = tab.destinatario)
> Left outer join tabelacliente con on (con.codigo = tab.consignatario)
> Left outer join tabelacliente red on (red.codigo = tab.redespacho)
>
> usando o left outer join porque um ou mais campos terão valor nulo.
>
> Graça
>  
> >>>>
> No Cabeçalho do Conhecimento tenho os campos:
> Remetente
> Destinatário
> Pagador
>
> Pergunta:
> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> que criar uma tabela para cada um deles?
> Qual impacato eu teria se pegasse os três tabela CLIENTE?
> <<<
>
> 
> De: Darkzad mailto:darkzad%40yahoo.com.br>>
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Enviadas: Sexta-feira, 27 de Novembro de 2009 12:35:26
> Assunto: [delphi-br] Dúvida com SQL
>
>  
> Olá pessoal,
>
> Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
>
> Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
> relacionam.
>
> Dúvida:
>
> No Cabeçalho do Conhecimento tenho os campos:
> Remetente
> Destinatário
> Pagador
>
> Pergunta:
> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> que criar uma tabela para cada um deles?
> Qual impacato eu teria se pegasse os três tabela CLIENTE?
>
> É só isso pessoal
>
> []'s
> DarkZad
>
>  _ _ _ _ __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta. messenger. yahoo.com/
>
> __
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com <http://br.maisbuscados.yahoo.com>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 

__
Fa�a liga��es para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Res: [delphi-br] Dúvida com SQL

[Maria das Graças .]

Rapaz, que intolerância é essa? Você fez a mesma pergunta quando eu lancei uma 
dúvida de string de SQL. Estamos aqui para ajudar. Você ajuda e, um dia, quando 
necessitar, com certeza também será ajudado.
E quem nunca usou comandos de bancos de dados integrados ao Delphi que atire a 
primeira pedra.
Graça



- Mensagem original 
De: Matheus Nabao 
Para: "delphi-br@yahoogrupos.com.br" 
Enviadas: Sexta-feira, 27 de Novembro de 2009 11:38:56
Assunto: RE: [delphi-br] Dúvida com SQL


O que é que isso tem a ver com Delphi?



To: delphi-br@yahoogrupos.com.br
From: dark...@yahoo.com.br
Date: Fri, 27 Nov 2009 11:35:26 -0300
Subject: [delphi-br] Dúvida com SQL

  



Olá pessoal,

Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se 
relacionam.

Dúvida:

No Cabeçalho do Conhecimento tenho os campos:
Remetente
Destinatário
Pagador

Pergunta:
Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho 
que criar uma tabela para cada um deles?
Qual impacato eu teria se pegasse os três tabela CLIENTE?

É só isso pessoal

[]'s
DarkZad

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 




                        
_
Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de Windows 
Live.
http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09

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





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



  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

Res: [delphi-br] Dúvida com SQL

[Maria das Graças .]

Na verdade, no conhecimento de frete vc terá 4 campos: remetente, destinatario, 
consigntario e redespacho. Todos vindos da tabela de cliente, porque dependendo 
da situação, o pagador será um ou outro, ou em alguns casos raros, 2 deles 
poderão ser responsáveis pelo pagamento.Exemplo: remetente arca com x% e 
destinatario z% do valor do frete.
O impacto seria para selecionar esses campos. Voce teria que fazer

Select
rem.nome NomeRemetente,
des.nome NomeDestinatario,
con.nome NomeConsignatario,
red.nome NomeRedespacho
>From tabelaconhecimento tab
Left outer join tabelacliente rem on (rem.codigo = tab.remetente)
Left outer join tabelacliente des on (des.codigo = tab.destinatario)
Left outer join tabelacliente con on (con.codigo = tab.consignatario)
Left outer join tabelacliente red on (red.codigo = tab.redespacho)

usando o left outer join porque um ou mais campos terão valor nulo.

Graça
  
>>>>
No Cabeçalho do Conhecimento tenho os campos:
Remetente
Destinatário
Pagador

Pergunta:
Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho 
que criar uma tabela para cada um deles?
Qual impacato eu teria se pegasse os três tabela CLIENTE?
<<<






De: Darkzad 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 27 de Novembro de 2009 12:35:26
Assunto: [delphi-br] Dúvida com SQL

  
Olá pessoal,

Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se 
relacionam.

Dúvida:

No Cabeçalho do Conhecimento tenho os campos:
Remetente
Destinatário
Pagador

Pergunta:
Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho 
que criar uma tabela para cada um deles?
Qual impacato eu teria se pegasse os três tabela CLIENTE?

É só isso pessoal

[]'s
DarkZad

 _ _ _ _ __
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta. messenger. yahoo.com/ 





  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

RES: [delphi-br] Dúvida com SQL

[Ricardo Pascoal]

Faça um join entre as duas tabelas pela chave primaria (PK) e selecione os
campos que você quer na sua query !

Se você cometer um erro de relacionamento entre as tabelas pode ocorrer de
vc fazer um acesso FULL em uma delas o que vai ocasionar um lentidão !

Em alguns programas se você rodar essa query errada, mesmo ela fazendo
full... o programa traz geralmente as primeiras  linhas e dá a impressão que
está tudo certo... cuidado !

Exemplo : 

Tabela Cliente
CodCliente
Nome

Tabela Conhec_Embarque
CodCliente ( este campo deve existir aqui sendo parte da sua PK ) ok
Remetente
Destinatário
Pagador

// Traz Dados de um Cliente em especifico !

Select a.CodCLiente, a.Nome, b.Remetente, b.Destinatario, b.Pagador
>From Cliente a, Conhec_Embarque b
Where a.CodCliente = 1
And   b.CodCliente = a.CodCliente ;


Falow 

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Leandro
Enviada em: sexta-feira, 27 de novembro de 2009 13:36
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Dúvida com SQL

vc tem q fazer a verificacao de relacao: 1 -> N, 1 -> 1 ou N -> N, no
primeiro caso nao precisa criar uma terceira tabela, no segundo nao precisa
nem da segunda tabela soh da tabela cliente, no terceiro sim precisa de uma
tabela com chaves estrageiras das duas (cliente e frete)

se nao entendeu oq eu disse entao da uma pesquisada sobre o assunto para
ficar a par..

2009/11/27 Darkzad 

>
>
> Olá pessoal,
>
> Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
>
> Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
> relacionam.
>
> Dúvida:
>
> No Cabeçalho do Conhecimento tenho os campos:
> Remetente
> Destinatário
> Pagador
>
> Pergunta:
> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> que criar uma tabela para cada um deles?
> Qual impacato eu teria se pegasse os três tabela CLIENTE?
>
> É só isso pessoal
>
> []'s
> DarkZad
>
> __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta.messenger.yahoo.com/
>
>  
>



-- 
Leandro, MuTukA


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





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

Re: [delphi-br] Dúvida com SQL

[Marcelo Pomarolli]

Bom, Vc não utiliza SQL no Delphi para fazer consulta, insert e update.
;)

DarkZad


--- Em sex, 27/11/09, Leandro  escreveu:

De: Leandro 
Assunto: Re: [delphi-br] Dúvida com SQL
Para: delphi-br@yahoogrupos.com.br
Data: Sexta-feira, 27 de Novembro de 2009, 22:14







 



  



  
  
  ok matheus entao a proxima vez q vc vier com uma duvida q nao seja de

delphi, que seja de banco de dados, ninguem ira te ajudar ok? ja que eh

assim que prefere..



ps. tem pessoas que perdem a oportunidade de "nao" serem chatas



2009/11/27 Matheus Nabao 



>

> O que é que isso tem a ver com Delphi?

>

>

>

> To: delphi...@yahoogrup os.com.br

> From: dark...@yahoo. com.br

> Date: Fri, 27 Nov 2009 11:35:26 -0300

> Subject: [delphi-br] Dúvida com SQL

>

>

>

>

>

> Olá pessoal,

>

> Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

>

> Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se

> relacionam.

>

> Dúvida:

>

> No Cabeçalho do Conhecimento tenho os campos:

> Remetente

> Destinatário

> Pagador

>

> Pergunta:

> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho

> que criar uma tabela para cada um deles?

> Qual impacato eu teria se pegasse os três tabela CLIENTE?

>

> É só isso pessoal

>

> []'s

> DarkZad

>

>  _ _ _ _ __

> Faça ligações para outros computadores com o novo Yahoo! Messenger

> http://br.beta. messenger. yahoo.com/

>

>

>

>

>

>  _ _ _ _ _ _

> Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de

> Windows Live.

> http://www.windowsl ive.com.br/ ?ocid=WindowsLiv e09_MSN_Hotmail_ 
> Tagline_out09

>

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

>

>

>

>  - - --

>

> --

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

>

>

>

>



-- 

Leandro, MuTukA



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






 





 



  






  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida com SQL

[Leandro]

ok matheus entao a proxima vez q vc vier com uma duvida q nao seja de
delphi, que seja de banco de dados, ninguem ira te ajudar ok? ja que eh
assim que prefere..

ps. tem pessoas que perdem a oportunidade de "nao" serem chatas


2009/11/27 Matheus Nabao 

>
> O que é que isso tem a ver com Delphi?
>
>
>
> To: delphi-br@yahoogrupos.com.br
> From: dark...@yahoo.com.br
> Date: Fri, 27 Nov 2009 11:35:26 -0300
> Subject: [delphi-br] Dúvida com SQL
>
>
>
>
>
> Olá pessoal,
>
> Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
>
> Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
> relacionam.
>
> Dúvida:
>
> No Cabeçalho do Conhecimento tenho os campos:
> Remetente
> Destinatário
> Pagador
>
> Pergunta:
> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> que criar uma tabela para cada um deles?
> Qual impacato eu teria se pegasse os três tabela CLIENTE?
>
> É só isso pessoal
>
> []'s
> DarkZad
>
> __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta.messenger.yahoo.com/
>
>
>
>
>
> _
> Você já ama o Messenger? Conheça ainda mais sobre ele no Novo site de
> Windows Live.
> http://www.windowslive.com.br/?ocid=WindowsLive09_MSN_Hotmail_Tagline_out09
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>


-- 
Leandro, MuTukA


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

Re: [delphi-br] Dúvida com SQL

[Leandro]

vc tem q fazer a verificacao de relacao: 1 -> N, 1 -> 1 ou N -> N, no
primeiro caso nao precisa criar uma terceira tabela, no segundo nao precisa
nem da segunda tabela soh da tabela cliente, no terceiro sim precisa de uma
tabela com chaves estrageiras das duas (cliente e frete)

se nao entendeu oq eu disse entao da uma pesquisada sobre o assunto para
ficar a par..

2009/11/27 Darkzad 

>
>
> Olá pessoal,
>
> Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.
>
> Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se
> relacionam.
>
> Dúvida:
>
> No Cabeçalho do Conhecimento tenho os campos:
> Remetente
> Destinatário
> Pagador
>
> Pergunta:
> Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho
> que criar uma tabela para cada um deles?
> Qual impacato eu teria se pegasse os três tabela CLIENTE?
>
> É só isso pessoal
>
> []'s
> DarkZad
>
> __
> Faça ligações para outros computadores com o novo Yahoo! Messenger
> http://br.beta.messenger.yahoo.com/
>
>  
>



-- 
Leandro, MuTukA


[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

RE: [delphi-br] Dúvida - Para o Bruno Lichot

[Bruno Lichot]

Todos os produtos licenciados tem limite de instalações, mas não é um limite 
que se consuma nem em um ano, pensando que vc formataria sua maquina umas 5 
vezes por ano.

 

Chegando no limite vc pode fazer um bump através do próprio site para usuários 
registrados ou solicitar o bump através do suporte.

 

Agora se vc instalar um licença varias vezes para usuários diferentes, alem de 
ser caracterizado pirataria devido ao fato de mais de um usuário utilizar um 
única licença, o seu numero de instalações também será consumido mais rápido.

 

Abs

 

BL

 

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of João Carlos
Sent: sexta-feira, 27 de novembro de 2009 10:11
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Dúvida - Para o Bruno Lichot

 

  

Caro Bruno,

O Delphi 2010 continua com o limite de instalações ?
No Delphi PHP o limite era de 5 instalações, caso quisesse fazer uma 
sexta instalação tinha que entrar no site da Codegear/Embarcadero para 
solicitar o aumento de número de instalações.

[]´s

João Carlos



 

Click here 
<https://www.mailcontroller.altohiway.com/sr/OgRme9Pb!FDTndxI!oX7UnF1h4o+NsfXwzTO!je67PlrFGVO+EtKGYfgbI20tEGaSw9fV5QVhWApdY6WjzZSeg==>
  to report this email as spam.

This message has been scanned for viruses by MailController 
<http://www.MailController.altohiway.com/> .



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

[delphi-br] Dúvida - Para o Bruno Lichot

[João Carlos]

Caro Bruno,

O Delphi 2010 continua com o limite de instalações ?
No Delphi PHP o limite era de 5 instalações, caso quisesse fazer uma 
sexta instalação tinha que entrar no site da Codegear/Embarcadero para 
solicitar o aumento de número de instalações.

[]´s

João Carlos

[delphi-br] Dúvida com SQL

[Darkzad]

Olá pessoal,

Estou desenvolvendo um aplicatico para Emitir Conhecimento de Frete.

Tenho a Tabela Cliente e a Tabela cabeçalho do Conhecimento que se 
relacionam.

Dúvida:

No Cabeçalho do Conhecimento tenho os campos:
Remetente
Destinatário
Pagador

Pergunta:
Esses três campos PODE ser todos pegos da tabela CLIENTE ou eu tenho 
que criar uma tabela para cada um deles?
Qual impacato eu teria se pegasse os três tabela CLIENTE?

É só isso pessoal

[]'s
DarkZad

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] Dúvida TEF

[Desenvolvimento]

O desconto pode ser no valor total da nota, e não será ilegal !
Em 110% das empresas de e-comerce fazem: 
Pagamento por boleto:  Desconto 10%
Cartão em  12x  sem juros  (as vezes com juros)
Outros...

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

Re: [delphi-br] Dúvida TEF

[Alisson Yahoo]

Como funciona esse desconto embutido? O item é vendido por um preço menor? 
Se for assim, é ilegal, pois o valor do produto deve ser o mesmo 
independente da forma da pagamento. 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] Dúvida TEF

[Braytiner]

Estava lendo o roteiro do TEF (o programa Aplicativo Fiscal deve
ter as rotinas de TEF implantadas para a homologação) e surgiu um pequena
dúvida...

Primeiro vou explicar como realizo o fechamento de um cupom fiscal em minha
aplicação:

Guardo as formas de pagamento escolhidas pelo consumidor em um vetor (pode
acontecer do cara querer pagar parte em Dinheiro e parte em cartão), até que
o total pago pelo cliente seja menor que o total da venda.

Quando se iguala ao total da venda, realizo o fechamento do cupom:

Inicio o fechamento do cupom

Efetuo cada forma de pagamento escolhida pelo usuário no ECF

Termino o fechamento do cupom fiscal imprimindo uma mensagem comercial.

Lendo o roteiro do TEF, vi que a rotina de Iniciar Fechamento do cupom deve
ser chamada no momento que o cliente escolher a forma com TEF... dessa
maneira não posso escolher outras formas de pagamento (que possuem um
desconto embutido nelas), uma vez que o desconto é informado na rotina
IniciaFechamentoCupom...

Como vocês tratam essa questão?

"Como o homem imagina em seu coração, assim ele é"
Braytiner


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

Res: [delphi-br] Dúvida Delphi 2010

[Joao Denois]

Fala Marcelo Blz?
Então já tinha feito isso que falou, mais o problema persiste pois no banco 
meus campos estão como float... Mais mesmo assim valeu!!

Abraços

João Denois




De: stefaniak 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Qui, Outubro 22, 2009 6:32:52 PM
Assunto: Re: [delphi-br] Dúvida Delphi 2010

  
para esse problema de single x float,
fiz a seguinte gambiarra, view as text, no datamodule,
troquei todos os float para single,
funcionou

sds
marcelo luiz stefaniak

Em 22/10/2009 15:37, joaodenois escreveu:
>
> Boa tarde pessoal,
> Seguinte... Tenho meu projeto rodando no D2009, uso banco FireBird e 
> dbExpress com um driver de terceiro, Até ai tudo bem, funciona legal, 
> mais resolvi testar o driver do FireBird que vem com o D2010 mais 
> ocorre o seguinte problema. Tenho no meu banco variáveis do tipo Float 
> quando executo a aplicação acusa um erro de incompatibilidade de tipos 
> Float ; Single, dei uma olhada no ClientDataSet e no SqlDataSet e pude 
> notar que os campos estão com o tipo Single resolvi popular os campos 
> novamente e mesmo assim eles insistem em vir como Single... Alguma 
> explicação para isso? Pois os campos são Float. Tentei criar os campos 
> na mão mais o erro persiste.
>
> Alguem já passou por isso?
>
>
> Abraços.
>
> João Ricardo
>
> 





  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida Delphi 2010

[stefaniak]

para esse problema de single x float,
fiz a seguinte gambiarra, view as text, no datamodule,
troquei todos os float para single,
funcionou

sds
marcelo luiz stefaniak

Em 22/10/2009 15:37, joaodenois escreveu:
>
> Boa tarde pessoal,
> Seguinte... Tenho meu projeto rodando no D2009, uso banco FireBird e 
> dbExpress com um driver de terceiro, Até ai tudo bem, funciona legal, 
> mais resolvi testar o driver do FireBird que vem com o D2010 mais 
> ocorre o seguinte problema. Tenho no meu banco variáveis do tipo Float 
> quando executo a aplicação acusa um erro de incompatibilidade de tipos 
> Float ; Single, dei uma olhada no ClientDataSet e no SqlDataSet e pude 
> notar que os campos estão com o tipo Single resolvi popular os campos 
> novamente e mesmo assim eles insistem em vir como Single... Alguma 
> explicação para isso? Pois os campos são Float. Tentei criar os campos 
> na mão mais o erro persiste.
>
> Alguem já passou por isso?
>
>
> Abraços.
>
> João Ricardo
>
> 

[delphi-br] Dúvida Delphi 2010

[joaodenois]

Boa tarde pessoal,
Seguinte... Tenho meu projeto rodando no D2009, uso banco FireBird e dbExpress 
com um driver de terceiro, Até ai tudo bem, funciona legal, mais resolvi testar 
o driver do FireBird que vem com o D2010 mais ocorre o seguinte problema. Tenho 
no meu banco variáveis do tipo Float quando executo a aplicação acusa um erro 
de incompatibilidade de tipos Float ; Single, dei uma olhada no ClientDataSet e 
no SqlDataSet e pude notar que os campos estão com o tipo Single resolvi 
popular os campos novamente e mesmo assim eles insistem em vir como Single... 
Alguma explicação para isso? Pois os campos são Float. Tentei criar os campos 
na mão mais o erro persiste.

Alguem já passou por isso?
 
 
Abraços.
 
João Ricardo 

[delphi-br] Dúvida Delphi 2010

[Joao Denois]

Boa tarde pessoal,
Seguinte... Tenho meu projeto rodando no D2009, uso banco FireBird e dbExpress 
com um driver de terceiro, Até ai tudo bem, funciona legal, mais resolvi 
testar o driver do FireBird que vem com o D2010 mais ocorre o 
seguinte problema. Tenho no meu banco variáveis do tipo Float quando executo a 
aplicação acusa um erro de incompatibilidade de tipos Float ; Single, dei uma 
olhada no ClientDataSet e no SqlDataSet e pude notar que os campos estão com o 
tipo Single resolvi popular os campos novamente e mesmo assim eles insistem em 
vir como Single Alguma explicação para isso? Pois os campos são Float. 
Tentei criar os campos na mão mais o erro persiste.
Alguem já passou por isso?


Abraços.

João Ricardo 


  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] Dúvida WebService Proxy

[cont...@micromassi.com.br]

cont...@micromassi.com.br escreveu:
> Ola pessoal..
> Preciso acessar um webservice através de uma rede proxy, no componente 
> THTTPRIO informei o usuário e senha, conforme abaixo:
>
> RIO.HTTPWebNode.UserName  :=Form1.Edit2.Text;
> RIO.HTTPWebNode.Password   :=FORM1.Edit1.Text;
> RIO.HTTPWebNode.Proxy  :=Form1.Edit3.Text;
> RIO.HTTPWebNode.UseUTF8InHeader :=True;
>
> Mas não funciona, apresenta a msg: "Authentication Required - the ISA 
> Server requires authorization to fulfill the request".
> O proxy é o ISA Server 2000 Micro$oft.
>
> Agradeço a ajuda...
>
> Evandro
>
>

[delphi-br] Dúvida WebService Proxy

[cont...@micromassi.com.br]

Ola pessoal..
Preciso acessar um webservice através de uma rede proxy, no componente 
THTTPRIO informei o usuário e senha, conforme abaixo:

RIO.HTTPWebNode.UserName  :=Form1.Edit2.Text;
RIO.HTTPWebNode.Password   :=FORM1.Edit1.Text;
RIO.HTTPWebNode.Proxy  :=Form1.Edit3.Text;
RIO.HTTPWebNode.UseUTF8InHeader :=True;

Mas não funciona, apresenta a msg: "Authentication Required - the ISA 
Server requires authorization to fulfill the request".
O proxy é o ISA Server 2000 Micro$oft.

Agradeço a ajuda...

Evandro

Res: [delphi-br] Dúvida sobre campo DateTime

[Pedro Neves]

Deu certo.


Obrigado pela dica.

Pedro





De: Ulisses 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 21 de Agosto de 2009 15:38:54
Assunto: Re: [delphi-br] Dúvida sobre campo DateTime

  
Boa tarde!

O Parâmetro tem que ser AsDateTime, caso contrário ele só vai considerar a 
parte inteira.

Boa sorte.

Ulisses

- Original Message - 
From: eliflaviob 
To: delphi...@yahoogrup os.com.br 
Sent: Friday, August 21, 2009 9:00 AM
Subject: [delphi-br] Dúvida sobre campo DateTime

Pedro, um campo DateTime armazena a data na parte inteira e a hora na parte 
decima, portanto, faça apenas uma linha para armazenar a Data e a Hora, algo 
mais ou menos assim:

QRCadastro.ParamByN ame('DataInicio' ).AsDate: = 
StrToDate(Edit5. Text) + StrToTime(Edit6. Text); 
QRCadastro.ParamByN ame('DataFim' ).AsDate: = 
StrToDate(Edit7. Text) + StrToTime(Edit8. Text); 

Porém, te aconselho a usar o componente TJvDateEdit da JVCL para edição de data 
e o TDateTimePicker do próprio Delphi para a hora.

Eli

--- Em delphi...@yahoogrup os.com.br, Pedro Neves  escreveu
>
> Estou com a seguinte dificuldade: 
> 
> Estou tentando gravar a data e a hora no banco usando: 
> Begin 
> QRCadastro.Close; 
> QRCadastro.Sql. Clear; 
> QRCadastro.Sql. Add('Insert Into Tabela(Matricula, DataInicio, 
> DataFim)'); 
> QRCadastro.Sql. Add('Values( :Matricula, :DataInicio, :DataFim)'); 
> QRCadastro.ParamByN ame('Matricula' ).AsString: = Edit2.Text; 
> 
> QRCadastro.ParamByN ame('DataInicio' ).AsDate: = StrToDate(Edit5. Text); 
> QRCadastro.ParamByN ame('DataFim' ).AsDate: = StrToDate(Edit7. Text); 
> 
> QRCadastro.ParamByN ame('DataInicio' ).AsTime: = StrToTime(Edit6. Text); 
> QRCadastro.ParamByN ame('DataFim' ).AsTime: = StrToTime(Edit8. Text); 
> 
> QRCadastro.ExecSQL; 
> End 
> 
> 
> O campo no banco de dados é do tipo datetime e quando gravo a data dá 
> certo mas se comentar (//) a data e gravar a hora dá erro no banco. 
> Alguém sabe onde está o erro. 
> 
> 
> grato 
> 
> Pedro. 
> 
> 
>  _ _ _ _ _ _
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbusca dos.yahoo. com
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

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





  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida sobre campo DateTime

[Ulisses]

Boa tarde!

O Parâmetro tem que ser AsDateTime, caso contrário ele só vai considerar a 
parte inteira.

Boa sorte.

Ulisses

  - Original Message - 
  From: eliflaviob 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 21, 2009 9:00 AM
  Subject: [delphi-br] Dúvida sobre campo DateTime


Pedro, um campo DateTime armazena a data na parte inteira e a hora na parte 
decima, portanto, faça apenas uma linha para armazenar a Data e a Hora, algo 
mais ou menos assim:

  QRCadastro.ParamByName('DataInicio').AsDate:= 
  StrToDate(Edit5.Text) + StrToTime(Edit6.Text); 
  QRCadastro.ParamByName('DataFim').AsDate:= 
  StrToDate(Edit7.Text) + StrToTime(Edit8.Text); 

  Porém, te aconselho a usar o componente TJvDateEdit da JVCL para edição de 
data e o TDateTimePicker do próprio Delphi para a hora.

  Eli

  --- Em delphi-br@yahoogrupos.com.br, Pedro Neves  escreveu
  >
  > Estou com a seguinte dificuldade: 
  > 
  >Estou tentando gravar a data e a hora no banco usando: 
  > Begin 
  >QRCadastro.Close; 
  >QRCadastro.Sql.Clear; 
  >QRCadastro.Sql.Add('Insert Into Tabela(Matricula, DataInicio, 
  > DataFim)'); 
  >QRCadastro.Sql.Add('Values(:Matricula, :DataInicio, :DataFim)'); 
  >QRCadastro.ParamByName('Matricula').AsString:= Edit2.Text; 
  > 
  >QRCadastro.ParamByName('DataInicio').AsDate:= StrToDate(Edit5.Text); 
  >QRCadastro.ParamByName('DataFim').AsDate:= StrToDate(Edit7.Text); 
  > 
  >   QRCadastro.ParamByName('DataInicio').AsTime:= StrToTime(Edit6.Text); 
  >QRCadastro.ParamByName('DataFim').AsTime:= StrToTime(Edit8.Text); 
  > 
  >QRCadastro.ExecSQL; 
  > End 
  > 
  > 
  > O campo no banco de dados é do tipo datetime e quando gravo a data dá 
  > certo mas se comentar (//) a data e gravar a hora dá erro no banco. 
  > Alguém sabe onde está o erro. 
  > 
  > 
  > grato 
  > 
  > Pedro. 
  > 
  > 
  > __
  > Veja quais são os assuntos do momento no Yahoo! +Buscados
  > http://br.maisbuscados.yahoo.com
  > 
  > [As partes desta mensagem que não continham texto foram removidas]
  >



  

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

[delphi-br] Dúvida sobre campo DateTime

[eliflaviob]

Pedro, um campo DateTime armazena a data na parte inteira e a hora na parte 
decima, portanto, faça apenas uma linha para armazenar a Data e a Hora, algo 
mais ou menos assim:

QRCadastro.ParamByName('DataInicio').AsDate:= 
StrToDate(Edit5.Text) + StrToTime(Edit6.Text); 
QRCadastro.ParamByName('DataFim').AsDate:= 
StrToDate(Edit7.Text) + StrToTime(Edit8.Text); 

Porém, te aconselho a usar o componente TJvDateEdit da JVCL para edição de data 
e o TDateTimePicker do próprio Delphi para a hora.

Eli

--- Em delphi-br@yahoogrupos.com.br, Pedro Neves  escreveu
>
> Estou com a seguinte dificuldade: 
> 
>    Estou tentando gravar a data e a hora no banco usando: 
> Begin 
>    QRCadastro.Close; 
>    QRCadastro.Sql.Clear; 
>    QRCadastro.Sql.Add('Insert Into Tabela(Matricula, DataInicio, 
> DataFim)'); 
>    QRCadastro.Sql.Add('Values(:Matricula, :DataInicio, :DataFim)'); 
>    QRCadastro.ParamByName('Matricula').AsString:= Edit2.Text; 
> 
>    QRCadastro.ParamByName('DataInicio').AsDate:= StrToDate(Edit5.Text); 
>    QRCadastro.ParamByName('DataFim').AsDate:= StrToDate(Edit7.Text); 
> 
>   QRCadastro.ParamByName('DataInicio').AsTime:= StrToTime(Edit6.Text); 
>    QRCadastro.ParamByName('DataFim').AsTime:= StrToTime(Edit8.Text); 
> 
>    QRCadastro.ExecSQL; 
> End 
> 
> 
> O campo no banco de dados é do tipo datetime e quando gravo a data dá 
> certo mas se comentar (//) a data e gravar a hora dá erro no banco. 
> Alguém sabe onde está o erro. 
> 
> 
> grato 
> 
> Pedro. 
> 
> 
>   
> 
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

[delphi-br] Dúvida no relatório

[Hugo Vieira]

Bom dia amigos,

 

sou iniciante em delphi e estou desenvolvendo uma aplicação.

 

O problema é o seguinte: Tenho uma tela onde possui todos os clientes e seus 
respectivos dados. Fiz uma função de pesquisa de cliente, informando o nome 
para a busca, e a mesma funciona normalmente. no form da pesquisa botei um 
botao "imprimir" no qual abre um relatorio com o cliente localizado. Minha 
duvida é a seguinte:

 

Como eu faço para "linkar" o relatorio ao cliente selecionado, visto que a 
query de pesquisa pode encontrar mais de uma pessoa? 

 

 

Eu linko o relatorio na query, mas nao funciona. Pensei em armazenar o codigo 
do cliente em uma variavel para fazer uma outra query no relatorio. mas como eu 
faria isso ?

 

 

Grato!

Hugo






 







_
Novo Internet Explorer 8. Baixe agora, é grátis!
http://brasil.microsoft.com.br/IE8/mergulhe/?utm_source=MSN%3BHotmail&utm_medium=Tagline&utm_campaign=IE8

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

[delphi-br] Dúvida com o DBComboBox.

[jccj2...@ymail.com]

Olá...Galera.
Estou com uma dúvida aqui em casa,tenho uma aplicação e ela possui um CheckBox 
e um DBComboBox ,gostaria de quando marcado o CheckBox apareçe-se 
automaticamente todos os meses do ano no DBComboBox (Isso em RunTime).
Tentei esse Código abaixo.

No evento OnClick do CheckBox

procedure TFormAgendamento.CheckBoxMesClick(Sender: TObject);
begin
   DBComboBoxValor.Items.Add('Janeiro');
   DBComboBoxValor.Items.Add('Fevereiro');
   .
   .
   .
   DBComboBoxValor.Items.Add('Dezembro');
   
end;

O problema é que Até aparece no DBComboBox os meses,mas quando clico em algum 
mês Simplesmente não é selecionado.

Obrigado pela atenção
Jairo.

[delphi-br] Dúvida em formatação para insert com sql D2009

[papaia.forum]

Cenário: D2009 + DataSnap + Firebird + Drive do Thiago Borges.
Tenho que gravar em uma tabela filho e em uma "neta", mas não dá para usar 
master/detail, pois essa gravação é condicional; portanto estou utilizado o 
evento AfterUpdateRecord do provider da tabela "Pai", onde testo a condição 
pelo DeltaDS. Até aí tudo bem. O problema ocorre porque tenho que gravar um 
valor fracionario (tipo 0.50 centavos) na tabela "neta", e já usei todo tipo 
de formatação na instrução sql e não consigo gravar o valor com as casas 
decimais (se usar uma mascara que arredonda aí consigo gravar). Segue a 
instrução sql:


   // grava da tabela neta.
   Ssql:='insert into 
COMISSOES_CONFIG_DETALHE(id_comissoes_config_detalhe, '
   + 'id_comissoes_config,data,comissao_supervisor_tipo,'
   + 'comissao_supervisor_valor, comissao_vendedor_tipo,'
   + 'comissao_vendedor_valor,id_usuario, datahoradigitacao)'
   + ' values (gen_id(gen_comissoes_config_detalhe_id,1) '
   + ', ' + IntToStr(cont)
   + ', ' + quotedstr(FormatDateTime('mm/dd/', 
DeltaDS.FieldByName('DATA').AsDateTime))
   + ', ' + DeltaDS.FieldByName('COMISSAO_SUPERVISOR_TIPO').AsString
   + ', ' + quotedstr(FormatFloat('#.00', 
DeltaDS.FieldByName('COMISSAO_SUPERVISOR_VALOR').AsCurrency))
   + ', ' + DeltaDS.FieldByName('COMISSAO_VENDEDOR_TIPO').AsString
   + ', ' + quotedstr(FormatFloat('#.00', 
DeltaDS.FieldByName('COMISSAO_VENDEDOR_VALOR').AsCurrency))
   + ', ' + DeltaDS.FieldByName('ID_USUARIO').AsString
   + ', current_timestamp)';
   sqlAux.Close;
   sqlAux.CommandText:=Ssql;
   sqlAux.ExecSQL(True);

O erro está na linha que tem o QuotedStr.
Já pesquisei nesta lista e em outras, e acho que já usei todas as opções de 
máscaras, mas nenhum funcionou.
Se alguem puder dar alguma dica, antecipadamente deixo meus agradecimentos.

waldir silva. 


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

Re: [delphi-br] Dúvida com Zeos

[Eduardo Silva dos Santos]

Olá pessoal, oque vou falar não vai resolver o problema de vocês com Zeos,
mais é uma excelente dica..

Eu usei zeos durante anos, realmente é fantástico, mas infelizmente é um
projeto que devido a vários fatores tem suas limitações em relação a
desenvolvimento e suporte.

eu acredito que quem tem um software profissional e em produção não pode
ficar refém desse tipo de problema.

então para quem precisa de tranquilidade e um suporte à contento eu
recomendo o  Unidac  http://www.devart.com/unidac/

deem uma olhada, baixem o trial que vale a pena.

att, Eduardo.

2009/6/16 omar l m rosa 

>
>
> HI!
>
> Só para aumentar suas dúvidas
>
> Estou enfrentando problemas com Zeos desde a versao 6.4.4
>
> Voltei para a 6.2.2.rc
>
> Ex: a) parse de SQL, nome de tabela com delimitador "[" "]" não eceita
> edição fic a "read only" como se fosse uma view...
> b) campos identity vez que outra nao retornam novo valor à aplicacao...
> c) lentidão ao abrir o dataset
>
> Bai!
>
> <º><.·´¯`·. <º><.·´¯`·. <º><.·´¯`·.
> Omar L. M. Rosa
> <º><.·´¯`·. <º><.·´¯`·. <º><.·´¯`·.
> o...@conesul.inf.br 
>
> - Original Message -
> From: Leonardo Quinino
> To: delphi-br@yahoogrupos.com.br  ;
> delphitodel...@yahoogrupos.com.br  ;
> delphi_soprogramado...@yahoogrupos.com.br
> Sent: Tuesday, June 16, 2009 9:47 AM
> Subject: [delphi-br] Dúvida com Zeos
>
> Pessoal, estou testando o Zeos LIb 6.5.5 , com Delphi 7 + Firebird 2.1
> Tive duas dúvidas.
>
> 1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55 mostra
> no componente, DBEDIT 6,00
>
> 2) não conseguir rodar o seguinte select...
>
> select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
> Total from ITENS_VENDAS
> WHERE ID_INTERNO = '5578'
>
> Coloquei o mesmo select, num ClientDataSet + SQLQuery e roda beleza.
>
> Isso é algo da natureza do ZEOS ?
>
> --
> Leonardo Quinino
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


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

Re: [delphi-br] Dúvida com Zeos

[Moacir - GMail]

Leonardo,

Qual o erro reportado quando vc roda este select no ZEOS ??

Moacir


Leonardo Quinino escreveu:
> Pessoal, estou testando o Zeos LIb 6.5.5 ,  com Delphi 7 + Firebird 2.1
> Tive duas dúvidas.
>
> 1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55  mostra
> no componente, DBEDIT 6,00
>
> 2) não conseguir rodar o seguinte select...
>
> select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
> Total from ITENS_VENDAS
> WHERE  ID_INTERNO = '5578'
>
> Coloquei o mesmo select, num ClientDataSet + SQLQuery   e roda beleza.
>
> Isso é algo da natureza do ZEOS ?
>
>
>   

Re: [delphi-br] Dúvida com Zeos

[omar l m rosa]

HI!

Só para aumentar suas dúvidas

Estou enfrentando problemas com Zeos desde a versao 6.4.4

Voltei para a 6.2.2.rc 

Ex: a) parse de SQL, nome de tabela com delimitador "[" "]"  não eceita edição 
fic a "read only" como se fosse uma view...
  b) campos identity vez que outra nao retornam novo valor à aplicacao...
  c) lentidão ao abrir o dataset

Bai!

<º><.·´¯`·. <º><.·´¯`·. <º><.·´¯`·.
 Omar L. M. Rosa
<º><.·´¯`·. <º><.·´¯`·. <º><.·´¯`·.
   o...@conesul.inf.br
 
  - Original Message - 
  From: Leonardo Quinino 
  To: delphi-br@yahoogrupos.com.br ; delphitodel...@yahoogrupos.com.br ; 
delphi_soprogramado...@yahoogrupos.com.br 
  Sent: Tuesday, June 16, 2009 9:47 AM
  Subject: [delphi-br] Dúvida com Zeos





  Pessoal, estou testando o Zeos LIb 6.5.5 , com Delphi 7 + Firebird 2.1
  Tive duas dúvidas.

  1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55 mostra
  no componente, DBEDIT 6,00

  2) não conseguir rodar o seguinte select...

  select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
  Total from ITENS_VENDAS
  WHERE ID_INTERNO = '5578'

  Coloquei o mesmo select, num ClientDataSet + SQLQuery e roda beleza.

  Isso é algo da natureza do ZEOS ?

  -- 
  Leonardo Quinino

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



  

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

[delphi-br] Dúvida com Zeos

[Leonardo Quinino]

Pessoal, estou testando o Zeos LIb 6.5.5 ,  com Delphi 7 + Firebird 2.1
Tive duas dúvidas.

1) em alguns campos do tipo NUMERIC (9,2) , no banco de dados 5.55  mostra
no componente, DBEDIT 6,00

2) não conseguir rodar o seguinte select...

select sum( cast( quantidade * valor_unitario as numeric( 18, 2 ) ) ) as
Total from ITENS_VENDAS
WHERE  ID_INTERNO = '5578'

Coloquei o mesmo select, num ClientDataSet + SQLQuery   e roda beleza.

Isso é algo da natureza do ZEOS ?


-- 
Leonardo Quinino


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

Re: [delphi-br] !!!Dúvida tabela!!!

[Fernando de Laurentiis]

Bom dia pessoal, tentarei ser mais claro.

Estou fazendo um pgm q lê todas as tabelas do banco, suas estruturas, indices e 
etc, em paralelo, quero utilizar essas informações, para ler seus conteúdos, 
por isso crio o 'FieldByName' como uma string, pois vou lendo a estrutura da 
tabela e alimentando uma stringlist, e depois vou criando as linhas para ler os 
dados, como por exemplo:

 for x:=0 to slColumnName.Count-1 do
 begin
sTipoCol := VerificaTipo( slColumnType.Strings[x] );
sCampo   := 
'FieldByName('''+slColumnName.Strings[x]+''').As'+sTipoCol;

if (sTipoCol = 'Float') then
   sLinha2:='FormatFloat( ''0,000'', '+sCampo+' )';

if (sTipoCol = 'Integer') then
   sLinha2:='FormatFloat( ''0'', '+sCampo+' )';

if (sTipoCol = 'DateTime') then
   sLinha2:='FormatFloat( ''dd/mm/ hh:mm:ss'', '+sCampo+' )';

sLinha := sLinha + sLinha2+';';
 end;

Só q para ler o campo sLinha como um comando efetivamente da tabela, tentei 
usar o '@', e não obtive sucesso, por isso perguntei se alguém da lista saberia 
como fazer isso.

Fui claro?? :oD

Grato.

Em 05/06/2009 17:06, Luiz Carlos Pereira < lcrp_gru...@yahoo.com.br > 
escreveu:








Poderia ser mais clarosinceramente, não entendi

--- Em sex, 5/6/09, Fernando de Laurentiis <laurent...@uol.com.br> 
escreveu:

De: Fernando de Laurentiis <laurent...@uol.com.br>
Assunto: [delphi-br] !!!Dúvida tabela!!!
Para: "delphi-br@yahoogrupos.com.br" <delphi-br@yahoogrupos.com.br>
Data: Sexta-feira, 5 de Junho de 2009, 16:57

Pessoal, boa tarde.

Imaginemos uma situação assim:

sCampo: string;

sCampo:='Query1. FieldByName( ''CAMPOX' ').AsString' ;

Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
tabela??

[]'sss











Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: RES: [delphi-br] !!!Dúvida tabela!!!

[Moacir - GMail]

Tem aspas demais ai !!!

Deixe assim:

sCampo:=Query1.FieldByName('CAMPOX').AsString;




marcelo escreveu:
> Para voce utilizar a sCampo e vir o valor que você quer , precisar se 
> assegurar qua a query foi aberta e também em qual evento você atribui o valor 
> da query a variável sCampo. 
>
>  
>
> De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em 
> nome de Fernando de Laurentiis
> Enviada em: sexta-feira, 5 de junho de 2009 16:58
> Para: delphi-br@yahoogrupos.com.br
> Assunto: [delphi-br] !!!Dúvida tabela!!!
> Prioridade: Alta
>
>  
>
>
>
>
>
>
> Pessoal, boa tarde.
>
> Imaginemos uma situação assim:
>
> sCampo: string;
>
> sCampo:='Query1.FieldByName(''CAMPOX'').AsString';
>
> Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
> tabela??
>
> []'sss
>
>
>
> No virus found in this incoming message.
> Checked by AVG - www.avg.com
> Version: 8.5.339 / Virus Database: 270.12.53/2156 - Release Date: 06/05/09 
> 06:24:00
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> 
>
>   

RES: [delphi-br] !!!Dúvida tabel a!!!

[marcelo]

Para voce utilizar a sCampo e vir o valor que você quer , precisar se assegurar 
qua a query foi aberta e também em qual evento você atribui o valor da query a 
variável sCampo. 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome 
de Fernando de Laurentiis
Enviada em: sexta-feira, 5 de junho de 2009 16:58
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] !!!Dúvida tabela!!!
Prioridade: Alta

 






Pessoal, boa tarde.

Imaginemos uma situação assim:

sCampo: string;

sCampo:='Query1.FieldByName(''CAMPOX'').AsString';

Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
tabela??

[]'sss



No virus found in this incoming message.
Checked by AVG - www.avg.com
Version: 8.5.339 / Virus Database: 270.12.53/2156 - Release Date: 06/05/09 
06:24:00



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

Re: [delphi-br] !!!Dúvida tabela!!!

[Vinicius A. Santos]

Isso não faz sentido algum !!!

Porque vc não usa direto:
sCampo:= Query1.FieldByName(''CAMPOX'').AsString;



Fernando de Laurentiis escreveu:
>
>
> Pessoal, boa tarde.
>
> Imaginemos uma situação assim:
>
> sCampo: string;
>
> sCampo:='Query1.FieldByName(''CAMPOX'').AsString';
>
> Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX 
> da tabela??
>
> []'sss
>
> 


-- 
Vinicius A. Santos
www.msisolucoes.com.br

Re: [delphi-br] !!!Dúvida tabela!!!

[Luiz Carlos Pereira]

Poderia ser mais clarosinceramente, não entendi

--- Em sex, 5/6/09, Fernando de Laurentiis  escreveu:

De: Fernando de Laurentiis 
Assunto: [delphi-br] !!!Dúvida tabela!!!
Para: "delphi-br@yahoogrupos.com.br" 
Data: Sexta-feira, 5 de Junho de 2009, 16:57
















  
  Pessoal, boa tarde.



Imaginemos uma situação assim:



sCampo: string;



sCampo:='Query1. FieldByName( ''CAMPOX' ').AsString' ;



Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
tabela??



[]'sss


 

  




 

















  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] !!!Dúvida tabela!!!

[Fernando de Laurentiis]

Pessoal, boa tarde.

Imaginemos uma situação assim:

sCampo: string;

sCampo:='Query1.FieldByName(''CAMPOX'').AsString';

Como faço pra, qdo utilizar o sCampo, vier o conteudo do campo CAMPOX da 
tabela??

[]'sss

Re: [delphi-br] Dúvida com Debug (Trace into - F7)

[Joao Morais]

2009/5/28 EmbarcaDelphi :
> Pessoal, como é que faço para Debugar o código apenas na unit principal?
>
> Selecionei nas opções do Projeto:
>
> - Debug information;
> - Local symbols
> - Reference info
> - Assertions
>
> Coloquei o BreakPoint numa procedure, Run (F9). Quando chega no
> breakpoint ele para, pressiono a tecla F7 (Trace into), linha-a-linha
> vai me mostrando os passos, até aí tudo ok, mas, queria que, quando o
> compilador fosse para outras unit ele não fosse passo-a-passo. Tenho
> muitas units e o processo até terminar leva mais de hora, não compensa
> esperar tanto para encontrar o erro, e se tiver de repetir então, é um saco!
> As units não há problemas, o negócio é só no meu FormPrincipal (não
> tenho outros forms), as units é que não queria ver.

Inclua {$D-} nas units que você não quer debugar e ligue o debug info
do projeto, ou inclua {$D+} nas units que você quer debugar e desligue
o debug info do projeto. Escolha o caminho mais curto. Além disto você
pode ou não usar as units de debug da vcl (Project | Options |
Compiler | Use debug DCUs). Depois de alterar essas coisas, dê um
build all no projeto.

Joao Morais

[delphi-br] Dúvida com Debug (Trace into - F7)

[EmbarcaDelphi]

Pessoal, como é que faço para Debugar o código apenas na unit principal?

Selecionei nas opções do Projeto:

- Debug information;
- Local symbols
- Reference info
- Assertions

Coloquei o BreakPoint numa procedure, Run (F9). Quando chega no 
breakpoint ele para, pressiono a tecla F7 (Trace into), linha-a-linha 
vai me mostrando os passos, até aí tudo ok, mas, queria que, quando o 
compilador fosse para outras unit ele não fosse passo-a-passo. Tenho 
muitas units e o processo até terminar leva mais de hora, não compensa 
esperar tanto para encontrar o erro, e se tiver de repetir então, é um saco!
As units não há problemas, o negócio é só no meu FormPrincipal (não 
tenho outros forms), as units é que não queria ver.

Grato.

Re: [delphi-br] Dúvida Firebird

[Antonio Perruci]

 
É verdade. 
Estou trabalhando com 2 transações e estava realizando o commit na transação 
errada.
Agora tá certo...
Bobeada

vlw







--- Em qua, 29/4/09, Humberto Oliveira  escreveu:

De: Humberto Oliveira 
Assunto: Re: [delphi-br] Dúvida Firebird
Para: delphi-br@yahoogrupos.com.br
Data: Quarta-feira, 29 de Abril de 2009, 21:29
















  
  Isso está com cara de commit realizado no fechamento do aplicativo.

Verifique como está o isolamento da transação que você executa nos seus

aplicativos.



2009/4/29 Antonio Perruci 



>

>

> Quando inicializava o form não aparecia o registro. É que eu não tinha

> aplicado o filtro na inicialização do form.

>

> Agora no outro aplicativo, mesmo aplicando o filtro, continua não

> aparecendo.

>

> Ainda não descobrí o porque.

>

> O estranho é que se eu abrir o um Gerenciador de Dados como o IBManager e

> inserir um dado no aplicativo, nesse gerenciador também não aparece o

> registro de imediato mesmo aplicando o refresh. Mas o registro foi gravado.

> Fechando o aplicativo, aí sim aparece.

>

> Ainda não sei porque. Estou pesquisando.

>

> Se eu descobrir te passo

>

> --- Em ter, 28/4/09, Alisson >

> escreveu:

>

> De: Alisson >

> Assunto: Re: [delphi-br] Dúvida Firebird

>

> Para: delphi...@yahoogrup os.com.br 

> Data: Terça-feira, 28 de Abril de 2009, 17:05

>

> Qual era o problema? Já tive um problema parecido e não consegui saber o

> que

>

> estava acontecendo.

>

>  _ _ _ _ __

>

> Faça ligações para outros computadores com o novo Yahoo! Messenger

>

> http://br.beta. messenger. yahoo.com/

>

>

>

>

>

>

>

>

>

>

>

> Veja quais são os assuntos do momento no Yahoo! +Buscados

> http://br.maisbusca dos.yahoo. com

>

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

>

>  

>



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




 

  




 

















  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida Firebird

[berdam]

commit na hora da gravação

Antonio Perruci escreveu:
>
>
> Quando inicializava o form não aparecia o registro. É que eu não tinha 
> aplicado o filtro na inicialização do form.
>
> Agora no outro aplicativo, mesmo aplicando o filtro, continua não 
> aparecendo.
>
> Ainda não descobrí o porque.
>
> O estranho é que se eu abrir o um Gerenciador de Dados como o 
> IBManager e inserir um dado no aplicativo, nesse gerenciador também 
> não aparece o registro de imediato mesmo aplicando o refresh. Mas o 
> registro foi gravado. Fechando o aplicativo, aí sim aparece.
>
> Ainda não sei porque. Estou pesquisando.
>
> Se eu descobrir te passo
>
> --- Em ter, 28/4/09, Alisson  <mailto:alssnco%40yahoo.com.br>> escreveu:
>
> De: Alisson mailto:alssnco%40yahoo.com.br>>
> Assunto: Re: [delphi-br] Dúvida Firebird
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Data: Terça-feira, 28 de Abril de 2009, 17:05
>
> Qual era o problema? Já tive um problema parecido e não consegui saber 
> o que
>
> estava acontecendo.
>
>  _ _ _ _ __
>
> Faça ligações para outros computadores com o novo Yahoo! Messenger
>
> http://br.beta. messenger. yahoo.com/
>
>
>
>
>
>
>
>
>
>
>
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com <http://br.maisbuscados.yahoo.com>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 

-- 
-
Uberdam Cavaletti
Formado em Tecnologia da informação - Unoesc - Xxe
Pós graduado em Desenvolvimento Java - Unoesc - Xxe

Acesse  http://www.curricular.com.br/berdam
Acesse  http://passandoveneno.blogspot.com

-

Re: [delphi-br] Dúvida Firebird

[Humberto Oliveira]

Isso está com cara de commit realizado no fechamento do aplicativo.
Verifique como está o isolamento da transação que você executa nos seus
aplicativos.


2009/4/29 Antonio Perruci 

>
>
> Quando inicializava o form não aparecia o registro. É que eu não tinha
> aplicado o filtro na inicialização do form.
>
> Agora no outro aplicativo, mesmo aplicando o filtro, continua não
> aparecendo.
>
> Ainda não descobrí o porque.
>
> O estranho é que se eu abrir o um Gerenciador de Dados como o IBManager e
> inserir um dado no aplicativo, nesse gerenciador também não aparece o
> registro de imediato mesmo aplicando o refresh. Mas o registro foi gravado.
> Fechando o aplicativo, aí sim aparece.
>
> Ainda não sei porque. Estou pesquisando.
>
> Se eu descobrir te passo
>
> --- Em ter, 28/4/09, Alisson >
> escreveu:
>
> De: Alisson >
> Assunto: Re: [delphi-br] Dúvida Firebird
>
> Para: delphi-br@yahoogrupos.com.br 
> Data: Terça-feira, 28 de Abril de 2009, 17:05
>
> Qual era o problema? Já tive um problema parecido e não consegui saber o
> que
>
> estava acontecendo.
>
>  _ _ _ _ __
>
> Faça ligações para outros computadores com o novo Yahoo! Messenger
>
> http://br.beta. messenger. yahoo.com/
>
>
>
>
>
>
>
>
>
>
>
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>


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

Re: [delphi-br] Dúvida Firebird

[Antonio Perruci]

Quando inicializava o form não aparecia o registro. É que eu não tinha aplicado 
o filtro na inicialização do form.

Agora no outro aplicativo, mesmo aplicando o filtro, continua não aparecendo.

Ainda não descobrí o porque.

O estranho é que se eu abrir o um Gerenciador de Dados como o IBManager e 
inserir um dado no aplicativo, nesse gerenciador também não aparece o registro 
de imediato mesmo aplicando o refresh. Mas o registro foi gravado. Fechando o 
aplicativo, aí sim aparece.

Ainda não sei porque. Estou pesquisando.

Se eu descobrir te passo








--- Em ter, 28/4/09, Alisson  escreveu:

De: Alisson 
Assunto: Re: [delphi-br] Dúvida Firebird
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 28 de Abril de 2009, 17:05
















  
  Qual era o problema? Já tive um problema parecido e não consegui saber o 
que 

estava acontecendo. 



 _ _ _ _ __

Faça ligações para outros computadores com o novo Yahoo! Messenger 

http://br.beta. messenger. yahoo.com/ 



 

  




 

















  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida Firebird

[Alisson]

Qual era o problema? Já tive um problema parecido e não consegui saber o que 
estava acontecendo. 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

Re: [delphi-br] Dúvida Firebird

[Antonio Perruci]

Desculpa aí
 
Já corrigi a minha falha aqui
 
Obrigado !
 
 
 
 
 
 


--- Em ter, 28/4/09, Antonio Perruci  escreveu:


De: Antonio Perruci 
Assunto: [delphi-br] Dúvida Firebird
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 28 de Abril de 2009, 15:26








Olá
 
Estou com um probleminha aqui
 
Tenho 2 aplicativos diferentes que utilizam uma mesma tabela de cadastro.
 
Quando digito um cadastro em um deles e ainda este estando aberto, se eu abro o 
outro o registro não aparece neste outro. Para aparecer eu preciso sair do 
sistema onde eu fiz o cadastro e entrar novamente. E no mesmo computador que eu 
fiz o cadastro também não está aparecendo até que eu feche o aplicativo. Estou 
usando o Fb 2.1, estou usando D7 e estou aplicando o commit na gravação, enfim 
não sei o que é.
 
Se alguém tiver alguma idéia, por favor me dê uma ajuda.
 
Obrigado
 
 

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbusca dos.yahoo. com

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

















  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

[delphi-br] Dúvida Firebird

[Antonio Perruci]

Olá
 
Estou com um probleminha aqui
 
Tenho 2 aplicativos diferentes que utilizam uma mesma tabela de cadastro.
 
Quando digito um cadastro em um deles e ainda este estando aberto, se eu abro o 
outro o registro não aparece neste outro. Para aparecer eu preciso sair do 
sistema onde eu fiz o cadastro e entrar novamente. E no mesmo computador que eu 
fiz o cadastro também não está aparecendo até que eu feche o aplicativo. Estou 
usando o Fb 2.1, estou usando D7 e estou aplicando o commit na gravação, enfim 
não sei o que é.
 
Se alguém tiver alguma idéia, por favor me dê uma ajuda.
 
Obrigado
 
 


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

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

Re: [delphi-br] Dúvida com Rave Reports

[Fabio Thomaz]

Não seria apenas informar a propriedade ControllerBand do Band Component
não?

2009/4/24 ott...@ymail.com 

>
>
> Bom dia
> Alguém sabe qual propriedade do databand do Rave Reports que não permite a
> impressão do databand mestre se o seu detalhe não tiver nenhum registro?
>
> Deste já agradeço qualquer ajuda.
>
>  
>



-- 
Fábio Thomaz
RG System Informática Ltda - Desenvolvimento


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

[delphi-br] Dúvida com Rave Reports

[ott...@ymail.com]

Bom dia
Alguém sabe qual propriedade do databand do Rave Reports que não permite a 
impressão do databand mestre se o seu detalhe não tiver nenhum registro?

Deste já agradeço qualquer ajuda.

[delphi-br] Dúvida com record e Array

[EmbarcaDelphi]

Sou iniciante em Delphi, estou trabalhando num escritório que já existe 
um programinha de vendas de produtos feito em Delphi 7.
Não existe uma rotina para deletar o produto, o que existe é se ele é 
ativo ou não, se for ativo é visível no relatório, etc...
Isso está deixando o arquivo muito grande, e eu pensei em mudar para 
excluir fisicamente.
Não há Banco de Dados, e o meu chefe não quer refazer o programa, então 
vou só implementar mesmo...

Tentei fazer um array multiplo para mudar o id_Cliente antigo, o nome e 
o id_clientenovo (vcs vão ver mais abaixo, mas não implementei nada aqui 
do array)
Seria o array mais ou menos assim:

tmpArrayCliente  : array of array of String;

tmpArrayCliente[NOrdem -1][0] := IntToStr(clientes.id_cliente);
tmpArrayCliente[NOrdem -1][1] :=  cliente.nome;
tmpArrayCliente[NOrdem -1][2] := IntToStr(NOrdem);

pego na rotina de exclusão de clientes e uso na rotina de manutenção do 
record produtos, mas não estou conseguindo.


Exemplo para facilitar o que estou dizendo:

type
   clientes = record
  id_cliente : integer;
   nome : String[40];
end;

type
  produtos = record
  id_produto : integer;
  id_cliente : integer;
  produto : string[60];
end;
...
var
  fcliente : file of clientes;
  cliente : clientes;
  fproduto: file of produtos;
  produto: produtos;
...

// É claro que existem mais coisas, porém, para facilitar o entendimento 
vou colocar apenas estes.

Quando eu excluir um cliente quero que o produto do cliente (que foi 
removido) também seja removido. Eu até fiz, só que, quando vou 
visualizar os clientes, os produtos deles são trocados, verificando, 
vejo que o número de ordem (1,3,4...) fica sem um número, então eu fiz:

Tem todo aquele processo de abrir, reset, etc... que não vou colocar 
aqui, só o necessário.

procedure...
var
  nOrdem : integer;
begin
  nOrdem := 1;

seek(fcliente,0);
while not eof(fcliente) do
begin
  {se diferente do que vai ser excluído}
  if cliente.id_cliente <> StrToInt(label1.caption) then
  begin
 {tmpcliente é um record temporário}
  tmpcliente.id_cliente := nOrdem;
  tmpcliente.nome := cliente.nome;

// aqui eu pegava também o id_cliente, o nOrdem, o nome e colocava no 
array dito lá no início
  end;

inc(nOrdem);
end;

{Até que funciona, ele coloca em ordem novamente, 1,2,3,4...
O problema é com o record PRODUTOS. Quero eliminar o produto referente 
aquele cliente excluído e deixar na ordem, sendo que a ordem bata com a 
ordem do record dos clientes: id_cliente = 2 - nome = fernando.
produtos: "produto.id_cliente = 2" fique para fernando (lembrando que a 
ordem foi mudada e o id_cliente 2 era de outra pessoa, mas foi excluído, 
e colocado o nOrdem novamente deixando o id_cliente para, agora, com 
fernando.
Tentei implementar com o array mas fiquei todo enrolado :) }

// Entenderam? Não sei se existe outra forma de fazer isso, eu tentei 
usar a lógica da lógica que eu tenho :)
end;

Robson

RES: [delphi-br] Dúvida com consulta SQL

[Ralp Alves Bezerra]

Como já disse em um post anterior, já estou trabalhando com o firebird em
minhas aplicações. O problema e que assumi este sistema de outro programador
e o mesmo já roda a mais de 4 anos e é em paradox.

 

Em breve estarei migrando este sistema para o firebird.

 

No caso do problema na consulta, é que ocorre de o usuário dar 2 entradas
por mês em uma nota fiscal  (tabela Entradas) para determinado produto e 100
saídas (tabela Saídas) para este mesmo produto.

 

O que queria fazer seria o seguinte, juntar as duas tabelas e gerar um
relatório produto por produto que me retornasse o produto, as entradas, as
saídas, e o saldo do mesmo ex:

 

Produto   as entradasas
saídas o saldo

Cebola 100
99  1

Macarrão200
2000

Arroz300
25050

Etc.

 

E estou tendo esta dificuldade em realizar esta pesquisa.

 

Abraços

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de marcelo
Enviada em: quinta-feira, 9 de abril de 2009 20:18
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Dúvida com consulta SQL

 






Da uma estudada sobre inner join, basicamente seria select *.cs, *.ce from
cardápio_saida cs inner join cardápio_entrada CE (on codProd.cs =
codProd.ce) where data between dataini and datafim, este select retornara
todos os itens das tabelas conforme o período determinado entre dataini e
datafim. Agora este negocio de paradox meu corre longe conselho de amigo eh
muito instável corrompe índice direto. Vai de firebird que vc não se
arrependera

De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
[mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
] Em
nome de Ralp Alves Bezerra
Enviada em: quinta-feira, 9 de abril de 2009 07:16
Para: delphi...@yahoogrupos. com. br
Assunto: [delphi-br] Dúvida com consulta SQL

Nobres colegas,

Estou tendo uma certa dificuldade em realizar um consulta juntando 2 tabelas
diferentes.

Tenho uma tabela chamada Cardapio_Saida (onde ficam armazenadas todas as
saídas) com os seguinte campos:

CodProd

Produto

Quantidade

Fornecedor

Data

E outra chamada Entradas (onde ficam armazenadas todas as entradas) com os
seguinte campos:

CodProduto

Produto

Quantidade

Data

Com a consulta abaixo, consegui puxar todas as saídas:

SELECT 

distinct Produto as Produto, CodProduto as Codigo, Unidade as Unid, 

PesoUnitario as Peso, Quantidade as Quantidade, RazaoSocial as Escola, 

CodGuia as Guia, CodCardapio as Cardapio, Data as Data, Fornecedor

FROM

Cardapio_Saida

GROUP BY

Produto, RazaoSocial, quantidade, Unidade, PesoUnitario, 

CodProduto, CodGuia, CodCardapio, Data, fornecedor

ORDER BY

Produto, RazaoSocial

Estou precisando gerar um relatório entre um período de datas que me informe
a quantidade de entradas e saídas por produto. Tipo:

Produto Entradas Saídas Saldo
em estoque

Será que algum dos colegas poderia me dar uma dica?

Estou utilizando Delphi 7 e Paradox.

Abraços.

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

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





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

RES: [delphi-br] Dúvida com consulta SQL

[marcelo]

Da uma estudada sobre inner join, basicamente seria select *.cs, *.ce from
cardápio_saida cs inner join cardápio_entrada CE (on codProd.cs =
codProd.ce) where data between  dataini and datafim, este select retornara
todos os itens das tabelas conforme o período determinado entre dataini e
datafim. Agora este negocio de paradox meu corre longe conselho de amigo eh
muito instável corrompe índice direto. Vai de firebird que vc não se
arrependera

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Ralp Alves Bezerra
Enviada em: quinta-feira, 9 de abril de 2009 07:16
Para: delphi...@yahoogrupos. com. br
Assunto: [delphi-br] Dúvida com consulta SQL

 






Nobres colegas,

Estou tendo uma certa dificuldade em realizar um consulta juntando 2 tabelas
diferentes.

Tenho uma tabela chamada Cardapio_Saida (onde ficam armazenadas todas as
saídas) com os seguinte campos:

CodProd

Produto

Quantidade

Fornecedor

Data

E outra chamada Entradas (onde ficam armazenadas todas as entradas) com os
seguinte campos:

CodProduto

Produto

Quantidade

Data

Com a consulta abaixo, consegui puxar todas as saídas:

SELECT 

distinct Produto as Produto, CodProduto as Codigo, Unidade as Unid, 

PesoUnitario as Peso, Quantidade as Quantidade, RazaoSocial as Escola, 

CodGuia as Guia, CodCardapio as Cardapio, Data as Data, Fornecedor

FROM

Cardapio_Saida

GROUP BY

Produto, RazaoSocial, quantidade, Unidade, PesoUnitario, 

CodProduto, CodGuia, CodCardapio, Data, fornecedor

ORDER BY

Produto, RazaoSocial

Estou precisando gerar um relatório entre um período de datas que me informe
a quantidade de entradas e saídas por produto. Tipo:

Produto Entradas Saídas Saldo
em estoque

Será que algum dos colegas poderia me dar uma dica?

Estou utilizando Delphi 7 e Paradox.

Abraços.

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





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

Re: [delphi-br] Dúvida com criação de componente

[Vinicius A. Santos]

João, achei interessante a sua idéia, ainda estou em fase de pesquisa 
para depois começar a trabalhar...
A intenção é distribuir o código fonte do programa sem as units dos 
nossos componentes, distribuiremos apenas os .dcu, e através de algum 
destes componentes ficar perturbando o usuário...

Se alguém tiver mais idéias, eu agradeço muito !

Obrigado

Joao Morais escreveu:
>
>
> 2009/4/8 Vinicius A. Santos  >:
> > Boa tarde
> > Pessoal, tenho um componente que eu vou distribuir para algumas pessoas,
> > porém eu quero que este componente sempre mostre uma mensagem de tempos
> > em tempos para o usuário do sistema, como acontece com alguns produtos
> > demo do mercado.
> > Eu vi o componente da VitaVoom que vc precisa de um arquivo de Licença,
> > se o projeto for compilado sem este arquivo o executável fica te
> > mostrando uma mensagem, se vc compilar o projeto com o arquivo de
> > licença fica normal...
> > Alguém saberia me dizer uma palavra chave para eu digitar no "Deus" da
> > internet ?
> > estou pesquisando, porém ainda não encontrei nada plausível...
>
> Você vai distribuir sem os fontes, ou ao menos algumas units sem os
> fontes, correto? Então sai uma idéia, quem sabe a partir delas você
> consiga bolar outras melhores:
>
> Duas units, A e B. São as únicas duas units do teu projeto sem os
> fontes. Na unit A você declara uma variável pública, string ou um
> Int64 que receberá uma chave. Dentro dessa unit você coloca um timer
> para verificar que ela contém uma chave válida. Nesta unit coloque
> também algum código vital do seu componente. Na unit B, que é a sua
> unit 'licença' e cada usuário tem uma diferente, você atribui uma
> chave válida àquela variável pública de A. Faça isto na área
> initialization.
>
> Pronto. Se o usuário só tiver A, o sistema roda mas o timer, ao
> verificar que não tem uma chave válida associada, vai perturbar o
> usuário. Quando o usuário arrumar a B associando uma chave válida, ele
> pára de ser perturbado.
>
> Use criptografia ou criatividade para dificultar o hack das units.
>
> Joao Morais
>
> 


-- 
Vinicius A. Santos
www.msisolucoes.com.br

Re: [delphi-br] Dúvida com criação de componente

[Joao Morais]

2009/4/8 Vinicius A. Santos :
> Boa tarde
> Pessoal, tenho um componente que eu vou distribuir para algumas pessoas,
> porém eu quero que este componente sempre mostre uma mensagem de tempos
> em tempos para o usuário do sistema, como acontece com alguns produtos
> demo do mercado.
> Eu vi o componente da VitaVoom que vc precisa de um arquivo de Licença,
> se o projeto for compilado sem este arquivo o executável fica te
> mostrando uma mensagem, se vc compilar o projeto com o arquivo de
> licença fica normal...
> Alguém saberia me dizer uma palavra chave para eu digitar no "Deus" da
> internet ?
> estou pesquisando, porém ainda não encontrei nada plausível...

Você vai distribuir sem os fontes, ou ao menos algumas units sem os
fontes, correto? Então sai uma idéia, quem sabe a partir delas você
consiga bolar outras melhores:

Duas units, A e B. São as únicas duas units do teu projeto sem os
fontes. Na unit A você declara uma variável pública, string ou um
Int64 que receberá uma chave. Dentro dessa unit você coloca um timer
para verificar que ela contém uma chave válida. Nesta unit coloque
também algum código vital do seu componente. Na unit B, que é a sua
unit 'licença' e cada usuário tem uma diferente, você atribui uma
chave válida àquela variável pública de A. Faça isto na área
initialization.

Pronto. Se o usuário só tiver A, o sistema roda mas o timer, ao
verificar que não tem uma chave válida associada, vai perturbar o
usuário. Quando o usuário arrumar a B associando uma chave válida, ele
pára de ser perturbado.

Use criptografia ou criatividade para dificultar o hack das units.

Joao Morais

[delphi-br] Dúvida com consulta SQL

[Ralp Alves Bezerra]

Nobres colegas,

 

Estou tendo uma certa dificuldade em realizar um consulta juntando 2 tabelas
diferentes.

 

Tenho uma tabela chamada Cardapio_Saida (onde ficam armazenadas todas as
saídas) com os seguinte campos:

 

CodProd

Produto

Quantidade

Fornecedor

Data

 

E outra chamada Entradas (onde ficam armazenadas todas as entradas) com os
seguinte campos:

 

CodProduto

Produto

Quantidade

Data

 

Com a consulta abaixo, consegui puxar todas as saídas:

 

SELECT 

 distinct Produto as Produto, CodProduto as Codigo, Unidade as Unid, 

 PesoUnitario as Peso, Quantidade as Quantidade, RazaoSocial as Escola, 

 CodGuia as Guia, CodCardapio as Cardapio, Data as Data, Fornecedor

 

FROM

 Cardapio_Saida

 

GROUP BY

 Produto, RazaoSocial, quantidade, Unidade, PesoUnitario, 

 CodProduto, CodGuia, CodCardapio, Data, fornecedor

 

ORDER BY

 Produto, RazaoSocial

 

Estou precisando gerar um relatório entre um período de datas que me informe
a quantidade de entradas e saídas por produto. Tipo:

 

Produto   Entradas  Saídas   Saldo
em estoque

 

Será que algum dos colegas poderia me dar uma dica?

 

Estou utilizando Delphi 7 e Paradox.

 

Abraços.

 



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

[delphi-br] Dúvida com criação de componente

[Vinicius A. Santos]

Boa tarde
Pessoal, tenho um componente que eu vou distribuir para algumas pessoas, 
porém eu quero que este componente sempre mostre uma mensagem de tempos 
em tempos para o usuário do sistema, como acontece com alguns produtos 
demo do mercado.
Eu vi o componente da VitaVoom que vc precisa de um arquivo de Licença, 
se o projeto for compilado sem este arquivo o executável fica te 
mostrando uma mensagem, se vc compilar o projeto com o arquivo de 
licença fica normal...
Alguém saberia me dizer uma palavra chave para eu digitar no "Deus" da 
internet ?
estou pesquisando, porém ainda não encontrei nada plausível...

Obrigado

-- 
Vinicius A. Santos
www.msisolucoes.com.br

[delphi-br] Dúvida de DBExpress

[Piracaia Soft]

Utilizando o turbo delphi com DBexpress

TSQLConnection <- TSQLDataSet

o qy_pesprod2 é um TSQDataset

TABELA Produtos:



 Tenho 2 produtos cadastradados na tabela:

  PRODUTO A CODCOMPRA = 1  E  CODBARRAS = 123456
  PRODUTO B CODCOMPRA = 2  E  CODBARRAS = 234322




  Qy_PesqProd2.Close;
  Qy_PesqProd2.commandtext := 'Select * from PRODUTOS where (CODBARRA 
=:Busca) OR (CODCOMPRA =:BUSCA2)';
  QY_PesqProd2.ParamByName('BUSCA').Value  := 2
  QY_PesqProd2.ParamByName('BUSCA2').Value := 2
  Qy_PesqProd2.Open;

 me retorna o produto B

blz,

ai executo de novo 

  
  Qy_PesqProd2.Close;
  Qy_PesqProd2.commandtext := 'Select * from PRODUTOS where (CODBARRA 
=:Busca) OR (CODCOMPRA =:BUSCA2)';
  QY_PesqProd2.ParamByName('BUSCA').Value  := 222
  QY_PesqProd2.ParamByName('BUSCA2').Value :=222
  Qy_PesqProd2.Open;

ele me retorna o produto B novamente, sendo que não há produto código 222 


com delphi 7 eos componentes da guia interbase funcionava perfeitamente

falta algum componente  para o sql ?





Ats, 
Alcione Guimarães

PIRACAIA SOFT 
(11)4036-6299
(11)9515-8707

www.piracaiasoft.com.br


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

Re: [delphi-br] Dúvida com PageControl (resolvid o)

[Sergio - Jundiai / SP]

Muito obrigado




  - Original Message - 
  From: Coutinho - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 04, 2009 1:21 PM
  Subject: Re: [delphi-br] Dúvida com PageControl


  Sergio.

  O pagecontrol tem duas maneiras de você interagir com as "pages".
  pageControl.ActivepageIndex, que você pode atribuir de 0 ao numero de 
  páginas do PageControl -1, ou PageControl.Activepage, que você atribui 
  pelo Nome da "page".

  Eu uso de duas formas...
  Se desejo impedir que o usuário passe para outra página, que seja 
  vizinha da atual, verifico usando a propriedade Activepageindex, e 
  verifico com +1 ou -1, no evento OnChanging.
  No envento On changing tem uma variável chamada Newpage que armazena o 
  número da próxima página conforme a tab clicada

  If newpage = (PageControl.activepageindex+1) then
  ... faça isso ou aquilo
  else
  If newpage = (PageControl.activepageindex-1) then
  ... faça outras coisas...

  Outra forma, é quando uso um PageControl com as tabs invisíveis para 
  paginar meu cadastro e uso botões para passagem entre as páginas, aí eu 
  uso a propriedade Activepage... atribuindo a página, pois conforme as 
  liberações de um usuário, posso ou não apresentar essa ou aquela 
  paginação do cadastro para edição...

  Aí camarada... é só escolher. As duas formas te permitem um controle 
  legal sobre a navegação entre as páginas co componente!

  Abraços

  __
  Emanuel Coutinho
  Salvador-Ba-Brasil



   

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

Res: [delphi-br] Dúvida com PageControl

[Bruno Lepesqueur]

vc pode usar:

PageControl1.ActivePage := NomeDaPágina;
 
---Mensagem original---
 
De: Sergio - Jundiai / SP
Data: 04/02/2009 12:08:19
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Dúvida com PageControl
 
qual o comando para pular de uma guia para outra?

- Original Message - 
From: Jhosef Marks 
To: delphi-br@yahoogrupos.com.br 
Sent: Wednesday, February 04, 2009 10:23 AM
Subject: Re: [delphi-br] Dúvida com PageControl

*propriedade = variável AllowChange
PageControl1Changing(Sender: TObject;
var AllowChange: Boolean);
begin
end;

JM

2009/2/4 Jhosef Marks 

> No evento OnChanging utilize a propriedade AllowChange para controlar se o
> usuário pode ou não alterar de guia...
>
> JM
>
> 2009/2/4 Bruno Lepesqueur 
>
> Pessoal eu incluí em um formulário um PageControl contendo umas 4
>> páginas
>> (guias) e gostaria que fosse feito uma verificação todas as vezes que o
>> usuário sair de uma guia clicando em outra, mas não consigo!
>>
>> Eu fiz o seguinte código:
>>
>> procedure TPadroesSisFrm.PageControl1Changing(Sender: TObject;
>> var AllowChange: Boolean);
>> begin
>> If (dmoQuerys.QueryPadroesSis.State in [dsEdit, dsInsert]) or
>> (dmoQuerys.QueryCadEmpresa.State in [dsEdit, dsInsert]) or
>> (dmoQuerys.QueryCadNF.State in [dsEdit, dsInsert]) then
>> begin
>>
>> If (PageControl1.ActivePage = DadosPadroes) then
>> edit1.text := 'DadosPadroes' else
>> If (PageControl1.ActivePage = DadosEmpresa) then
>> edit1.text := 'DadosEmpresa' else
>> If (PageControl1.ActivePage = DadosNF) then
>> edit1.text := 'DadosNF' else
>> If (PageControl1.ActivePage = Produtos) then
>> edit1.text := 'Produtos';
>>
>> pageControl1.ActivePage := edit1.text; //o delphi não aceita esse
>> comando. Ele aceitaria se fosse assim:
>>
>> //pageControl1.ActivePage := DadosPadroes;
>>
>> If pageAtual = 'DadosPadroes' then
>> PageControl1.ActivePage := DadosPadroes else
>> If pageAtual = 'DadosEmpresa' then
>> PageControl1.ActivePage := DadosEmpresa else
>> If pageAtual = 'DadosNF' then
>> PageControl1.ActivePage := DadosNF else
>> If pageAtual = 'Produtos' then
>> PageControl1.ActivePage := Produtos;
>>
>> ShowMessage('Você deve gravar ou cancelar as alterações antes de sair!
>> );
>> end;
>> end;
>>
>> Resumindo, eu só não quero deixar ele mudar de página (guia) sem antes
>> salvar os registros.
>> Talvez vcs tem alguma forma melhor de se fazer isso!
>>
>> Obrigado!
>>
>> [As partes desta mensagem que não continham texto foram removidas]
>>
>> 
>>
>
>
>
> --
> Jhosef Marks de Carvalho
> Delphi Developer
> http://groups.google.com/group/soumaisdelphi
>

-- 
Jhosef Marks de Carvalho
Delphi Developer
http://groups.google.com/group/soumaisdelphi

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

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


 
 

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

Re: [delphi-br] Dúvida com PageControl

[Coutinho - Yahoo]

Sergio.

O pagecontrol tem duas maneiras de você interagir com as "pages".
pageControl.ActivepageIndex, que você pode atribuir de 0 ao numero de 
páginas do PageControl -1, ou PageControl.Activepage, que você atribui 
pelo Nome da "page".

Eu uso de duas formas...
Se desejo impedir que o usuário passe para outra página, que seja 
vizinha da atual, verifico usando a propriedade Activepageindex, e 
verifico com +1 ou -1, no evento OnChanging.
No envento On changing tem uma variável chamada Newpage que armazena o 
número da próxima página conforme a tab clicada

If  newpage = (PageControl.activepageindex+1) then
   ... faça isso ou aquilo
else
  If  newpage = (PageControl.activepageindex-1) then
 ... faça outras coisas...


Outra forma, é quando uso um PageControl com as tabs invisíveis para 
paginar meu cadastro e uso botões para passagem entre as páginas, aí eu 
uso a propriedade Activepage... atribuindo a página, pois conforme as 
liberações de um usuário, posso ou não apresentar essa ou aquela 
paginação do cadastro para edição...


Aí camarada... é só escolher. As duas formas te permitem um controle 
legal sobre a navegação entre as páginas co componente!

Abraços

__
Emanuel Coutinho
Salvador-Ba-Brasil

[delphi-br] Dúvida com PageControl

[Sergio - Jundiai / SP]

qual o comando para pular de uma guia para outra?




  - Original Message - 
  From: Jhosef Marks 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 04, 2009 10:23 AM
  Subject: Re: [delphi-br] Dúvida com PageControl


  *propriedade = variável AllowChange
  PageControl1Changing(Sender: TObject;
  var AllowChange: Boolean);
  begin
  end;

  JM

  2009/2/4 Jhosef Marks 

  > No evento OnChanging utilize a propriedade AllowChange para controlar se o
  > usuário pode ou não alterar de guia...
  >
  > JM
  >
  > 2009/2/4 Bruno Lepesqueur 
  >
  > Pessoal eu incluí em um formulário um PageControl contendo umas 4
  >> páginas
  >> (guias) e gostaria que fosse feito uma verificação todas as vezes que o
  >> usuário sair de uma guia clicando em outra, mas não consigo!
  >>
  >> Eu fiz o seguinte código:
  >>
  >> procedure TPadroesSisFrm.PageControl1Changing(Sender: TObject;
  >> var AllowChange: Boolean);
  >> begin
  >> If (dmoQuerys.QueryPadroesSis.State in [dsEdit, dsInsert]) or
  >> (dmoQuerys.QueryCadEmpresa.State in [dsEdit, dsInsert]) or
  >> (dmoQuerys.QueryCadNF.State in [dsEdit, dsInsert]) then
  >> begin
  >>
  >> If (PageControl1.ActivePage = DadosPadroes) then
  >> edit1.text := 'DadosPadroes' else
  >> If (PageControl1.ActivePage = DadosEmpresa) then
  >> edit1.text := 'DadosEmpresa' else
  >> If (PageControl1.ActivePage = DadosNF) then
  >> edit1.text := 'DadosNF' else
  >> If (PageControl1.ActivePage = Produtos) then
  >> edit1.text := 'Produtos';
  >>
  >> pageControl1.ActivePage := edit1.text; //o delphi não aceita esse
  >> comando. Ele aceitaria se fosse assim:
  >>
  >> //pageControl1.ActivePage := DadosPadroes;
  >>
  >> If pageAtual = 'DadosPadroes' then
  >> PageControl1.ActivePage := DadosPadroes else
  >> If pageAtual = 'DadosEmpresa' then
  >> PageControl1.ActivePage := DadosEmpresa else
  >> If pageAtual = 'DadosNF' then
  >> PageControl1.ActivePage := DadosNF else
  >> If pageAtual = 'Produtos' then
  >> PageControl1.ActivePage := Produtos;
  >>
  >> ShowMessage('Você deve gravar ou cancelar as alterações antes de sair!
  >> );
  >> end;
  >> end;
  >>
  >> Resumindo, eu só não quero deixar ele mudar de página (guia) sem antes
  >> salvar os registros.
  >> Talvez vcs tem alguma forma melhor de se fazer isso!
  >>
  >> Obrigado!
  >>
  >> [As partes desta mensagem que não continham texto foram removidas]
  >>
  >> 
  >>
  >
  >
  >
  > --
  > Jhosef Marks de Carvalho
  > Delphi Developer
  > http://groups.google.com/group/soumaisdelphi
  >

  -- 
  Jhosef Marks de Carvalho
  Delphi Developer
  http://groups.google.com/group/soumaisdelphi

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



   

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

Res: Re: [delphi-br] Dúvida com PageControl

[Bruno Lepesqueur]

Tava fácil demais né??? rs

Fiz o seguinte:

  If (dmoQuerys.QueryPadroesSis.State in [dsEdit, dsInsert]) or
  (dmoQuerys.QueryCadEmpresa.State in [dsEdit, dsInsert]) or
  (dmoQuerys.QueryCadNF.State in [dsEdit, dsInsert]) then
begin
  AllowChange := false;
  ShowMessage('Você deve gravar ou cancelar as alterações antes de sair!
);
end;

Obrigado pela força Jhosef! Deu certo!
 
Um abraço a todos!
---Mensagem original---
 
De: Jhosef Marks
Data: 04/02/2009 10:22:33
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Dúvida com PageControl
 
No evento OnChanging utilize a propriedade AllowChange para controlar se o
usuário pode ou não alterar de guia...

JM

2009/2/4 Bruno Lepesqueur 

> Pessoal eu incluí em um formulário um PageControl contendo umas 4
> páginas
> (guias) e gostaria que fosse feito uma verificação todas as vezes que o
> usuário sair de uma guia clicando em outra, mas não consigo!
>
> Eu fiz o seguinte código:
>
> procedure TPadroesSisFrm.PageControl1Changing(Sender: TObject;
> var AllowChange: Boolean);
> begin
> If (dmoQuerys.QueryPadroesSis.State in [dsEdit, dsInsert]) or
> (dmoQuerys.QueryCadEmpresa.State in [dsEdit, dsInsert]) or
> (dmoQuerys.QueryCadNF.State in [dsEdit, dsInsert]) then
> begin
>
> If (PageControl1.ActivePage = DadosPadroes) then
> edit1.text := 'DadosPadroes' else
> If (PageControl1.ActivePage = DadosEmpresa) then
> edit1.text := 'DadosEmpresa' else
> If (PageControl1.ActivePage = DadosNF) then
> edit1.text := 'DadosNF' else
> If (PageControl1.ActivePage = Produtos) then
> edit1.text := 'Produtos';
>
> pageControl1.ActivePage := edit1.text; //o delphi não aceita esse
> comando. Ele aceitaria se fosse assim:
>
> //pageControl1.ActivePage := DadosPadroes;
>
> If pageAtual = 'DadosPadroes' then
> PageControl1.ActivePage := DadosPadroes else
> If pageAtual = 'DadosEmpresa' then
> PageControl1.ActivePage := DadosEmpresa else
> If pageAtual = 'DadosNF' then
> PageControl1.ActivePage := DadosNF else
> If pageAtual = 'Produtos' then
> PageControl1.ActivePage := Produtos;
>
> ShowMessage('Você deve gravar ou cancelar as alterações antes de sair!
> );
> end;
> end;
>
> Resumindo, eu só não quero deixar ele mudar de página (guia) sem antes
> salvar os registros.
> Talvez vcs tem alguma forma melhor de se fazer isso!
>
> Obrigado!
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Jhosef Marks de Carvalho
Delphi Developer
http://groups.google.com/group/soumaisdelphi

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


 
 

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

Re: [delphi-br] Dúvida com PageControl

[Jhosef Marks]

*propriedade = variável AllowChange
PageControl1Changing(Sender: TObject;
  var AllowChange: Boolean);
begin
end;

JM

2009/2/4 Jhosef Marks 

> No evento OnChanging utilize a propriedade AllowChange para controlar se o
> usuário pode ou não alterar de guia...
>
> JM
>
> 2009/2/4 Bruno Lepesqueur 
>
>Pessoal eu incluí em um formulário um PageControl contendo umas 4
>> páginas
>> (guias) e gostaria que fosse feito uma verificação todas as vezes que o
>> usuário sair de uma guia clicando em outra, mas não consigo!
>>
>> Eu fiz o seguinte código:
>>
>> procedure TPadroesSisFrm.PageControl1Changing(Sender: TObject;
>> var AllowChange: Boolean);
>> begin
>> If (dmoQuerys.QueryPadroesSis.State in [dsEdit, dsInsert]) or
>> (dmoQuerys.QueryCadEmpresa.State in [dsEdit, dsInsert]) or
>> (dmoQuerys.QueryCadNF.State in [dsEdit, dsInsert]) then
>> begin
>>
>> If (PageControl1.ActivePage = DadosPadroes) then
>> edit1.text := 'DadosPadroes' else
>> If (PageControl1.ActivePage = DadosEmpresa) then
>> edit1.text := 'DadosEmpresa' else
>> If (PageControl1.ActivePage = DadosNF) then
>> edit1.text := 'DadosNF' else
>> If (PageControl1.ActivePage = Produtos) then
>> edit1.text := 'Produtos';
>>
>> pageControl1.ActivePage := edit1.text; //o delphi não aceita esse
>> comando. Ele aceitaria se fosse assim:
>>
>> //pageControl1.ActivePage := DadosPadroes;
>>
>> If pageAtual = 'DadosPadroes' then
>> PageControl1.ActivePage := DadosPadroes else
>> If pageAtual = 'DadosEmpresa' then
>> PageControl1.ActivePage := DadosEmpresa else
>> If pageAtual = 'DadosNF' then
>> PageControl1.ActivePage := DadosNF else
>> If pageAtual = 'Produtos' then
>> PageControl1.ActivePage := Produtos;
>>
>> ShowMessage('Você deve gravar ou cancelar as alterações antes de sair!
>> );
>> end;
>> end;
>>
>> Resumindo, eu só não quero deixar ele mudar de página (guia) sem antes
>> salvar os registros.
>> Talvez vcs tem alguma forma melhor de se fazer isso!
>>
>> Obrigado!
>>
>> [As partes desta mensagem que não continham texto foram removidas]
>>
>>  
>>
>
>
>
> --
> Jhosef Marks de Carvalho
> Delphi Developer
> http://groups.google.com/group/soumaisdelphi
>



-- 
Jhosef Marks de Carvalho
Delphi Developer
http://groups.google.com/group/soumaisdelphi


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