Outra possibilidade é criar funções e procedimentos genéricos, que recebam
como parâmetros, nomes dos controles de data dos formulários.
Mas em termos de produtividade, acho que o ideal mesmo é colocar os
componentes na tela (como já disseram) e criar as funções de acordo com a
telapai. Nos formulários herdados, é só fazer o select e adicionar os fields
conforme você desejar.
Aliás, o select poderia ser uma variável do formpai, por exemplo:
Digamos que você tenha o componente CDS no formpai e a variável Select
declarada.
No evento de sua escolha do form herdado, você preencheria a variável Select
e quando necessário, as funções e procedimentos do form pai utilizariam o
valor da variável Select para trabalhar.
Para melhorar mais ainda, a variável Select poderia ser uma propriedade do
formpai, assim você poderia controlar quando os valores são inseridos na
variável.
E para melhorar mais ainda (e para finalizar também) a variável Select
poderia estar inclusa em um record, assim você poderia criar mais variáveis,
por exemplo:
TCommandText = record
FSelect, FWhere, FEtc : String;
End;
Uma função fictícia que trabalharia com o CDS:
Procedure OpenIt;
Begin
If CDS.Active then
CDS.Close( );
CDS.CommandText := Select + Where;
Try
CDS.Open( )
Except
//Tratamento de Erros.
End;
End;
_____
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Jean Barreiros
Enviada em: quinta-feira, 1 de julho de 2010 16:27
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: Res: [delphi-br] Definindo Padrão - Herança de Formulários
POde continuar clicando duas vezes a arrastanto,
não há problema.
Jean Barreiros
Programador/Web-Designer
Delphi, C++, PHP, JavaScript
FireBird/InterBase, MySql, SQLServer, PostGree, Oracle
msn: delphij...@gmail.com <mailto:delphijean%40gmail.com>
e-mail: delphij...@yahoo.com.br <mailto:delphijean%40yahoo.com.br>
________________________________
De: Rodrigo Rossi <rdrg.ro...@gmail.com <mailto:rdrg.rossi%40gmail.com> >
Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
Enviadas: Quinta-feira, 1 de Julho de 2010 15:39:58
Assunto: Re: Res: [delphi-br] Definindo Padrão - Herança de Formulários
Kra... se de certo isso fecho...
Mas eu to com uma dúvida, eu aprendi adicionar meu Edits no form da
seguinte maneira: Clico duas vezes no meu dataSource que está na tela e
pego os fields e arrasto para o form, ou seja, TDBEdits.
Se eu colocar os DataWare no form modelo como vou fazer isso?
Att.
Rodrigo Rossi
rdrg_ro...@hotmail.com <mailto:rdrg_rossi%40hotmail.com>
(45) 9963-1897
Cascavel - PR
On 07/01/2010 02:55 PM, Jean Barreiros wrote:
>
> Sim claro que tem como você não ficar reescrevendo todo código,
> basta você colocar todos os componentes Dataware no form modelo
> e tratar todos os comandos de inserção edicao e etc...
> Na propriedade DataSet do dataSource por exemplo.
> e não nomear os seus componentes tipo: CDSCliente, CDSFornecedor
> deixe-os como nomes padrões tipo: Cds(ClientDataSet), Qry(SQLQuery),
> Provider(DataSetProvider) e Ds(DataSource).
>
> espero ter ajudado.
> Jean Barreiros
> Programador/Web-Designer
> Delphi, C++, PHP, JavaScript
> FireBird/InterBase, MySql, SQLServer, PostGree, Oracle
> msn: delphij...@gmail.com <mailto:delphijean%40gmail.com>
<mailto:delphijean%40gmail.com>
> e-mail: delphij...@yahoo.com.br <mailto:delphijean%40yahoo.com.br>
<mailto:delphijean%40yahoo.com.br>
>
> ________________________________
> De: Rodrigo Rossi <rdrg.ro...@gmail.com <mailto:rdrg.rossi%40gmail.com>
<mailto:rdrg.rossi%40gmail.com>>
> Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
<mailto:delphi-br%40yahoogrupos.com.br>
> Enviadas: Quinta-feira, 1 de Julho de 2010 14:32:58
> Assunto: [delphi-br] Definindo Padrão - Herança de Formulários
>
> Boa tarde.
>
> Estou desenvolvendo uma aplicação Win32 com Delphi 2010 e preciso de
> algumas orientações referente a "reaproveitamento" de código.
>
> Tenho um form modelo, onde lá tenho alguns métodos juntamente com a
> parte visual bem definida.
>
> Quando vou criar um outro form "Cadastro de Clientes" eu gero uma
> herança deste form modelo (inherited form) e neste form de cadastro de
> Clientes coloco meu componentes de banco de dados, SqlQuery,
> DataSetProvider, ClientDataSet, DataSource e implemento os métodos dos
> botões inserir, alterar, proximo, anterior etc....
>
> O problema é que quando faço outra tela "Cadastro de Fornecedores"
> herdando do form modelo (inherited form) tenho que adicionar os
> componentes do BD novamente e copiar e colar os métodos de todos os
> botões do cadastro de cliente para o cadastro de fornecedores pois vai
> ser a mesma coisa.
>
> Exeiste a possibilidade de nao ter que ficar copiando e colando o código
> e todos os forms? Não queria fazer desta mandeira pois se um dia eu
> quiser alterar o comportamento do método Incluir tenho que passar nos
> meu 999 forms para fazer isso? Não da neh....
>
> O que vocês indicariam de solução? Quero coisa simples, não tenho muito
> conhecimento em Delphi, o que quero é nao ter que ficar reescrevendo o
> código.
>
> --
> Att.
>
> Rodrigo Rossi
> rdrg_ro...@hotmail.com <mailto:rdrg_rossi%40hotmail.com>
<mailto:rdrg_rossi%40hotmail.com>
> (45) 9963-1897
> Cascavel - PR
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
