Ricardo, Boa noite. Sim, mandei essa mensagem a alguns dias. Porém como tinha o mesmo título de outra mensagem, pensei que ninguém tivesse recebido.
A principio é sim montar um form padrão. A intenção de montar em um componente é questão de estudo mesmo. Gostaria de colocar no meu componente algumas opções alteradas. Por Exemplo a cor de fundo. E ao arrastar o componente para o meu Form esta propriedade seria alterada em tempo de execução. abraços! --- Em [email protected], Ricardo César Cardoso <ricardo_engs...@...> escreveu > > Acho que vc já mandou a mesma mensagem ontem, não foi? > > Até onde entendi, vc quer um formulário "padrão". Seria isso? Se for dá uma > olhada em herança visual. Nessa técnica, basicamente vc monta um form com as > dimensões e/ou layout desejado e ao precisar de um novo formulário, cria a > partir desse modelo. > > Todas as alterações feitas no modelo refletem nos forms herdados. > > Se não for, tente ser um pouco mais claro na sua mensagem. > > []'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 qua, 2/9/09, framosip <fra...@...> escreveu: > > De: framosip <fra...@...> > Assunto: [delphi-br] Componente - Formulário > Para: [email protected] > Data: Quarta-feira, 2 de Setembro de 2009, 14:05 > > > > > > > > > > > > > Amigos, > > Boa tarde. > > > > Estou tentando criar um componente que ao arrastá-lo para o Form, algumas > > propriedades do form se alterem em tempo de execução. > > > > Em pesquisa pela internet, vi muitas informações de criação de componentes > onde > > extendemos algumas opções de componentes já existentes como o TEdit. A > princípio > > não é o meu caso. > > > > Criei apenas o básico e gostaria da ajuda de vocês para tentar alterar algumas > > propriedades do Form. > > > > O que fiz foi: > > > > unit FormDefault; > > > > interface > > > > uses > > Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, > > Dialogs; > > > > type > > TFormDefault = class(TComponent) > > private > > { Private declarations } > > protected > > { Protected declarations } > > public > > { Public declarations } > > constructor Create(AOwner: TComponent); override; > > destructor Destroy; override; > > published > > { Published declarations } > > end; > > > > procedure Register; > > > > implementation > > > > { TFormDefault } > > > > procedure Register; > > begin > > RegisterComponents( 'Ramos', [TFormDefault] ); > > end; > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > ____________________________________________________________________________________ > Veja quais são os assuntos do momento no Yahoo! +Buscados > http://br.maisbuscados.yahoo.com > > [As partes desta mensagem que não continham texto foram removidas] >
