Re: [delphi-br] File not found: 'dsgnintf.dcu' - Delphi 7 (RESOLVIDO)

[Paulo Coutinho]

posta ai a solução ué.

2009/5/21 nillgolv 

>
>
>
> Conseguir resolver.
>
> Em 15/05/2009 19:40, Paulo Coutinho < 
> pa...@prsolucoes.com> escreveu:
>
> Ja buscou assim?
>
>
> http://www.google.com/search?ie=UTF-8&oe=UTF-8&sourceid=navclient&gfns=1&q=File+not+found%3A+dsgnintf.dcu
>
> Vi várias pessoas postando esta duvida.
>
> 2009/5/16 nillgolv 
>
> >
> >
> >
> > Prezados, já procurei ajuda na internet mas não obtive algo que
> resolvesse
> > tal erro.
> >
> > Tentei instalar o componente TVideo = class(TCustomControl) no delphi
> 7,
> > mas ao clicar compilar apresenta o seguinte erro
> >
> > [Fatal Error] Video.pas(9): File not found: 'dsgnintf.dcu'
> >
> > Acredito que aqui alguém tem esta situação resolvida e que possa me
> ajudar
> > a solucionar.
> >
> > Grato.
> > Nilton
> >
> >
>
> --
> Atenciosamente,
> Paulo Coutinho.
> Blog: www.prsolucoes.com/blog
> Site: www.prsolucoes.com
> Msn: pa...@prsolucoes.com 
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Atenciosamente,
Paulo Coutinho.
Blog: www.prsolucoes.com/blog
Site: www.prsolucoes.com
Msn:  pa...@prsolucoes.com


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

[delphi-br] Re: Mudança de propriedade Boolean em um componente não reflete no codigo

[Silvio Clecio]

--- Em delphi-br@yahoogrupos.com.br, Fellipe Henrique  escreveu
>
> Amigo, não funciona... continua pegando o que eu informo no OnCreate do
> componente, mesmo mudando no projeto.

Olá galera,

Acontece o mesmo em outros componentes?

Enviei em pvt um componente que não faz nada, é somente pra ver se BeepOnCheck 
fica True se definido no OI aí (fiz o teste com o Delphi7 e foi bem).
---
[]'s, Silvio Clécio
---
Linux User: #481900
Gmail, GTalk: silviop...@gmail.com
E-mail, Y! Messenger: silviop...@yahoo.com.br
BlogSite: http://silvioprog.blogspot.com/
BlogSpot: http://silvioclecio.blogspot.com/
VirtualDriver: http://silvioprog.4shared.com/
°oO| Seja livre, use Linux! |Oo°

Re: [delphi-br] Nested Dataset lento

[berdam]

faça o seguinte, utilize a propriedade filter do cds filho, primeramente 
carregue todos os pais e filhos, depois conforme for navegando no cds 
pai, altere a propriedade filter do cds filho passando assim
filter := 'cd_pai = codigo_pai', e altere filtered para true.

Pode ser q demore no início , mas posteriormente fica muito rápido

Ricardo Lima escreveu:
>
>
> A Cadas registro na tabela master ele vai no banco e faz um select para
> trazer os
> registros filhos, por isso é lento.
>
> Te aconselho a usar um master source e master fields.
>
> At.
> Ricardo Lima
>
> Daniel Hiromy escreveu:
> >
> >
> > Boa Tarde pessoal.
> > Tenho um dataset de produto e um de detalhe aninhado (1:1). Hoje ao
> > inserir
> > aproximadamente 1000 registros nessas tabelas, a abertura do 
> ClientDataSet
> > ficou muito lento.
> > Alguém pode me dar uma dica de como resolver isso? Estou usando Delphi
> > 2009
> > com Firebird/DBX com driver TBODBXFB.
> > Desde já agradeço.
> >
> > [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] importar dados planilha excel

[Andre Luis]

voce pode usar os componentes do ADO para carregar a planilha como se 
fosse uma tabela e mostrar em dbgrid, onde ele selecionaria as colunas 
do dbgrid e importaria.
__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 

[delphi-br] Cliente TCP/IP

[terra]

Boa noite
Hoje tenho um sistema em D7 que se conecta uma plataforma de telefonia via
tcp/ip usando clientsockt, gostaria de migra-la para o D2009 e sei que o
clientsockt tem problemas nessa versão.
O correto seria usar Indy?
Quais componentes usar para se comportar como clientsocket que fica ouvindo
na porta esperando o retorno de eventos que são mandados pelo servidor
Segue algumas funções que tenho como exemplo
 
procedure TF_telefonia.ClientSocket1Error(Sender: TObject;
  Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
  var ErrorCode: Integer);
begin
//  showmessage('Erro de Socket ' + IntToStr(ErrorCode));
  if Socket.Connected then
 begin
 Socket.Close;
 end;
  conectado := 'Desconectado - Erro de Socket ' + IntToStr(ErrorCode);
  ErrorCode := 0;
//  conecta(servidor);
end;
 
procedure TF_telefonia.ClientSocket1Read(Sender: TObject;
  Socket: TCustomWinSocket);
var
   str, Rasc : string;
   i: Integer;
 
begin
  str := socket.ReceiveText;
  i := Pos(#13, str);
  while i > 0 do begin
Rasc := Copy(str, 1, i-1);
Delete(str, 1, i+1);
lerstr(Rasc);
i := Pos(#13, str);
  end;
 
//  ShowMessage(rasc);
end;


Aldinei Simões


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

Re: [delphi-br] SIMBOLOS NA COLUNA

[JB]

http://www.planetadelphi.com.br/dica/6477/Colocar%20check-box%20em%20stringgrid%20ou%20dbgrid(especial-simples)



2009/5/21 Sergio - Jundiaí / SP :
>
>
>
>
> Boa noite
>
>
> alquem sabe ou conhece alguma forma de coloca na coluna no DBgrid desenhos
>
> ex:
>
> Bola azul
> Bola vermelha.
>
>
> Pois didaticamente acho muito bom no sistema.
>
>
> mas ao encontro material
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 



-- 

José Benedito
Software Developer
+55 19 8116-7826
msn: jb_holam...@hotmail.com
skype:jb.sologix

[delphi-br] SIMBOLOS NA COLUNA

[Sergio - Jundiaí / SP]

Boa noite


alquem sabe ou conhece alguma forma de coloca na coluna no DBgrid desenhos

ex:

Bola azul
Bola vermelha.


Pois didaticamente acho muito bom no sistema.


mas ao encontro material

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

Re: [delphi-br] Gravar imagem com edbimage no firebird

> gente, estou tendo um problema com isso, tenho uma tabela no FB 2.0
> com + / - 900 registros em rede achei melhor colocar dentro do db
> para ter acesso a rede, mas o db ficou enorme e uma select na
> mesma demora muito, mesmo sendo um pc 2 gb ram e processador E4500
> mas se colocar externo, como seria para link na rede...
> qual a melhor forma de apresentar uma imagem no programa?

Vc pode fazer um aplicativo (usando Indy ou outro) para servir suas imagens via 
Stream... daí vc não tme problemas de permissão de acesso. Ou mesmo montar um 
servidor FTP e buscar as imagens via FTP, sempre...

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 

Re: [delphi-br] Nested Dataset lento

[Ricardo Lima]

A Cadas registro na tabela master ele vai no banco e faz um select para 
trazer os
registros filhos, por isso é lento.

Te aconselho a usar um master source e master fields.

At.
Ricardo Lima

Daniel Hiromy escreveu:
>
>
> Boa Tarde pessoal.
> Tenho um dataset de produto e um de detalhe aninhado (1:1). Hoje ao 
> inserir
> aproximadamente 1000 registros nessas tabelas, a abertura do ClientDataSet
> ficou muito lento.
> Alguém pode me dar uma dica de como resolver isso? Estou usando Delphi 
> 2009
> com Firebird/DBX com driver TBODBXFB.
> Desde já agradeço.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 

Re: [delphi-br] Boleto Bancário

[JB]

Eu gero no bradesco e nunca tive problemas

2009/5/21 felipe govoni :
>
>
> no itau vc consegue gerar boeto como PF, porem tem alguns
> detalhes que vc deve verificar com o banco.
>
> 2009/5/21 Alessandro Magno 
>
>>
>>
>> Galera,
>>
>> Tendo uma conta de pessoa física no banco, eu consigo gerar boleto
>> bancário em meu nome ou somente pessoas jurídicas???
>>
>>
>>
>
> --
> Felipe Govoni
> -
> GOVONI Sistemas
> Fone 8472-8718
> www.govoni.com.br
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 



-- 

José Benedito
Software Developer
+55 19 8116-7826
msn: jb_holam...@hotmail.com
skype:jb.sologix

Re: [delphi-br] Boleto Bancário

[felipe govoni]

no itau vc consegue gerar boeto como PF, porem tem alguns
detalhes que vc deve verificar com o banco.



2009/5/21 Alessandro Magno 

>
>
> Galera,
>
> Tendo uma conta de pessoa física no banco, eu consigo gerar boleto
> bancário em meu nome ou somente pessoas jurídicas???
>
>  
>



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


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

Re: [delphi-br] Mudança de propriedade Boolean em u m componente não reflete no codigo

[Fellipe Henrique]

Amigo, não funciona... continua pegando o que eu informo no OnCreate do
componente, mesmo mudando no projeto.

Att.
Fellipe H.

2009/5/20 Silvio Clécio 

>
>
> Olá galera,
>
> {...}
>
> pois bem.. o SetValidar está normal... FValidar := Value;
> {...}
>
> Implemente no SetValidar o seguinte:
>
> ---
> TSuaClasse.SetValidar(const Value: Boolean);
> begin
> If FValidar <> Value then
> FValidar := Value;
> end;
> ---
> 
> []'s, Silvio Clécio
> ---
> Linux User: #481900
> Gmail, GTalk: silviop...@gmail.com 
> E-mail, Y! Messenger: silviop...@yahoo.com.br 
> BlogSite: http://silvioprog.blogspot.com/
> BlogSpot: http://silvioclecio.blogspot.com/
> VirtualDriver: http://silvioprog.4shared.com/
> °oO| Seja livre, use Linux! |Oo°
>
> 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]
>
>  
>



-- 
_
T.·.F.·.A.·.
Fellipe Henrique
Blog: www.digitumsoft.com.br/blogs/fellipeh
---
CAMPANHA POR UMA INTERNET SEGURA
Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar
mensagens use SEMPRE o "Cco" (cópia oculta).
Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar
um e-mail, delete todas as informações que apareçam no corpo do e-mail e que
possam ser usadas por hackers.
###


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

[delphi-br] Formulário da um som de erro quando é fechado.

[ricardo_rmsr]

Olá pessoal, eu estou fazendo meu TCC em delphi, minha aplicação da um som de 
erro quando é fechada, vou colocar o código gostario muito que alguem me 
ajudace. No final vou desponibilizar a aplicação para a nossa comunidade 
delphi-br.

Grato,
Ricardo Rocha

unit uLogin;

interface

uses

type

  private
{ Private declarations }
Iniconf: TIniFile;
  public
{ Public declarations }
  end;

var
  frmLogin: TfrmLogin;

implementation

uses uDMPrincipal, uPrincipal;

{$R *.dfm}
{
  Está procedure é responsável pela verificação do usúario, quando ele clicar em
  login, a procedure verifica no banco de dados se existe um usuário com este
  nome e senha
}
procedure TfrmLogin.BitBtnLoginClick(Sender: TObject);
begin
  if JvValidatorsUsuario.Validate then
  begin
  if DMPrincipal.ValidaUsuario(EditLogin.Text, EditSenha.Text) then
  begin
{Se usuário válido}
try
ShowMessage('Usuário aceito com sucesso');
Application.CreateForm(TfrmPrincipal, frmPrincipal);
frmPrincipal.ShowModal;
Application.Terminate;
FreeAndNil(frmPrincipal);
finally
  frmPrincipal.Free;
end;
  end
  else
  {Usuáiro Inválido}
raise Exception.Create('Usuário ou Senha inválidos');
  end;
end;

{
  Caso o usuário queira cacelar o login no programa está procedure termina a
  fecha o formulário de login
}
procedure TfrmLogin.BitBtnCancelarClick(Sender: TObject);
begin
Application.Terminate;
end;

{

}
procedure TfrmLogin.FormCreate(Sender: TObject);
begin
Iniconf := TIniFile.Create('F:\SIS\config\Config_Banco.ini');
DMPrincipal.MDOConexao.Close;
DMPrincipal.MDOConexao.DatabaseName := 
Iniconf.ReadString('Banco_Dados','Path','');
DMPrincipal.MDOConexao.Open;
end;

procedure TfrmLogin.BuscarBandodeDados1Click(Sender: TObject);
begin
if OpenDialogBancoDados.Execute then
begin
DMPrincipal.MDOConexao.Close;
DMPrincipal.MDOConexao.DatabaseName := OpenDialogBancoDados.FileName;
Iniconf.WriteString('Banco_Dados', 'Path', DMPrincipal.MDOConexao.DatabaseName);
DMPrincipal.MDOQueryValidaUsuario.Open;
DMPrincipal.MDOConexao.Open;
end;
end;

end.



{
  Software: Sistema de Automação Comercial
  Autor: Ricardo Messis da Silva Rocha
  Orientador: Eduardo Ferroni
  Prof. Iliana

  Formulário principal do programa
}


unit uPrincipal;

interface

uses

type

  private
{ Private declarations }
  public
{ Public declarations }
Iniconfiskin: TIniFile;
  end;

var
  frmPrincipal: TfrmPrincipal;

implementation

uses uLogin, uDMPrincipal, uSkin, uCadUser;

{$R *.dfm}
{
  Procedure responsável para colocar a hora, data e nome de usuário logado no
  StatusBarPrincipal
}
procedure TfrmPrincipal.TimerHaraDataTimer(Sender: TObject);
begin
StatusBarPrincipal.Panels[3].Text:= 'Hora:'+' '+TimeToStr(Time)+'   
'+'Data:'+' '+DateToStr(Date);
StatusBarPrincipal.Panels[1].Text:= 'Usuário:'+' 
'+DMPrincipal.MDOQueryValidaUsuario.Params[0].AsString;
end;

{
  Está procedure libera o formuário login da memoria assim que o login é feito 
e o formulário
  principal é carregado
}
procedure TfrmPrincipal.FormCreate(Sender: TObject);
begin
FreeAndNil(frmLogin);
Iniconfiskin := TIniFile.Create('F:\SIS\config\Config_Layout.ini');
skinPricipal.SkinFile := Iniconfiskin.ReadString('Layout','Path','');
skinPricipal.Active := True;
end;

procedure TfrmPrincipal.mSkinClick(Sender: TObject);
begin
if frmLayout = NIL then
begin
frmLayout := TfrmLayout.Create(self);
frmLayout.ShowModal;
FreeAndNil(frmLayout);
end;
end;

procedure TfrmPrincipal.mUsuarioClick(Sender: TObject);
begin
if frmCadUser = NIL then
begin
frmCadUser := TfrmCadUser.Create(self);
frmCadUser.ShowModal;
FreeAndNil(frmCadUser);
end;
end;

procedure TfrmPrincipal.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
Action := caFree;
end;


unit uSkin;

interface

uses
ShlObj;

type

  private
{ Private declarations }
  public
{ Public declarations }
Iniconf: TIniFile;
  end;

var
  frmLayout: TfrmLayout;

implementation

uses uPrincipal;
{$R *.dfm}


procedure TfrmLayout.BitBtnProcurarSkinClick(Sender: TObject);
begin
if OpenDialogSkin.Execute then
frmPrincipal.Iniconfiskin.WriteString('Layout','Path', 
OpenDialogSkin.FileName);
end;

procedure TfrmLayout.BitBtnAtivarSkinClick(Sender: TObject);
begin
frmPrincipal.skinPricipal.SkinFile := 
frmPrincipal.Iniconfiskin.ReadString('Layout','Path','');
frmPrincipal.skinPricipal.Active := True;
frmPrincipal.skinPricipal.SkinAllForms := True;
frmLayout.SetFocus; 
end;

end.

Re: [delphi-br] Re: Formas de se fazer com que um computador desligue

[Marcelo]

O seu sistema não deve estar desligando a maquina , pode ser varias coisas 
relacionadas ao hardware. Ja tentou ver a temperatura da maquina, ve na bios em 
quantos graus esta marcado para reiniciar(reboot). 

--- Em qui, 21/5/09, Carlos Negrão  escreveu:


De: Carlos Negrão 
Assunto: [delphi-br] Re: Formas de se fazer com que um computador desligue
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 21 de Maio de 2009, 11:27








É o que eu estava imaginando também, já que tudo que eu encontro indica ser 
problema de hardware, e eu sei que o código para desligar a máquina é 
específico e teria de ser colocado de propósito, coisa que não fiz em parte 
alguma deste ou de qualquer outro programa até hoje.
De qualquer forma, achei melhor confirmar.

--- Em delphi...@yahoogrup os.com.br, Luciano Angelini  
escreveu
>
> Caro Carlos ...
> 
> Uma pequena parte dos metidos a 'Técnico em Informatica' , quando 
> não acham uma solução para o clientes, colocam
> culpa em alguma coisa, talvez viu alguma coisa diferente no computador, 
> ""Seu Sistema"" ... e falou que é isso !
> Desistale seu Programa/Sistema e veja o que acontece, tenho certeza que 
> o computador ira desligar ! Pois isso é falha de hardware e não de 
> Software.
> 
> 
> Luciano Angelini
> Prefeitura de Lupionópolis- Pr
> 
> 
> Carlos Negrão escreveu:
> >
> >
> > Estou com um problema aqui.
> > O computador que um cliente usa para rodar um programa que fiz anda 
> > desligando sozinho quando entra no programa. Eu sei que não coloquei 
> > nada no programa para desligar o computador, e não tenho a menor idéia 
> > de como poderia fazer isso acidentalmente, mas o técnico que olhou a 
> > máquina colocou a culpa no meu programa.
> >
> > Existe alguma coisa que eu possa ter feito para causar o problema por 
> > acidente, apesar de nunca acontecer em nenhum dos dois computadores 
> > que uso para programar e testar?
> > Ou será que o problema deles só pode mesmo ser hardware e o técnico 
> > simplesmente não soube diagnosticar?
> >
> >
>

















  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] OOP - Quais as vantagens?

[Rubem Rocha]

A forma de trabalho procedural é prática comum quando se trabalha com
análise estruturada de sistemas. E nesta forma de trabalho, o seu foco ao
desenvolver um sistema será sempre os dados, e consequentemente, a nível de
programação, você se concentrará em escrever procedimentos e funções
voltados para o tratamento desses dados. Na abordagem orientada a objetos,
você tem uma visão mais ampla de como será o sistema e como ele irá se
comunicar entre si. Isso é identificado a partir do momento que você começa
a categorizar os elementos do sistema como classes. Resumindo isto tudo, em
termos de UML, estamos falando de diagramas de contexto, classes e
sequencia.

 

Na abordagem procederal, as rotinas (procedimentos e funções) e os dados são
elementos separados, enquanto que na abordagem orientada a objetos, eles
atuam praticamente em conjunto (dados + rotinas). Na abordagem orientada a
objetos, você categoriza os elementos do sistema em classes e para cada uma
dessas classes você define como será o seu comportamento(dados) e as
ações(rotinas) que ele deverá desempenhar dentro do sistema.

 

Em um determinado momento você deve imaginar que deverá escrever mais código
na abordagem orientada a objetos, mas em compensação, a correta utilização
dos conceitos de herança, encapsulamento e polimorfismo lhe trarão alto
ganho de tempo e produtividade se, e somente se, souber abstrair muito bem
as classes que irão compor o seu sistema, sejão elas classes para
representar entidades que serão persistidas em bancos de dados (Cliente,
Fornecedor, Venda, Produto, etc.) como as classes que representam
processamentos e/ou elementos de interface homem-máquina (telas, gráficos,
relatórios, etc.)

 

O que acabei de relatar aqui é um breve resumo dos benefícios que tenho na
prática com análise e desenvolvimento orientada a objetos.

 

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Alexandre
Enviada em: quinta-feira, 21 de maio de 2009 10:35
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] OOP - Quais as vantagens?

 

Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria que
porfavor me explicassem qual a vantagem de ser usar OOP, não estou
conseguindo entender os beneficios para o meu programa usar oop ao invés de
procedures.

Alex



 



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

[delphi-br] Quando fecho a aplicação da um som de erro

[ricardo_rmsr]

Olá pessoal estou fazendo meu TCC, e agora surgiu um problema, quando eu fecho 
o programa ele da um som de erro, vou desponibilizar o código fonte, quem poder 
me ajudar agradeço, no final vou desponibilizar o código todo para a 
comunidade. Retirei algum trecho de código só para ficar menor.

Grato,
Ricardo Rocha.

unit uLogin;

interface

uses

type

  private
{ Private declarations }
Iniconf: TIniFile;
  public
{ Public declarations }
  end;

var
  frmLogin: TfrmLogin;

implementation

uses uDMPrincipal, uPrincipal;

{$R *.dfm}
{
  Está procedure é responsável pela verificação do usúario, quando ele clicar em
  login, a procedure verifica no banco de dados se existe um usuário com este
  nome e senha
}
procedure TfrmLogin.BitBtnLoginClick(Sender: TObject);
begin
  if JvValidatorsUsuario.Validate then
  begin
  if DMPrincipal.ValidaUsuario(EditLogin.Text, EditSenha.Text) then
  begin
{Se usuário válido}
try
ShowMessage('Usuário aceito com sucesso');
Application.CreateForm(TfrmPrincipal, frmPrincipal);
frmPrincipal.ShowModal;
Application.Terminate;
FreeAndNil(frmPrincipal);
finally
  frmPrincipal.Free;
end;
  end
  else
  {Usuáiro Inválido}
raise Exception.Create('Usuário ou Senha inválidos');
  end;
end;

{
  Caso o usuário queira cacelar o login no programa está procedure termina a
  fecha o formulário de login
}
procedure TfrmLogin.BitBtnCancelarClick(Sender: TObject);
begin
Application.Terminate;
end;

{

}
procedure TfrmLogin.FormCreate(Sender: TObject);
begin
Iniconf := TIniFile.Create('F:\SIS\config\Config_Banco.ini');
DMPrincipal.MDOConexao.Close;
DMPrincipal.MDOConexao.DatabaseName := 
Iniconf.ReadString('Banco_Dados','Path','');
DMPrincipal.MDOConexao.Open;
end;

procedure TfrmLogin.BuscarBandodeDados1Click(Sender: TObject);
begin
if OpenDialogBancoDados.Execute then
begin
DMPrincipal.MDOConexao.Close;
DMPrincipal.MDOConexao.DatabaseName := OpenDialogBancoDados.FileName;
Iniconf.WriteString('Banco_Dados', 'Path', DMPrincipal.MDOConexao.DatabaseName);
DMPrincipal.MDOQueryValidaUsuario.Open;
DMPrincipal.MDOConexao.Open;
end;
end;

end.



{
  Software: Sistema de Automação Comercial
  Autor: Ricardo Messis da Silva Rocha
  Orientador: Eduardo Ferroni
  Prof. Iliana

  Formulário principal do programa
}


unit uPrincipal;

interface

uses

type

  private
{ Private declarations }
  public
{ Public declarations }
Iniconfiskin: TIniFile;
  end;

var
  frmPrincipal: TfrmPrincipal;

implementation

uses uLogin, uDMPrincipal, uSkin, uCadUser;

{$R *.dfm}
{
  Procedure responsável para colocar a hora, data e nome de usuário logado no
  StatusBarPrincipal
}
procedure TfrmPrincipal.TimerHaraDataTimer(Sender: TObject);
begin
StatusBarPrincipal.Panels[3].Text:= 'Hora:'+' '+TimeToStr(Time)+'   
'+'Data:'+' '+DateToStr(Date);
StatusBarPrincipal.Panels[1].Text:= 'Usuário:'+' 
'+DMPrincipal.MDOQueryValidaUsuario.Params[0].AsString;
end;

{
  Está procedure libera o formuário login da memoria assim que o login é feito 
e o formulário
  principal é carregado
}
procedure TfrmPrincipal.FormCreate(Sender: TObject);
begin
FreeAndNil(frmLogin);
Iniconfiskin := TIniFile.Create('F:\SIS\config\Config_Layout.ini');
skinPricipal.SkinFile := Iniconfiskin.ReadString('Layout','Path','');
skinPricipal.Active := True;
end;

procedure TfrmPrincipal.mSkinClick(Sender: TObject);
begin
if frmLayout = NIL then
begin
frmLayout := TfrmLayout.Create(self);
frmLayout.ShowModal;
FreeAndNil(frmLayout);
end;
end;

procedure TfrmPrincipal.mUsuarioClick(Sender: TObject);
begin
if frmCadUser = NIL then
begin
frmCadUser := TfrmCadUser.Create(self);
frmCadUser.ShowModal;
FreeAndNil(frmCadUser);
end;
end;

procedure TfrmPrincipal.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
Action := caFree;
end;


unit uSkin;

interface

uses
ShlObj;

type

  private
{ Private declarations }
  public
{ Public declarations }
Iniconf: TIniFile;
  end;

var
  frmLayout: TfrmLayout;

implementation

uses uPrincipal;
{$R *.dfm}


procedure TfrmLayout.BitBtnProcurarSkinClick(Sender: TObject);
begin
if OpenDialogSkin.Execute then
frmPrincipal.Iniconfiskin.WriteString('Layout','Path', 
OpenDialogSkin.FileName);
end;

procedure TfrmLayout.BitBtnAtivarSkinClick(Sender: TObject);
begin
frmPrincipal.skinPricipal.SkinFile := 
frmPrincipal.Iniconfiskin.ReadString('Layout','Path','');
frmPrincipal.skinPricipal.Active := True;
frmPrincipal.skinPricipal.SkinAllForms := True;
frmLayout.SetFocus; 
end;

end.

[delphi-br] Re: OOP - Quais as vantagens?

[Joao Henrique Levada]

--- Em delphi-br@yahoogrupos.com.br, "Alexandre"  
escreveu
>
> Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria que 
> porfavor me explicassem qual a vantagem de ser usar OOP, não estou 
> conseguindo entender os beneficios para o meu programa usar oop ao invés de 
> procedures.


Fazendo um aplicativo que opera num banco de dados, você pode criar classes que 
operam sobre os dados.

Baseado nestas classes que operam sobre os dados, você pode criar classes que 
testam os métodos.

Então, em seus formulários você apenas chama métodos destas classes, fazendo o 
mais simples possível.

O código das "regras de negócio" fica separado do código da interface.

Existem muitas técnicas de programação orientada a objetos. Recomendo que 
estude o assunto. Vale a pena.

Re: [delphi-br] Re: Formas de se fazer com que um computador desligue

[Charlestown Dias da Cunha]

Tive um problema parecido em minha máquina: vira e mexe ela desligava
sozinha. Abri minha CPU e pude ver que o dissipador do processador estava
entupido de sujeira, gerando um superaquecimento. Limpei o dissipador e não
desligou sozinha mais.

Obs.: Eu não tenho e nem tinha o seu sistema instalado na minha máquina,
huahuahuahuahuahua...

Charlestown
Maringá-PR


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

[delphi-br] Re: Delphi 2007 não registra servidor de aplicação com Socket!

[janderson_coelho]

Olá, Bruno! Muito obrigado pela dica!

O meu servidor registrou perfeitamente, mas quando eu o invoco usando um 
aplicativo cliente  dá um erro de sequencia de classe inválida. O que pode ser?

--- Em delphi-br@yahoogrupos.com.br, Bruno Lichot  escreveu
>
> Faça o seguinte:
> Na linha de comando use desta forma:
> 
> C:\MinhaPasta\MeuServer.exe /regserver
> 
> Tudo vai funcionar.
> 
> Tem exemplos em HTTP://cc.codegear.com/author/795118
> 
> Abs
> 
> BL
> 
> From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
> Behalf Of janderson_coelho
> Sent: terça-feira, 19 de maio de 2009 16:09
> To: delphi-br@yahoogrupos.com.br
> Subject: [delphi-br] Delphi 2007 não registra servidor de aplicação com 
> Socket!
> 
> 
> 
> 
> 
> Salve galera!
> 
> Estou criando uma aplicação em três camadas no delphi 2007 mas quando eu 
> executo o aplicativo servidor ele é registrado no windows 2003, certo? Errado!
> 
> Não consigo registrar. E o que é mais interessante. quando eu executo uma 
> aplicação servidor feita no delphi 7 funciona!
> 
> Alguém teria uma ideia do que é isso?
> 
> Grato!
> _
> Janderson de Almeida
> 
> 
> 
> [As partes desta mensagem que não continham texto foram removidas]
>

[delphi-br] Boleto Bancário

[Alessandro Magno]

Galera,

Tendo uma conta de pessoa física no banco, eu consigo gerar boleto 
bancário em meu nome ou somente pessoas jurídicas???

[delphi-br] Evento da Embarcadero em todo Brasil

[Torion]

Inscrições no link:



http://latam.embarcadero.com/br/delphimeeting/


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

Re: [delphi-br] OOP - Quais as vantagens?

[Walter Chagas (Bol)]

Há benefícios e há malefícios.

Os benefícios é qeu a manutenção do seu projeto ou mesmo a criação de um 
projeto novo podem lhe render até 70% de tempo reduzido com manutenção ou mesmo 
implementação já que todos os objetos já estariam prontos para uso.

Os Malefícios são que seu programa (em tese) ficaria mais lento de ser 
processado uma vez que o mesmo passa a ser todo modularizado e toda vez que o 
processador se depara com um procedimento no seu programa. Ele para a execução 
do seu programa, coloca-o na pilha pra executar o procedimento. Pra depois 
voltar a execução do seu programa. Mas é aquele negócio: Vai ser uma lentidão 
quase que imperceptível...


[]s
 
 
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr


  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:34 AM
  Subject: [delphi-br] OOP - Quais as vantagens?





  Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria que 
porfavor me explicassem qual a vantagem de ser usar OOP, não estou conseguindo 
entender os beneficios para o meu programa usar oop ao invés de procedures.

  Alex

  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.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] OOP - Quais as vantagens?

[Vinicius A. Santos]

Um projeto OOP bem estruturado, você escreverá menos códigos, não 
cometerá bugs em cascata, por que você não duplicará código.
Você usurá menos variáveis públicas, que todos podem mecher. A herança 
aumentará muito sua produtividade.

Claro que isso são vantagens para um BOM projeto OOP.
Não para alguns "zé manés" que acham que só por que sabem criar um 
classes, pensam que seu projeto é bem estruturado.

Alexandre escreveu:
>
>
> Pessoal estou cansado de ouvir que oop é melhor que procedural, 
> gostaria que porfavor me explicassem qual a vantagem de ser usar OOP, 
> não estou conseguindo entender os beneficios para o meu programa usar 
> oop ao invés de procedures.
>
> Alex
>
> __ Information from ESET NOD32 Antivirus, version of virus 
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com <http://www.eset.com>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 


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

Re: [delphi-br] Gravar imagem com edbimage no firebird

[Torion]

gente, estou tendo um problema com isso, tenho uma tabela no FB 2.0 com + / - 
900 registros em rede
achei melhor colocar dentro do db para ter acesso a rede, mas o db ficou enorme 
e uma select na mesma demora muito, mesmo 
sendo um pc 2 gb ram e processador E4500

mas se colocar externo, como seria para link na rede...

qual a melhor forma de apresentar uma imagem no programa?


From: Jackson Gomes - Tools&Comps 
Sent: Thursday, May 21, 2009 12:31 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Gravar imagem com edbimage no firebird






> Aparentemente, parece que a imagem é gravada. Porém, quando mando mostrar os
> dados no dbgrid com a função abaixo a imagem não aparece.

DBGrid padrão não mostra imagem. O ideal é vc colocar um TDBImage do lado do 
DBGrid para mostrar isso.

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324
--
http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc
--
Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 





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

Re: [delphi-br] OOP - Quais as vantagens?

[Walter Chagas (Bol)]

Não! É totalmente diferente.

Na OOP voce mexe no objeto. Este objeto pode ser reaproveitado em N projetos ao 
passo que uma procedure pode ser aproveitada somente em alguns projetos.

Uma coisa é voce mexer numa simples função ou numa procedure. Outra é mexer 
numa classe (objeto). A mudançá é muito mais radical


[]s
 
 
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr


  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:55 AM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?





  Mas procedural eu também só mecheria dentro do procedimento e todos os 
formulários que usam aquele procedimento seriam alterados, entende a minha 
dúvida?procedural eu também mecho na função e altera para todo o sistema.

  Alex

  - Original Message - 
  From: Daniel Sobrinho Laporte 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:48 AM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?

  Vamos a um exemplo básico. Se você utiliza por exemplo um evento onKeyPress,
  onde ao ser pressionado o enter, o cursor será movido para o próximo campo e
  não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  telas que queira fazer este recurso, terá que implementar nas 100, se
  utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  que os demais formulários já herdem essa implementação por si só. Outra
  facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  necessitar corrigir apenas um código e pronto, toda parte de código que faz
  uso daquela classe ou método alterado será corrigida. Boas práticas de
  programação devem sempre ser vistas como beneficio, e claramente
  proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  muitos outros.

  2009/5/21 Alexandre 

  >
  >
  > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > conseguindo entender os beneficios para o meu programa usar oop ao invés de
  > procedures.
  >
  > Alex
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checked by ESET NOD32 Antivirus.
  >
  > http://www.eset.com
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  > 
  >

  -- 
  Daniel Sobrinho Laporte
  Analista de Sistemas e Desenvolvedor Delphi + Firebird.
  Colunista e Editor Técnico ClubeDelphi - DevMedia.

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

  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.com

  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.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] OOP - Quais as vantagens?

[Walter Chagas (Bol)]

Alex,

Pra voce dar conta de mudar pra OOP o primeiro passo é renunciar a todo o seu 
conhecimento de programação e recomeçar tudo do zero, porque? Porque a 
programação OOP é totalmente diferente e quem não faz da forma que eu sugeri, 
acaba misturando as duas coisas lá pela 20a ou 30a linha de código já escrita.



[]s
 
 
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr


  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 1:42 PM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?





  hm, entendi os exemplos dos amigos, então vocês apóiam que eu mude 
para oop?pela experiência de vocês é uma boa idéia?

  Alex

  - Original Message - 
  From: Daniel Sobrinho Laporte 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 12:11 PM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?

  Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
  pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
  uma coleção de métodos que possuem funcionalidades genéricas, quando você
  altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
  referencia serão alterados. Do mesmo modo em que você criou um método
  salva_banco procedural, nada impede que você o faça de forma orientada a
  objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
  você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
  padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
  comum.

  2009/5/21 Alexandre 

  >
  >
  > Percebi também que em alguns exemplos de oop usa muito mais linhas do que
  > procedural por exemplo:
  >
  > Pessoa.nome := 'Maria';
  > Pessoa.endereco := 'RUA X';
  > Pessoa.salvaregistro;
  >
  > em procedural ficaria:
  >
  > salva_banco('PESSOA',lista_de_campos);
  >
  > isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou
  > contra, veja bem, só quero ter certeza que posso mudar meu sistema para oop
  > de uma forma segura.
  >
  > Alex
  >
  >
  > - Original Message -
  > From: Alexandre
  > To: delphi-br@yahoogrupos.com.br 
  > Sent: Thursday, May 21, 2009 11:55 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Mas procedural eu também só mecheria dentro do procedimento e todos os
  > formulários que usam aquele procedimento seriam alterados, entende a minha
  > dúvida?procedural eu também mecho na função e altera para todo o sistema.
  >
  > Alex
  >
  > - Original Message -
  > From: Daniel Sobrinho Laporte
  > To: delphi-br@yahoogrupos.com.br 
  > Sent: Thursday, May 21, 2009 11:48 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Vamos a um exemplo básico. Se você utiliza por exemplo um evento
  > onKeyPress,
  > onde ao ser pressionado o enter, o cursor será movido para o próximo campo
  > e
  > não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  > telas que queira fazer este recurso, terá que implementar nas 100, se
  > utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  > que os demais formulários já herdem essa implementação por si só. Outra
  > facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  > necessitar corrigir apenas um código e pronto, toda parte de código que faz
  > uso daquela classe ou método alterado será corrigida. Boas práticas de
  > programação devem sempre ser vistas como beneficio, e claramente
  > proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  > exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  > muitos outros.
  >
  > 2009/5/21 Alexandre 

  > >
  >
  > >
  > >
  > > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > > conseguindo entender os beneficios para o meu programa usar oop ao invés
  > de
  > > procedures.
  > >
  > > Alex
  > >
  > > __ Information from ESET NOD32 Antivirus, version of virus
  > > signature database 4093 (20090521) __
  > >
  > > The message was checked by ESET NOD32 Antivirus.
  > >
  > > http://www.eset.com
  > >
  > > [As partes desta mensagem que não continham texto foram removidas]
  > >
  > >
  > >
  >
  > --
  > Daniel Sobrinho Laporte
  > Analista de Sistemas e Desenvolvedor Delphi + Firebird.
  > Colunista e Editor Técnico Clu

Re: [delphi-br] [OFF] Pedido de Retratação

[Leandro]

Pessoal, desculpem a minha intromissão no assunto, mas gostaria apenas de 
deixar claro a todos os membros, que por ventura se sintam ofendidos pelo que 
relatarei, o que na verdade, é muito interessante...

Escrevemos pelo meio de um código.  A língua portuguesa escrita.  E por 
convenção a letra "d" tem som de "dê".  Então é a forma e o som unidos numa 
simbologia.  E esta letra nunca poderia ter o som de "zê".  Assim ocorre com o 
que escrevemos.  O sinal ;-) querdizer que é um smile piscando.  :-P é um smile 
de lingua de fora.
E por convenção, escrever "EM CAIXA ALTA" quer dizer que estamos gritando.  Não 
se trata de estilo, mas sim de convenção.  Eu posso gostar de escrever em caixa 
alta.  Mas quem vai ler gosta?  Será que quem vai ler não irá achar que é uma 
forma agressiva?  Infelizmente isso ocorre, por que não temos o "som", o 
"gesto" e a "entonação" do que está escrito.  Portanto, escrever de forma 
cordial, e usar sempre o "BOM SENSO" :-) será o melhor.  E também ter um pouco 
de paciência, também ajuda.  Afinal, essas são grandes virtudes!

Abraços a todos

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

Re: [delphi-br] Não quero escrever os campos

[Eduardo Silva dos Santos]

Depois de muito tempo escrendo na mão eu fiz um pequeno utilitário onde eu
seleciono o tabela e tenho a opçao de gerar
os Select's.. Updates,, e tudo mais.

2009/5/20 Nivaldo Stainle 

>
>
> abre, mas não me relaciona as tabelas e consequentemente os campos, assim
> tenho que escrever tudo na unha.(isto tudo usando DBExpress) usando ADO
> funciona beleza.
> Stainle.
>
> --- Em qua, 20/5/09, Alisson >
> escreveu:
>
> De: Alisson >
> Assunto: Re: [delphi-br] Não quero escrever os campos
> Para: delphi-br@yahoogrupos.com.br 
> Data: Quarta-feira, 20 de Maio de 2009, 10:18
>
> Se você der um duplo clique na propriedade CommandText do SQLDataset não
> abre o editor?
>
>  _ _ _ _ __
> 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]
>
>  
>



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

RES: [delphi-br] Gravar imagem no firebird com edbimage

[Ralp Alves Bezerra]

Desculpe, mais o que fiz foi reformular a minha dúvida, pois estavam
pensando que queria mostrar uma imagem no dbgrid e não é este o caso.

 

Abraços.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Jackson Gomes - Tools&Comps
Enviada em: quinta-feira, 21 de maio de 2009 15:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Gravar imagem no firebird com edbimage

 






pra quê mandar a mesma pergunta de novo? já mandou, já responderam, poderia 
esperar mais ao invés de poluir a lista e outras listas de Delphi com a
mesma 
pergunta repetida...

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com  
Fone: 27 3389 1138 - 8811 0324
--
http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc
--
Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br   





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

[delphi-br] Re: RE: [delph i-br] TCom ponent Vid eo - Resol ução ?

[nillgolv]

Realmente estou notando que é isto mesmo, pois ao abrir outro exemplo apareceu 
o mesmo formulário de resolução.

O que preciso é fazer com que a imagem salve pelo formato (230 x 270) pixels, 
que é o tamanho da foto no form do projeto.

Será possível fazer isto?


Em 21/05/2009 14:03, Marcos Abreu Ferreira < m.abreuferre...@hotmail.com 
> escreveu:


Nilton,

posso estar falando bobagem, mas acredito que essas resoluções que aparecem vem 
do drive da webcam e não do componente de captura de imagem. Pelo que entendi, 
voce quer capturar uma imagem com uma resolução diferente das que aparecem para 
voce?

Att,

Marcos A. Ferreira
São Paulo - BrasilMSN: maferre...@hotmail.itgoogle Talk: maf.decisiva
Skype: m_abreuferreira

Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você 
não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode 
usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação 
baseada nestas informações. Se você recebeu esta mensagem por engano, por 
favor, avise imediatamente o remetente, respondendo o email e em seguida, 
apague-o.
Agradecemos sua cooperação.

This message may contain confidential and/or privileged information. If you are 
not the addressee or authorized to receive this for the addressee, you must not 
use, copy, disclose or take any action based on this message or any information 
herein. If you have received this message in error, please, advise the sender 
immediately by reply e-mail and delete this message.
Thank you for your cooperation.

Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO 
AMBIENTE.
ENVIRONMENT commitment and responsibility, think about Before Printing.

To: delphi-br@yahoogrupos.com.br
From: nillg...@bol.com.br
Date: Thu, 21 May 2009 12:03:56 -0300
Subject: [delphi-br] TComponent Video - Resolução ?

Pessoal, instalei o TComponent Video, para capturar webcam, tudo ok.
Mas como preciso fazer com que abra a imagem em um tamanho de acordo com o meu 
projeto,
procurei o form onde configura a resolução, mas não acho nem no projeto fonte e
nem no fonte do componente. Na resolução tem a caixa de combo com os valores, 
pois gostaria
de colocar um valor específico para o meu projeto.

O formulário de configuração é assim:

Formato de video
===
Configurações de fluxo

Formato de imagem digital
Resolução
160 x 120
176 x 144
320 x 240
352 x 288
640 x 480

Intensidade (bits) e compactação de
YUY2
UYVY

Tamanho (bytes)
614400

.
Estranho que não consigo achar este
formulário. Somente em tempo de execução.
.

Agrdeço muito pela ajuda.

Nilton

__
Show them the way! Add maps and directions to your party invites. 
http://www.microsoft.com/windows/windowslive/products/events.aspx

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

Re: [delphi-br] Gravar imagem no firebird com edbimage

pra quê mandar a mesma pergunta de novo? já mandou, já responderam, poderia 
esperar mais ao invés de poluir a lista e outras listas de Delphi com a mesma 
pergunta repetida...

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 

Re: [delphi-br] Sobre intraweb

[CPD (Borborema)]

Eu baixei direto do Site, bem simples a atualização, com o original do 
Delphi 7 vc não consegue fazer tudo realmente, é melhor vc atualizar para a 
versão final do intraweb 7 que é a 7.2.41 no meu caso, acredito que para vc 
é a mesma, só que para Delpgi 7.

Qualquer coisa estamos aqui.

Alexandre.

- Original Message - 
From: "Leonardo Quinino" 
To: 
Sent: Thursday, May 21, 2009 9:15 AM
Subject: Re: [delphi-br] Sobre intraweb


Alexandre, sobre o quintento, como você atualizou o IntraWeb ? , fui no site
deles, mandei email , pedindo informacao, quero saber se em DELPHI 7  +
IntraWeb ?XX?? (qual versao)  ? vou rodar isso legal, fiz alguns testes com
o intraweb original que veio no delphi7, mas parece que precisava ainda de
ajustes.

-- 
Leonardo Quinino


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





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

[delphi-br] Gravar imagem no firebird com edbimage

[Ralp Alves Bezerra]

Bom dia! Estou utilizando o código abaixo juntamente com o componente
edbImage para salvar uma imagem no firebird 2.1 com dbexpress e Delphi 7:

 

procedure TfrmAuxiliar.SpeedButton1Click(Sender: TObject);

begin

  if application.messagebox('Incluir Bandeira?',

 'Bandeira',mb_yesno)=idyes then

  begin

  if (opdFoto.execute) then

 d.cds_Estado.Edit;

 dbiFoto.Picture.LoadFromFile(opdFoto.FileName);

 d.cds_Estado.Post;

 d.cds_Estado.ApplyUpdates(0)

  end;

end;

 

Aparentemente, parece que a imagem é gravada. Porém, quando mando mostrar os
dados no dbgrid com a função abaixo a imagem não aparece.

 

Ao clicar em um registro do dbgrid me mostrasse a imagem no componente no
edbimage.

 

  Screen.Cursor:=crSqlWait;

  //Mostra Estado dbGrid

With d.cds_Estado do

Begin

  d.cds_Estado.Close;

  CommandText:='Select * from Aux_Estado order by Abreviacao';

  d.cds_Estado.Open;

  dbGrid3.SetFocus

end;

  Screen.Cursor:=crDefault;

 

Olhando no ibexpert, o campo parece estar preenchido mas na aplicação ele
não aparece.

 

O que poderia ser?

 

Grato

 

Ralp Alves

 



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

Res: [delphi-br] OOP - Quais as vantagens?

[Elazar Dornelles Ceza]

Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Maio de 2009 11:55:25
Assunto: Re: [delphi-br] OOP - Quais as vantagens?





Mas procedural eu também só mecheria dentro do procedimento e todos os 
formulários que usam aquele procedimento seriam alterados, entende a minha 
dúvida?procedural eu também mecho na função e altera para todo o sistema.

Alex

De: Alexandre 

***

Entretanto tem coisas que não se pode fazer sem e em outros casos podemos fazer 
aproveitando tudo que já fizemos (ganhando muito mais tempo).

http://delphi.about.com/od/course/Learning_Object_Oriented_Programming_with_Delphi_Free_Online_Course.htm
http://delphi.about.com/od/course/a/oop_intro.htm


Atenc
Elazar


  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] importar dados do excel

> Gostaria de saber qual a melhor forma de importar dados do excel,
> e se possivel um exemplo

http://br.groups.yahoo.com/group/delphi-br/msearch?query=importar+excel&pos=10&cnt=10

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 

Re: [delphi-br] importar dados do excel

[Ricardo César Cardoso]

Tem um exemplo muito bom no delphi.about.com. O link é 
http://delphi.about.com/od/database/l/aa090903a.htm

[]'s
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 qui, 21/5/09, nilmahtavares  escreveu:

BOa tarde pessoal

Gostaria de saber qual a melhor forma de importar dados do excel,

e se possivel um exemplo



obrigada

 

















  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] OOP - Quais as vantagens?

[Ricardo César Cardoso]

Putz... eu ia escrever exatamente isso! Só fiquei com medo de me enrolar com as 
palavras e confundir o assunto ainda mais.

[]'s
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 qui, 21/5/09, Daniel Sobrinho Laporte  
escreveu:

  Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você 
pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos uma 
coleção de métodos que possuem funcionalidades genéricas, quando você altera 
alguma coisa dentro dos seus métodos, todos os códigos que fazem referencia 
serão alterados. Do mesmo modo em que você criou um método
salva_banco procedural, nada impede que você o faça de forma orientada a 
objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de padõres 
de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é comum.


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

Re: [delphi-br] Re: Formas de se fazer com que um computador desligue

[Evandro Siqueira]

Só pra ser um pouco mais específico: Manda ele testar as memórias.

Carlos Negrão escreveu:
>
>
> É o que eu estava imaginando também, já que tudo que eu encontro 
> indica ser problema de hardware, e eu sei que o código para desligar a 
> máquina é específico e teria de ser colocado de propósito, coisa que 
> não fiz em parte alguma deste ou de qualquer outro programa até hoje.
> De qualquer forma, achei melhor confirmar.
>
> --- Em delphi-br@yahoogrupos.com.br 
> , Luciano Angelini 
>  escreveu
> >
> > Caro Carlos ...
> >
> > Uma pequena parte dos metidos a 'Técnico em Informatica' , quando
> > não acham uma solução para o clientes, colocam
> > culpa em alguma coisa, talvez viu alguma coisa diferente no computador,
> > ""Seu Sistema"" ... e falou que é isso !
> > Desistale seu Programa/Sistema e veja o que acontece, tenho certeza que
> > o computador ira desligar ! Pois isso é falha de hardware e não de
> > Software.
> >
> >
> > Luciano Angelini
> > Prefeitura de Lupionópolis-Pr
> >
> >
> > Carlos Negrão escreveu:
> > >
> > >
> > > Estou com um problema aqui.
> > > O computador que um cliente usa para rodar um programa que fiz anda
> > > desligando sozinho quando entra no programa. Eu sei que não coloquei
> > > nada no programa para desligar o computador, e não tenho a menor 
> idéia
> > > de como poderia fazer isso acidentalmente, mas o técnico que olhou a
> > > máquina colocou a culpa no meu programa.
> > >
> > > Existe alguma coisa que eu possa ter feito para causar o problema por
> > > acidente, apesar de nunca acontecer em nenhum dos dois computadores
> > > que uso para programar e testar?
> > > Ou será que o problema deles só pode mesmo ser hardware e o técnico
> > > simplesmente não soube diagnosticar?
> > >
> > >
>
























































-- 
[]’s.

Evandro Siqueira
Programador de Sistemas
L’essentiel Lingerie
(79) 3254-5511 Ramal 218
skype: evandro.lessentiel





-- 
< 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] OOP - Quais as vantagens?

[Alexandre]

Obrigado pelas dicas, vou começar o estudo mesmo!

Alex

  - Original Message - 
  From: Bruno Lichot 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 1:51 PM
  Subject: RE: [delphi-br] OOP - Quais as vantagens?





  Veja os vídeo do Ricardo Barbieri sobre OOP no link: 
http://cc.codegear.com/Item/25344

  E depois veja os do site www.istudar.com.br<http://www.istudar.com.br>

  Abs

  BL

  From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Alexandre
  Sent: quinta-feira, 21 de maio de 2009 13:42
  To: delphi-br@yahoogrupos.com.br
  Subject: Re: [delphi-br] OOP - Quais as vantagens?

  hm, entendi os exemplos dos amigos, então vocês apóiam que eu mude 
para oop?pela experiência de vocês é uma boa idéia?

  Alex

  - Original Message -
  From: Daniel Sobrinho Laporte
  To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br>
  Sent: Thursday, May 21, 2009 12:11 PM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?

  Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
  pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
  uma coleção de métodos que possuem funcionalidades genéricas, quando você
  altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
  referencia serão alterados. Do mesmo modo em que você criou um método
  salva_banco procedural, nada impede que você o faça de forma orientada a
  objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
  você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
  padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
  comum.

  2009/5/21 Alexandre 
mailto:alexandresoaressp%40yahoo.com.br>>

  >
  >
  > Percebi também que em alguns exemplos de oop usa muito mais linhas do que
  > procedural por exemplo:
  >
  > Pessoa.nome := 'Maria';
  > Pessoa.endereco := 'RUA X';
  > Pessoa.salvaregistro;
  >
  > em procedural ficaria:
  >
  > salva_banco('PESSOA',lista_de_campos);
  >
  > isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou
  > contra, veja bem, só quero ter certeza que posso mudar meu sistema para oop
  > de uma forma segura.
  >
  > Alex
  >
  >
  > - Original Message -
  > From: Alexandre
  > To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> 

  > Sent: Thursday, May 21, 2009 11:55 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Mas procedural eu também só mecheria dentro do procedimento e todos os
  > formulários que usam aquele procedimento seriam alterados, entende a minha
  > dúvida?procedural eu também mecho na função e altera para todo o sistema.
  >
  > Alex
  >
  > - Original Message -
  > From: Daniel Sobrinho Laporte
  > To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> 

  > Sent: Thursday, May 21, 2009 11:48 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Vamos a um exemplo básico. Se você utiliza por exemplo um evento
  > onKeyPress,
  > onde ao ser pressionado o enter, o cursor será movido para o próximo campo
  > e
  > não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  > telas que queira fazer este recurso, terá que implementar nas 100, se
  > utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  > que os demais formulários já herdem essa implementação por si só. Outra
  > facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  > necessitar corrigir apenas um código e pronto, toda parte de código que faz
  > uso daquela classe ou método alterado será corrigida. Boas práticas de
  > programação devem sempre ser vistas como beneficio, e claramente
  > proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  > exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  > muitos outros.
  >
  > 2009/5/21 Alexandre 
mailto:alexandresoaressp%40yahoo.com.br>
  > >
  >
  > >
  > >
  > > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > > conseguindo entender os beneficios para o meu programa usar oop ao invés
  > de
  > > procedures.
  > >
  > > Alex
  > >
  > > __ Information from ESET NOD32 Antivirus, version of virus
  > > signature database 4093 (20090521) __
  > >
  > > The message was checked by ESET NOD32 Antivirus.
  > >
  > > http://www.eset.com
  > >
  > > [As partes desta mensagem que não continham texto foram removidas]
  > 

RE: [delphi-br] TCom ponent Video - Resol ução ?

[Marcos Abreu Ferreira]

Nilton,

 

posso estar falando bobagem, mas acredito que essas resoluções que aparecem vem 
do drive da webcam e não do componente de captura de imagem. Pelo que entendi, 
voce quer capturar uma imagem com uma resolução diferente das que aparecem para 
voce?

 

 
Att,

Marcos A. Ferreira
São Paulo - BrasilMSN: maferre...@hotmail.itgoogle Talk: maf.decisiva
Skype: m_abreuferreira

Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você 
não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode 
usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação 
baseada nestas informações. Se você recebeu esta mensagem por engano, por 
favor, avise imediatamente o remetente, respondendo o email e em seguida, 
apague-o.
Agradecemos sua cooperação.

This message may contain confidential and/or privileged information. If you are 
not the addressee or authorized to receive this for the addressee, you must not 
use, copy, disclose or take any action based on this message or any information 
herein. If you have received this message in error, please, advise the sender 
immediately by reply e-mail and delete this message.
Thank you for your cooperation.
 
Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO 
AMBIENTE.
ENVIRONMENT commitment and responsibility, think about Before Printing.


 



To: delphi-br@yahoogrupos.com.br
From: nillg...@bol.com.br
Date: Thu, 21 May 2009 12:03:56 -0300
Subject: [delphi-br] TComponent Video - Resolução ?







Pessoal, instalei o TComponent Video, para capturar webcam, tudo ok.
Mas como preciso fazer com que abra a imagem em um tamanho de acordo com o meu 
projeto,
procurei o form onde configura a resolução, mas não acho nem no projeto fonte e
nem no fonte do componente. Na resolução tem a caixa de combo com os valores, 
pois gostaria
de colocar um valor específico para o meu projeto.

O formulário de configuração é assim:

Formato de video
===
Configurações de fluxo

Formato de imagem digital
Resolução
160 x 120
176 x 144
320 x 240
352 x 288
640 x 480

Intensidade (bits) e compactação de
YUY2
UYVY

Tamanho (bytes)
614400

.
Estranho que não consigo achar este
formulário. Somente em tempo de execução.
.

Agrdeço muito pela ajuda.

Nilton








_
Show them the way! Add maps and directions to your party invites. 
http://www.microsoft.com/windows/windowslive/products/events.aspx

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

Re: [delphi-br] OOP - Quais as vantagens?

[Marlon David de Souza]

Boa tarde,

  Eu sugiro que, antes de começar fazer qualquer coisa, faça um bom 
estudo sobre OOP, inclusive, se puder, faça um bom curso sobre OOP 
(básico e avançado).

Sem mais,

Marlon David de Souza
Desenvolvimento
Sysmo Informática Ltda



Alexandre escreveu:
> hm, entendi os exemplos dos amigos, então vocês apóiam que eu mude 
> para oop?pela experiência de vocês é uma boa idéia?
>
> Alex
>
>   - Original Message - 
>   From: Daniel Sobrinho Laporte 
>   To: delphi-br@yahoogrupos.com.br 
>   Sent: Thursday, May 21, 2009 12:11 PM
>   Subject: Re: [delphi-br] OOP - Quais as vantagens?
>
>
>
>
>
>   Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
>   pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
>   uma coleção de métodos que possuem funcionalidades genéricas, quando você
>   altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
>   referencia serão alterados. Do mesmo modo em que você criou um método
>   salva_banco procedural, nada impede que você o faça de forma orientada a
>   objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
>   você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
>   padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
>   comum.
>
>   2009/5/21 Alexandre 
>
>   >
>   >
>   > Percebi também que em alguns exemplos de oop usa muito mais linhas do que
>   > procedural por exemplo:
>   >
>   > Pessoa.nome := 'Maria';
>   > Pessoa.endereco := 'RUA X';
>   > Pessoa.salvaregistro;
>   >
>   > em procedural ficaria:
>   >
>   > salva_banco('PESSOA',lista_de_campos);
>   >
>   > isso que quero entender, se é tão bom, porque usa muito mais linhas?não 
> sou
>   > contra, veja bem, só quero ter certeza que posso mudar meu sistema para 
> oop
>   > de uma forma segura.
>   >
>   > Alex
>   >
>   >
>   > - Original Message -
>   > From: Alexandre
>   > To: delphi-br@yahoogrupos.com.br 
>   > Sent: Thursday, May 21, 2009 11:55 AM
>   > Subject: Re: [delphi-br] OOP - Quais as vantagens?
>   >
>   > Mas procedural eu também só mecheria dentro do procedimento e todos os
>   > formulários que usam aquele procedimento seriam alterados, entende a minha
>   > dúvida?procedural eu também mecho na função e altera para todo o sistema.
>   >
>   > Alex
>   >
>   > - Original Message -
>   > From: Daniel Sobrinho Laporte
>   > To: delphi-br@yahoogrupos.com.br 
>   > Sent: Thursday, May 21, 2009 11:48 AM
>   > Subject: Re: [delphi-br] OOP - Quais as vantagens?
>   >
>   > Vamos a um exemplo básico. Se você utiliza por exemplo um evento
>   > onKeyPress,
>   > onde ao ser pressionado o enter, o cursor será movido para o próximo campo
>   > e
>   > não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
>   > telas que queira fazer este recurso, terá que implementar nas 100, se
>   > utilizar um conceito de de POO como herança por exemplo, poderá fazer com
>   > que os demais formulários já herdem essa implementação por si só. Outra
>   > facilidade é a centralização dos códigos. Imagine você ao dar manutenção
>   > necessitar corrigir apenas um código e pronto, toda parte de código que 
> faz
>   > uso daquela classe ou método alterado será corrigida. Boas práticas de
>   > programação devem sempre ser vistas como beneficio, e claramente
>   > proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
>   > exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
>   > muitos outros.
>   >
>   > 2009/5/21 Alexandre 
> 
>   > >
>   >
>   > >
>   > >
>   > > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
>   > > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
>   > > conseguindo entender os beneficios para o meu programa usar oop ao invés
>   > de
>   > > procedures.
>   > >
>   > > Alex
>   > >
>   > > __ Information from ESET NOD32 Antivirus, version of virus
>   > > signature database 4093 (20090521) __
>   > >
>   > > The message was checked by ESET NOD32 Antivirus.
>   > >
>   > > http://www.eset.com
>   > >
>   > > [As partes desta mensagem que não continham texto foram removidas]
>   > >
>   > >
>   > >
>   >
>   > --
>   > Daniel Sobrinho Laporte
> 

RE: [delphi-br] OOP - Quais as vantagens?

[Bruno Lichot]

Veja os vídeo do Ricardo Barbieri sobre OOP no link: 
http://cc.codegear.com/Item/25344

E depois veja os do site www.istudar.com.br<http://www.istudar.com.br>

Abs

BL

From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On 
Behalf Of Alexandre
Sent: quinta-feira, 21 de maio de 2009 13:42
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] OOP - Quais as vantagens?





hm, entendi os exemplos dos amigos, então vocês apóiam que eu mude para 
oop?pela experiência de vocês é uma boa idéia?

Alex

- Original Message -
From: Daniel Sobrinho Laporte
To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br>
Sent: Thursday, May 21, 2009 12:11 PM
Subject: Re: [delphi-br] OOP - Quais as vantagens?

Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
uma coleção de métodos que possuem funcionalidades genéricas, quando você
altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
referencia serão alterados. Do mesmo modo em que você criou um método
salva_banco procedural, nada impede que você o faça de forma orientada a
objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
comum.

2009/5/21 Alexandre 
mailto:alexandresoaressp%40yahoo.com.br>>

>
>
> Percebi também que em alguns exemplos de oop usa muito mais linhas do que
> procedural por exemplo:
>
> Pessoa.nome := 'Maria';
> Pessoa.endereco := 'RUA X';
> Pessoa.salvaregistro;
>
> em procedural ficaria:
>
> salva_banco('PESSOA',lista_de_campos);
>
> isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou
> contra, veja bem, só quero ter certeza que posso mudar meu sistema para oop
> de uma forma segura.
>
> Alex
>
>
> - Original Message -
> From: Alexandre
> To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> 
> 
> Sent: Thursday, May 21, 2009 11:55 AM
> Subject: Re: [delphi-br] OOP - Quais as vantagens?
>
> Mas procedural eu também só mecheria dentro do procedimento e todos os
> formulários que usam aquele procedimento seriam alterados, entende a minha
> dúvida?procedural eu também mecho na função e altera para todo o sistema.
>
> Alex
>
> - Original Message -
> From: Daniel Sobrinho Laporte
> To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> 
> 
> Sent: Thursday, May 21, 2009 11:48 AM
> Subject: Re: [delphi-br] OOP - Quais as vantagens?
>
> Vamos a um exemplo básico. Se você utiliza por exemplo um evento
> onKeyPress,
> onde ao ser pressionado o enter, o cursor será movido para o próximo campo
> e
> não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
> telas que queira fazer este recurso, terá que implementar nas 100, se
> utilizar um conceito de de POO como herança por exemplo, poderá fazer com
> que os demais formulários já herdem essa implementação por si só. Outra
> facilidade é a centralização dos códigos. Imagine você ao dar manutenção
> necessitar corrigir apenas um código e pronto, toda parte de código que faz
> uso daquela classe ou método alterado será corrigida. Boas práticas de
> programação devem sempre ser vistas como beneficio, e claramente
> proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
> exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
> muitos outros.
>
> 2009/5/21 Alexandre 
> mailto:alexandresoaressp%40yahoo.com.br>
> >
>
> >
> >
> > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
> > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
> > conseguindo entender os beneficios para o meu programa usar oop ao invés
> de
> > procedures.
> >
> > Alex
> >
> > __ Information from ESET NOD32 Antivirus, version of virus
> > signature database 4093 (20090521) __
> >
> > The message was checked by ESET NOD32 Antivirus.
> >
> > http://www.eset.com
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Daniel Sobrinho Laporte
> Analista de Sistemas e Desenvolvedor Delphi + Firebird.
> Colunista e Editor Técnico ClubeDelphi - DevMedia.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.

Re: [delphi-br] OOP - Quais as vantagens?

[Alexandre]

hm, entendi os exemplos dos amigos, então vocês apóiam que eu mude para 
oop?pela experiência de vocês é uma boa idéia?

Alex

  - Original Message - 
  From: Daniel Sobrinho Laporte 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 12:11 PM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?





  Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
  pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
  uma coleção de métodos que possuem funcionalidades genéricas, quando você
  altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
  referencia serão alterados. Do mesmo modo em que você criou um método
  salva_banco procedural, nada impede que você o faça de forma orientada a
  objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
  você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
  padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
  comum.

  2009/5/21 Alexandre 

  >
  >
  > Percebi também que em alguns exemplos de oop usa muito mais linhas do que
  > procedural por exemplo:
  >
  > Pessoa.nome := 'Maria';
  > Pessoa.endereco := 'RUA X';
  > Pessoa.salvaregistro;
  >
  > em procedural ficaria:
  >
  > salva_banco('PESSOA',lista_de_campos);
  >
  > isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou
  > contra, veja bem, só quero ter certeza que posso mudar meu sistema para oop
  > de uma forma segura.
  >
  > Alex
  >
  >
  > - Original Message -
  > From: Alexandre
  > To: delphi-br@yahoogrupos.com.br 
  > Sent: Thursday, May 21, 2009 11:55 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Mas procedural eu também só mecheria dentro do procedimento e todos os
  > formulários que usam aquele procedimento seriam alterados, entende a minha
  > dúvida?procedural eu também mecho na função e altera para todo o sistema.
  >
  > Alex
  >
  > - Original Message -
  > From: Daniel Sobrinho Laporte
  > To: delphi-br@yahoogrupos.com.br 
  > Sent: Thursday, May 21, 2009 11:48 AM
  > Subject: Re: [delphi-br] OOP - Quais as vantagens?
  >
  > Vamos a um exemplo básico. Se você utiliza por exemplo um evento
  > onKeyPress,
  > onde ao ser pressionado o enter, o cursor será movido para o próximo campo
  > e
  > não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  > telas que queira fazer este recurso, terá que implementar nas 100, se
  > utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  > que os demais formulários já herdem essa implementação por si só. Outra
  > facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  > necessitar corrigir apenas um código e pronto, toda parte de código que faz
  > uso daquela classe ou método alterado será corrigida. Boas práticas de
  > programação devem sempre ser vistas como beneficio, e claramente
  > proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  > exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  > muitos outros.
  >
  > 2009/5/21 Alexandre 

  > >
  >
  > >
  > >
  > > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > > conseguindo entender os beneficios para o meu programa usar oop ao invés
  > de
  > > procedures.
  > >
  > > Alex
  > >
  > > __ Information from ESET NOD32 Antivirus, version of virus
  > > signature database 4093 (20090521) __
  > >
  > > The message was checked by ESET NOD32 Antivirus.
  > >
  > > http://www.eset.com
  > >
  > > [As partes desta mensagem que não continham texto foram removidas]
  > >
  > >
  > >
  >
  > --
  > Daniel Sobrinho Laporte
  > Analista de Sistemas e Desenvolvedor Delphi + Firebird.
  > Colunista e Editor Técnico ClubeDelphi - DevMedia.
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checked by ESET NOD32 Antivirus.
  >
  > http://www.eset.com
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checked by ESET NOD32 Antivirus.
  >
  > http://www.eset.com
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checke

[delphi-br] importar dados do excel

[nilmahtavares]

BOa tarde pessoal

Gostaria de saber qual a melhor forma de importar dados do excel,
e se possivel um exemplo

obrigada

Res: [delphi-br] OOP - Quais as vantagens?

[Luciano Calenzani Simões]

E quem te disse que você não pode fazer passando parâmetro para os métodos?
Exemplo simples:
var
  vObjCidade : TCidade;
begin
  vObjCidade := TCidade.Create(Self);
  try
vObjCidade.Inserir(19, 'VITÓRIA', 1821); // Código cidade, nome cidade e 
código país
  finally
FreeAndNil(vObjCidade);
  end;
end;
 

 Luciano Calenzani Simões







De: Alexandre 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Maio de 2009 12:02:10
Assunto: Re: [delphi-br] OOP - Quais as vantagens?





Percebi também que em alguns exemplos de oop usa muito mais linhas do que 
procedural por exemplo:

Pessoa.nome := 'Maria';
Pessoa.endereco := 'RUA X';
Pessoa.salvaregistr o;

em procedural ficaria:

salva_banco( 'PESSOA', lista_de_ campos);

isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou 
contra,  veja bem, só quero ter certeza que posso mudar meu sistema para oop de 
uma forma segura.

Alex   


  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] Gravar imagem com edbimage no firebird

[Ralp Alves Bezerra]

No caso, não e para mostrar no dbgrid.

 

Eu tenho o componente  edbimage na aplicação, o que queria é ao clicar em um
registro no dbgrid ele mostrasse a imagem no componente.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Jackson Gomes - Tools&Comps
Enviada em: quinta-feira, 21 de maio de 2009 12:32
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Gravar imagem com edbimage no firebird

 







> Aparentemente, parece que a imagem é gravada. Porém, quando mando mostrar
os
> dados no dbgrid com a função abaixo a imagem não aparece.

DBGrid padrão não mostra imagem. O ideal é vc colocar um TDBImage do lado do

DBGrid para mostrar isso.

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com  
Fone: 27 3389 1138 - 8811 0324
--
http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc
--
Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br   





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

[delphi-br] Erro ApplyUpdates na alteração

[André Luis de Oliveira]

Olá,

Estou usando Delphi 6 + ADOConnection + DataSet + DataSetProvider + 
ClientDataSet e banco de dados oracle 9i. Quando faço alteração e salvo não dá 
erro ... mas se eu colocar o ApplyUpdates no ClientDataSet dá erro "Erro não 
especificado".


André Luis de Oliveira
Analista de Sistemas
E-mail: siste...@uniodontocamp.com.br
( (19) 3322-4000
Skype: UNIOCPS014


Uniodonto Campinas
Av. Brasil, 200 - Vila Itapura - Campinas/SP - 13023-075
( (19) 3322-4000
Visite nosso site: www.uniodontocamp.com.br




Se você recebeu essa mensagem por engano, desconsidere-a.
Antes de imprimir, pense em sua responsabilidade com o meio ambiente. 
"UNIODONTO, FEITA POR PESSOAS QUE FAZEM O BEM". 

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

Re: [delphi-br] Gravar imagem com edbimage no firebird

> Aparentemente, parece que a imagem é gravada. Porém, quando mando mostrar os
> dados no dbgrid com a função abaixo a imagem não aparece.

DBGrid padrão não mostra imagem. O ideal é vc colocar um TDBImage do lado do 
DBGrid para mostrar isso.

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br 

[delphi-br] Gravar imagem com edbimage no firebird

[Ralp Alves Bezerra]

Bom dia! Estou utilizando o código abaixo juntamente com o componente
edbImage para salvar uma imagem no firebird 2.1 com dbexpress e Delphi 7:

 

procedure TfrmAuxiliar.SpeedButton1Click(Sender: TObject);

begin

  if application.messagebox('Incluir Bandeira?',

 'Bandeira',mb_yesno)=idyes then

  begin

  if (opdFoto.execute) then

 d.cds_Estado.Edit;

 dbiFoto.Picture.LoadFromFile(opdFoto.FileName);

 d.cds_Estado.Post;

 d.cds_Estado.ApplyUpdates(0)

  end;

end;

 

Aparentemente, parece que a imagem é gravada. Porém, quando mando mostrar os
dados no dbgrid com a função abaixo a imagem não aparece.

 

  Screen.Cursor:=crSqlWait;

  //Mostra Estado dbGrid

With d.cds_Estado do

Begin

  d.cds_Estado.Close;

  CommandText:='Select * from Aux_Estado order by Abreviacao';

  d.cds_Estado.Open;

  dbGrid3.SetFocus

end;

  Screen.Cursor:=crDefault;

 

Olhando no ibexpert, o campo parece estar preenchido mas na aplicação ele
não aparece.

 

O que poderia ser?

 

Grato

 

Ralp Alves

 



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

Re: [delphi-br] OOP - Quais as vantagens?

[Daniel Sobrinho Laporte]

Se você escreve o mesmo código duas vezes, já tem algo de errado. Se você
pensar em uma biblioteca de funções por exemplo. Este é o mesmo caso. Temos
uma coleção de métodos que possuem funcionalidades genéricas, quando você
altera alguma coisa dentro dos seus métodos, todos os códigos que fazem
referencia serão alterados. Do mesmo modo em que você criou um método
salva_banco procedural, nada impede que você o faça de forma orientada a
objeto. Passando o objeto e um uma Lista para atualização por exemplo, como
você mesmo citou. Muitos desenvolvedores as vezes aplicam recursos de
padõres de projeto, ou POO e não sabem que estão fazendo isso rs. Mas é
comum.

2009/5/21 Alexandre 

>
>
> Percebi também que em alguns exemplos de oop usa muito mais linhas do que
> procedural por exemplo:
>
> Pessoa.nome := 'Maria';
> Pessoa.endereco := 'RUA X';
> Pessoa.salvaregistro;
>
> em procedural ficaria:
>
> salva_banco('PESSOA',lista_de_campos);
>
> isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou
> contra, veja bem, só quero ter certeza que posso mudar meu sistema para oop
> de uma forma segura.
>
> Alex
>
>
> - Original Message -
> From: Alexandre
> To: delphi-br@yahoogrupos.com.br 
> Sent: Thursday, May 21, 2009 11:55 AM
> Subject: Re: [delphi-br] OOP - Quais as vantagens?
>
> Mas procedural eu também só mecheria dentro do procedimento e todos os
> formulários que usam aquele procedimento seriam alterados, entende a minha
> dúvida?procedural eu também mecho na função e altera para todo o sistema.
>
> Alex
>
> - Original Message -
> From: Daniel Sobrinho Laporte
> To: delphi-br@yahoogrupos.com.br 
> Sent: Thursday, May 21, 2009 11:48 AM
> Subject: Re: [delphi-br] OOP - Quais as vantagens?
>
> Vamos a um exemplo básico. Se você utiliza por exemplo um evento
> onKeyPress,
> onde ao ser pressionado o enter, o cursor será movido para o próximo campo
> e
> não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
> telas que queira fazer este recurso, terá que implementar nas 100, se
> utilizar um conceito de de POO como herança por exemplo, poderá fazer com
> que os demais formulários já herdem essa implementação por si só. Outra
> facilidade é a centralização dos códigos. Imagine você ao dar manutenção
> necessitar corrigir apenas um código e pronto, toda parte de código que faz
> uso daquela classe ou método alterado será corrigida. Boas práticas de
> programação devem sempre ser vistas como beneficio, e claramente
> proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
> exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
> muitos outros.
>
> 2009/5/21 Alexandre 
> 
> >
>
> >
> >
> > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
> > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
> > conseguindo entender os beneficios para o meu programa usar oop ao invés
> de
> > procedures.
> >
> > Alex
> >
> > __ Information from ESET NOD32 Antivirus, version of virus
> > signature database 4093 (20090521) __
> >
> > The message was checked by ESET NOD32 Antivirus.
> >
> > http://www.eset.com
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Daniel Sobrinho Laporte
> Analista de Sistemas e Desenvolvedor Delphi + Firebird.
> Colunista e Editor Técnico ClubeDelphi - DevMedia.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Daniel Sobrinho Laporte
Analista de Sistemas e Desenvolvedor Delphi + Firebird.
Colunista e Editor Técnico ClubeDelphi - DevMedia.


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

Re: [delphi-br] File not found: 'dsgnintf.dcu' - Delphi 7 (RESOLVIDO)

[nillgolv]

Conseguir resolver.

Em 15/05/2009 19:40, Paulo Coutinho < pa...@prsolucoes.com > escreveu:








Ja buscou assim?

http://www.google.com/search?ie=UTF-8&oe=UTF-8&sourceid=navclient&gfns=1&q=File+not+found%3A+dsgnintf.dcu

Vi várias pessoas postando esta duvida.

2009/5/16 nillgolv 

>
>
>
> Prezados, já procurei ajuda na internet mas não obtive algo que resolvesse
> tal erro.
>
> Tentei instalar o componente TVideo = class(TCustomControl) no delphi 7,
> mas ao clicar compilar apresenta o seguinte erro
>
> [Fatal Error] Video.pas(9): File not found: 'dsgnintf.dcu'
>
> Acredito que aqui alguém tem esta situação resolvida e que possa me ajudar
> a solucionar.
>
> Grato.
> Nilton
> 
>

-- 
Atenciosamente,
Paulo Coutinho.
Blog: www.prsolucoes.com/blog
Site: www.prsolucoes.com
Msn: pa...@prsolucoes.com

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

[delphi-br] TComponent Video - Resolução ?

[nillgolv]

Pessoal, instalei o TComponent Video, para capturar webcam, tudo ok.
Mas como preciso fazer com que abra a imagem em um tamanho de acordo com o meu 
projeto,
procurei o form onde configura a resolução, mas não acho nem no projeto fonte e
nem no fonte do componente. Na resolução tem a caixa de combo com os valores, 
pois gostaria
de colocar um valor específico para o meu projeto.

O formulário de configuração é assim:

Formato de video
===
Configurações de fluxo

Formato de imagem digital
Resolução
160 x 120
176 x 144
320 x 240
352 x 288
640 x 480

Intensidade (bits) e compactação de
YUY2
UYVY

Tamanho (bytes)
614400

.
Estranho que não consigo achar este
formulário. Somente em tempo de execução.
.

Agrdeço muito pela ajuda.

Nilton

Re: [delphi-br] OOP - Quais as vantagens?

[Alexandre]

Percebi também que em alguns exemplos de oop usa muito mais linhas do que 
procedural por exemplo:

Pessoa.nome := 'Maria';
Pessoa.endereco := 'RUA X';
Pessoa.salvaregistro;

em procedural ficaria:

salva_banco('PESSOA',lista_de_campos);

isso que quero entender, se é tão bom, porque usa muito mais linhas?não sou 
contra,  veja bem, só quero ter certeza que posso mudar meu sistema para oop de 
uma forma segura.

Alex


  - Original Message - 
  From: Alexandre 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:55 AM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?


  Mas procedural eu também só mecheria dentro do procedimento e todos os 
formulários que usam aquele procedimento seriam alterados, entende a minha 
dúvida?procedural eu também mecho na função e altera para todo o sistema.

  Alex

- Original Message - 
From: Daniel Sobrinho Laporte 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, May 21, 2009 11:48 AM
Subject: Re: [delphi-br] OOP - Quais as vantagens?





Vamos a um exemplo básico. Se você utiliza por exemplo um evento onKeyPress,
onde ao ser pressionado o enter, o cursor será movido para o próximo campo e
não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
telas que queira fazer este recurso, terá que implementar nas 100, se
utilizar um conceito de de POO como herança por exemplo, poderá fazer com
que os demais formulários já herdem essa implementação por si só. Outra
facilidade é a centralização dos códigos. Imagine você ao dar manutenção
necessitar corrigir apenas um código e pronto, toda parte de código que faz
uso daquela classe ou método alterado será corrigida. Boas práticas de
programação devem sempre ser vistas como beneficio, e claramente
proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
muitos outros.

2009/5/21 Alexandre 

>
>
> Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
> que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
> conseguindo entender os beneficios para o meu programa usar oop ao invés 
de
> procedures.
>
> Alex
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Daniel Sobrinho Laporte
Analista de Sistemas e Desenvolvedor Delphi + Firebird.
Colunista e Editor Técnico ClubeDelphi - DevMedia.

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






__ Information from ESET NOD32 Antivirus, version of virus 
signature database 4093 (20090521) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com



  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.com



__ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com



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

Re: [delphi-br] OOP - Quais as vantagens?

[Alexandre]

Mas procedural eu também só mecheria dentro do procedimento e todos os 
formulários que usam aquele procedimento seriam alterados, entende a minha 
dúvida?procedural eu também mecho na função e altera para todo o sistema.

Alex

  - Original Message - 
  From: Daniel Sobrinho Laporte 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:48 AM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?





  Vamos a um exemplo básico. Se você utiliza por exemplo um evento onKeyPress,
  onde ao ser pressionado o enter, o cursor será movido para o próximo campo e
  não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  telas que queira fazer este recurso, terá que implementar nas 100, se
  utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  que os demais formulários já herdem essa implementação por si só. Outra
  facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  necessitar corrigir apenas um código e pronto, toda parte de código que faz
  uso daquela classe ou método alterado será corrigida. Boas práticas de
  programação devem sempre ser vistas como beneficio, e claramente
  proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  muitos outros.

  2009/5/21 Alexandre 

  >
  >
  > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > conseguindo entender os beneficios para o meu programa usar oop ao invés de
  > procedures.
  >
  > Alex
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checked by ESET NOD32 Antivirus.
  >
  > http://www.eset.com
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  > 
  >

  -- 
  Daniel Sobrinho Laporte
  Analista de Sistemas e Desenvolvedor Delphi + Firebird.
  Colunista e Editor Técnico ClubeDelphi - DevMedia.

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



  


  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.com



__ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com



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

Re: [delphi-br] OOP - Quais as vantagens?

[Alexandre]

hmmm, não que eu seja contra, é que sinceramente ainda não encaixou 
na minha mente o beneficio assim, tipo, hoje vou trocar mecher no meu sistema 
para oop, entende?Mas se dizem que é melhor, então creio que começarei a ir 
atrás e aprender esse recurso.

Alex

  - Original Message - 
  From: Daniel Sobrinho Laporte 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 21, 2009 11:48 AM
  Subject: Re: [delphi-br] OOP - Quais as vantagens?





  Vamos a um exemplo básico. Se você utiliza por exemplo um evento onKeyPress,
  onde ao ser pressionado o enter, o cursor será movido para o próximo campo e
  não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
  telas que queira fazer este recurso, terá que implementar nas 100, se
  utilizar um conceito de de POO como herança por exemplo, poderá fazer com
  que os demais formulários já herdem essa implementação por si só. Outra
  facilidade é a centralização dos códigos. Imagine você ao dar manutenção
  necessitar corrigir apenas um código e pronto, toda parte de código que faz
  uso daquela classe ou método alterado será corrigida. Boas práticas de
  programação devem sempre ser vistas como beneficio, e claramente
  proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
  exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
  muitos outros.

  2009/5/21 Alexandre 

  >
  >
  > Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
  > que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
  > conseguindo entender os beneficios para o meu programa usar oop ao invés de
  > procedures.
  >
  > Alex
  >
  > __ Information from ESET NOD32 Antivirus, version of virus
  > signature database 4093 (20090521) __
  >
  > The message was checked by ESET NOD32 Antivirus.
  >
  > http://www.eset.com
  >
  > [As partes desta mensagem que não continham texto foram removidas]
  >
  > 
  >

  -- 
  Daniel Sobrinho Laporte
  Analista de Sistemas e Desenvolvedor Delphi + Firebird.
  Colunista e Editor Técnico ClubeDelphi - DevMedia.

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



  


  __ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

  The message was checked by ESET NOD32 Antivirus.

  http://www.eset.com



__ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com



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

Re: [delphi-br] OOP - Quais as vantagens?

[Daniel Sobrinho Laporte]

Vamos a um exemplo básico. Se você utiliza por exemplo um evento onKeyPress,
onde ao ser pressionado o enter, o cursor será movido para o próximo campo e
não utiliza nenhum tipo de OO para implementar isso. Caso você tenha 100
telas que queira fazer este recurso, terá que implementar nas 100, se
utilizar um conceito de de POO como herança por exemplo, poderá fazer com
que os demais formulários já herdem essa implementação por si só. Outra
facilidade é a centralização dos códigos. Imagine você ao dar manutenção
necessitar corrigir apenas um código e pronto, toda parte de código que faz
uso daquela classe ou método alterado será corrigida. Boas práticas de
programação devem sempre ser vistas como beneficio, e claramente
proporcionam inúmeras vantagens em relação aos métodos "procedurais" por
exemplo. Estes são apenas alguns exemplos básicos, no entanto, existem
muitos outros.



2009/5/21 Alexandre 

>
>
> Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria
> que porfavor me explicassem qual a vantagem de ser usar OOP, não estou
> conseguindo entender os beneficios para o meu programa usar oop ao invés de
> procedures.
>
> Alex
>
> __ Information from ESET NOD32 Antivirus, version of virus
> signature database 4093 (20090521) __
>
> The message was checked by ESET NOD32 Antivirus.
>
> http://www.eset.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Daniel Sobrinho Laporte
Analista de Sistemas e Desenvolvedor Delphi + Firebird.
Colunista e Editor Técnico ClubeDelphi - DevMedia.


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

[delphi-br] OOP - Quais as vantagens?

[Alexandre]

Pessoal estou cansado de ouvir que oop é melhor que procedural, gostaria que 
porfavor me explicassem qual a vantagem de ser usar OOP, não estou conseguindo 
entender os beneficios para o meu programa usar oop ao invés de procedures.

Alex


__ Information from ESET NOD32 Antivirus, version of virus signature 
database 4093 (20090521) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com



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

[delphi-br] Re: Formas de se fazer com que um computador desligue

[Carlos Negrão]

 É o que eu estava imaginando também, já que tudo que eu encontro indica ser 
problema de hardware, e eu sei que o código para desligar a máquina é 
específico e teria de ser colocado de propósito, coisa que não fiz em parte 
alguma deste ou de qualquer outro programa até hoje.
 De qualquer forma, achei melhor confirmar.

--- Em delphi-br@yahoogrupos.com.br, Luciano Angelini  
escreveu
>
> Caro Carlos ...
> 
> Uma pequena parte dos metidos a 'Técnico em Informatica' , quando 
> não acham uma solução para o clientes, colocam
> culpa em alguma coisa, talvez viu alguma coisa diferente no computador, 
> ""Seu Sistema"" ... e falou que é isso !
> Desistale seu Programa/Sistema e veja o que acontece, tenho certeza que 
> o computador ira desligar ! Pois isso é falha de hardware e não de 
> Software.
> 
> 
> Luciano Angelini
> Prefeitura de Lupionópolis-Pr
> 
> 
> Carlos Negrão escreveu:
> >
> >
> > Estou com um problema aqui.
> > O computador que um cliente usa para rodar um programa que fiz anda 
> > desligando sozinho quando entra no programa. Eu sei que não coloquei 
> > nada no programa para desligar o computador, e não tenho a menor idéia 
> > de como poderia fazer isso acidentalmente, mas o técnico que olhou a 
> > máquina colocou a culpa no meu programa.
> >
> > Existe alguma coisa que eu possa ter feito para causar o problema por 
> > acidente, apesar de nunca acontecer em nenhum dos dois computadores 
> > que uso para programar e testar?
> > Ou será que o problema deles só pode mesmo ser hardware e o técnico 
> > simplesmente não soube diagnosticar?
> >
> >
>

Re: [delphi-br] Formas de se fazer com que um computador desligue

[Luciano Angelini]

Caro Carlos ...

Uma pequena parte dos metidos a 'Técnico em Informatica' , quando 
não acham uma solução para o clientes, colocam
culpa em alguma coisa, talvez viu alguma coisa diferente no computador, 
""Seu Sistema"" ... e falou que é isso !
Desistale seu Programa/Sistema e veja o que acontece, tenho certeza que 
o computador ira desligar ! Pois isso é falha de hardware e não de 
Software.


Luciano Angelini
Prefeitura de Lupionópolis-Pr


Carlos Negrão escreveu:
>
>
> Estou com um problema aqui.
> O computador que um cliente usa para rodar um programa que fiz anda 
> desligando sozinho quando entra no programa. Eu sei que não coloquei 
> nada no programa para desligar o computador, e não tenho a menor idéia 
> de como poderia fazer isso acidentalmente, mas o técnico que olhou a 
> máquina colocou a culpa no meu programa.
>
> Existe alguma coisa que eu possa ter feito para causar o problema por 
> acidente, apesar de nunca acontecer em nenhum dos dois computadores 
> que uso para programar e testar?
> Ou será que o problema deles só pode mesmo ser hardware e o técnico 
> simplesmente não soube diagnosticar?
>
> 

Res: [delphi-br] Formas de se fazer com que um computador desligue

[Rodrigo Bevilacqua Marcondes]

Tente rodar em outra maquina do cliente, se funcionar formata aquela maquina... 
se não funciona pode ser problema no programa.. 

 Rodrigo ®¿®





De: Carlos Negrão 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Maio de 2009 10:52:15
Assunto: [delphi-br] Formas de se fazer com que um computador desligue





Estou com um problema aqui.
O computador que um cliente usa para rodar um programa que fiz anda desligando 
sozinho quando entra no programa. Eu sei que não coloquei nada no programa para 
desligar o computador, e não tenho a menor idéia de como poderia fazer isso 
acidentalmente, mas o técnico que olhou a máquina colocou a culpa no meu 
programa. 

Existe alguma coisa que eu possa ter feito para causar o problema por acidente, 
apesar de nunca acontecer em nenhum dos dois computadores que uso para 
programar e testar?
Ou será que o problema deles só pode mesmo ser hardware e o técnico 
simplesmente não soube diagnosticar?


   


  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] Formas de se fazer com que um computador desligue

[Carlos Negrão]

 Estou com um problema aqui.
 O computador que um cliente usa para rodar um programa que fiz anda desligando 
sozinho quando entra no programa. Eu sei que não coloquei nada no programa para 
desligar o computador, e não tenho a menor idéia de como poderia fazer isso 
acidentalmente, mas o técnico que olhou a máquina colocou a culpa no meu 
programa. 

 Existe alguma coisa que eu possa ter feito para causar o problema por 
acidente, apesar de nunca acontecer em nenhum dos dois computadores que uso 
para programar e testar?
 Ou será que o problema deles só pode mesmo ser hardware e o técnico 
simplesmente não soube diagnosticar?

Res: [delphi-br] [off] site sobre nfe

[Rodrigo Bevilacqua Marcondes]

Vou contribuir também : 

Projeto PCN
http://code.google.com/p/projetocooperar/downloads/list

Portal Nacional da NFe
http://www.nfe.fazenda.gov.br/portal/

Portal do CTRC
http://www.cte.fazenda.gov.br/

Validador SEFAZ RS
http://www.sefaz.rs.gov.br/ASP/AAE_ROOT/NFE/SAT-WEB-NFE-VAL_1.asp

Consulta SEFA-PR
http://www.fazenda.pr.gov.br/modules/conteudo/conteudo.php?conteudo=300

Demo do ACBrNFeMonitor
http://djsystem.sytes.net/ccount/click.php?id=4
 
Comando do ACBrNFeMonitor ( Assina, Envia e DANFE ) 
http://acbr.sourceforge.net/drupal/?q=node/40

Space do ACBrNFe ( André ) 
http://www.devmedia.com.br/space.asp?id=177852

Blog do André Moraes
http://anfm.blogspot.com/

Blog do Roberto ( Informações Gerais e Dúvidas )
http://www.robertodiasduarte.com.br/?p=638

SPED 
http://www1.receita.fazenda.gov.br/

Unimake NFe ( Envio e DANFE ) 
http://www.unimake.com.br/uninfe/

 Rodrigo ®¿®





De: felipe govoni 
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 21 de Maio de 2009 10:04:46
Assunto: [delphi-br] [off] site sobre nfe





bom dia

nao lembro onde achei esse site (talvez tenha sido aq mesmo) mas achei ele
bem interessante
pra quem esta trabalhando com a nfe.

http://nf-eletronic a.com/blog/

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

[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] [off] site sobre nfe

[felipe govoni]

bom dia

nao lembro onde achei esse site (talvez tenha sido aq mesmo) mas achei ele
bem interessante
pra quem esta trabalhando com a nfe.


http://nf-eletronica.com/blog/



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


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

Re: [delphi-br] Sobre intraweb

> Alexandre, sobre o quintento, como você atualizou o IntraWeb ? , fui no site
> deles, mandei email , pedindo informacao, quero saber se em DELPHI 7  +
> IntraWeb ?XX?? (qual versao)  ? vou rodar isso legal, fiz alguns testes com
> o intraweb original que veio no delphi7, mas parece que precisava ainda de
> ajustes.

vc pode atualizar o IW que vem no D7. O site está offline nesse momento, mas vc 
pode me enviar um email que te informo qdo o site voltar no ar.

Vc recebeu resposta de alguém? Se não, me encaminhe o email 
(jacksongo...@atozed.com) que te respondo.

Se vc já tem o D2009, vale a pena atualizar o IW para a versão mais recente, 
principalmente por causa do AJAX (o IW do D7 não tem isso).

Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: jack...@toolsandcomps.com
Fone: 27 3389 1138 - 8811 0324

http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
devh...@devhost.com.br

Re: [delphi-br] Sobre intraweb

[Leonardo Quinino]

Alexandre, sobre o quintento, como você atualizou o IntraWeb ? , fui no site
deles, mandei email , pedindo informacao, quero saber se em DELPHI 7  +
IntraWeb ?XX?? (qual versao)  ? vou rodar isso legal, fiz alguns testes com
o intraweb original que veio no delphi7, mas parece que precisava ainda de
ajustes.

-- 
Leonardo Quinino


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

Re: [delphi-br] Executar Expressão (Fórmula) String

[Carlos Alexandre]

Obrigado.





From: Adriano Santos 
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, May 20, 2009 10:26:35 PM
Subject: Re: [delphi-br] Executar Expressão (Fórmula) String





Edição 104 da ClubeDelphi, Elvis Fusco o autor.

Adriano Santos
Editor Chefe da Revista ClubeDelphi

2009/5/19 Rubem Rocha 

>
>
> Meu caro, StrToFloat() converte strings de representações numéricas em
> (hexa)decimal para o número que representam. Usar StrToFloat() para
> interpretar uma expressão numérica/fórmula é um equívoco, pq StrToFloat()
> não tem inteligência para interpretar fórmulas/expressõ es numéricas.
>
> Para isso, vc precisará de uma função ou componente que interprete a
> fórmula, execute-a e devolva o resultado da mesma.
>
> Minha sugestão: http://www.swissdel phicenter. ch/en/showcode. php?id=470
>
> Estude a dica e adapte-a conforme as suas necessidades.
>
> Boa sorte.
>
> Sds.
>
> De: delphi...@yahoogrup os.com.br  [mailto:
> delphi...@yahoogrup os.com.br ] Em
> nome de Carlos Alexandre
> Enviada em: terça-feira, 19 de maio de 2009 13:10
> Para: delphi-br
> Assunto: [delphi-br] Executar Expressão (Fórmula) String
>
>
> Pessoal,
> estou com problema em executar uma fórmula.
> Essa fórmula (expressão) é montada pelo usuário e ao mostrar no relatório
> preciso mostrar o resultado da formula criada pelo usuário (String).
>
> ex: saldo := 1 + 2 * (3 - 4);
>
> Como faço para executar essa expressão no Delphi?
>
> ps. Já tentei passar como strToFloat, strToInt, mas não consigo executar
> por ser String...
>
> vlw
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Adriano Santos
Director X-35 Consulting and Development
IT Manager SoftPark
Chief Editor Magazines ClubeDelphi && WebMobile
www.delphitodelphi. blogspot. com
www.adrianosantos. pro.br
www.devmedia. com.br
www.dug-sp.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] Delphi Meeting 2009

[Andreano Lanusse]

Pessoal,

Estão todos convidados :) 
http://blogs.embarcadero.com/andreanolanusse/2009/05/20/delphi-meeting-2009-no-brasil/

[]'s

Andreano Lanusse
Product Line Manager and Technincal Lead Evangelist Latin America & Caribbean
Embarcadero Technologies, Inc. | 
www.embarcadero.com



CONFIDENTIALITY NOTICE: This email message is for the sole use of the intended 
recipient(s) and may contain confidential and privileged information. Any 
unauthorized review, use, disclosure or distribution is prohibited. If you are 
not the intended recipient, please contact the sender by reply email and 
destroy all copies of the original message.



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