Fórum Meu componente free: DBLabeledEdit #235196

31/05/2004

0

Delphi

Olá pessoal, ha muito tempo que utilizo no Delphi 6 o
LabeledEdit, devido a facilidade, pois evita de ter que ficar
inserindo os edits e seus respectivos labels.

Mas como nunca vi um para o DBEdit, resolvi criar um.

Chama-se DBLabeledEdit, herda a classe TDBEdit (vcl)
com algumas propriedades:

ColorFocus : Tcolor; indica a cor que o componente terá quando receber o foco BoldFocus : boolean; se true, negrita o texto do label quando receber o foco.


Fora isso, ele jah vem setado com as propriedades:
BevelInner := bvNone; BevelKind := bkFlat; BorderStyle := bsNone; Height := 19;


Para criar esse componente, eu apenas acrescentei
os códigos do TLabeledEdit, que faz aparecer e controlar
o label do respectivo edit, e inserí-los no meu componente.

ELE É FREE (claro!) mas ainda falta criar um icone, (.dcr)
pra ele, quem quiser ajudar...

[b:67b3b5d2de]Links[/b:67b3b5d2de]

DBLabeledEdit
[url]http://www28.brinkster.com/marconcini/delphi32/DBLabeledEdit.zip[/url]

Versão simples, não conecta ao DataSource (edit simples)
[url]http://www28.brinkster.com/marconcini/delphi32/TColorLabelEdit.zip[/url]


Eniorm

Eniorm

Responder

Posts

31/05/2004

Nerdex

Interessante... esta tua benfeitoria Enio... , sabendo-se que controles data aware sempre são bem vindos, importantes e sempre serão aceitos...
Tenho 4 controles deste padrão aqui comigo que são: DBMaskEdit, DBRadioButton, DBCheckBox e DBEditDateTime com calendário popup, e agora ... com mais o teu, fico realmente municiado até os dentes...

valew


Responder

Gostei + 0

02/06/2004

Eniorm

(...) Tenho 4 controles deste padrão aqui comigo que são: DBMaskEdit, DBRadioButton, DBCheckBox e DBEditDateTime com calendário popup(...)


Só falta agora vc colocar os links desses componentes
pra gente fazer o download tbm!
:D T+


Responder

Gostei + 0

02/06/2004

Nerdex

Sem problemas...

[size=14:0d5f99d5b3][color=blue:0d5f99d5b3]www.borland.com[/color:0d5f99d5b3] -> Developers ... no Code Central ... Componentes[/size:0d5f99d5b3]

[i:0d5f99d5b3]Lá vcs irão encontrar, e diga-se de passagem, transformar um componente em data aware ñ tem maiores mistérios...[/i:0d5f99d5b3]


Responder

Gostei + 0

05/06/2004

Logado

Qunado eu adiciono o componente dblabeledit a borda dele vem por padrão no estilo flat. Depois de alterar para o estilo 3D (padrao do delphi) e salvar o projeto reparei q depois q fechava o projeto e abria novamente, ele voltava pro estilo flat. Alguém já reparou isso?


Responder

Gostei + 0

05/06/2004

Eniorm

Qunado eu adiciono o componente dblabeledit a borda dele vem por padrão no estilo flat. Depois de alterar para o estilo 3D (padrao do delphi) e salvar o projeto reparei q depois q fechava o projeto e abria novamente, ele voltava pro estilo flat. Alguém já reparou isso?


Ae Logado, isso não eh um bug não, pois qdo eu criei o
componente DBLabeledEdit, on evento [b:c57ac3636b]Create[/b:c57ac3636b], fiz com
que ficasse dessa forma, que é da forma que eu uso:
constructor TDBLabeledEdit.Create(AOwner: TComponent);
begin
     inherited Create(AOwner);
     FLabelPosition := lpAbove;
     FLabelSpacing := 3;
     SetupInternalLabel;
     BorderStyle := bsNone;
     BevelInner := bvNone;
     BevelKind := bkFlat;
     ColorFocus := clCream;
end;


Pra mudar basta q vc mude o codigo acima para:
constructor TDBLabeledEdit.Create(AOwner: TComponent);
begin
     inherited Create(AOwner);
     FLabelPosition := lpAbove;
     FLabelSpacing := 3;
     SetupInternalLabel;
     ColorFocus := clCream;
end;


Será necessário recompilar a unit.

T+ :wink:


Responder

Gostei + 0

05/06/2004

Logado

Po blz mas as configurações feitas em cima do componente não eram pra ficar salvas depois de inserida no formulário como os outros? quando eu insiro no form blz fica flat, mas depois q eu troco e salvo o projeto, os componentes inseridos voltam a forma original depois de fechar e abrir novamente o projeto.

Po naum to criticando apenas observando e to usando eles direto taum me ajudando muito.
valeu


Responder

Gostei + 0

06/06/2004

Ponce :)

[b:7cc6fac38f]Caro Enio Marconcini, gostei muito do seu componente, irei com certeza usar em minhas aplicações, mas gostaria de saber se você também tem um para o ComboBox e o DBComboBox. E aí, você tem uma espécie de LabelComboBox e DBLabelComboBox com o ColorFocus, se tiver me avise e coloque o URL do arquivo, se não tiver tem como você criar um, pois tentei e não consegui ter exito.
Valew,


__________________________________
Em terra de programador, quem tem Delphi é rei.[/b:7cc6fac38f]


Responder

Gostei + 0

07/06/2004

Eniorm

[quote:35a87c922b=´Ponce :)´](...) se você também tem um para o ComboBox e o DBComboBox. E aí, você tem uma espécie de LabelComboBox e DBLabelComboBox com o ColorFocus, (...)[/quote:35a87c922b]

Ae não tenho não, mas vc deu uma ótima idéia :idea: !!!
Posso tentar... se der certo podes crer que ele estará
aqui pra download :wink:
T+


Responder

Gostei + 0

07/06/2004

Eniorm

Ae colegas, já montei um DBLookUpComboBox com label,
vai chamar DBLabeledLComboBox (nome grande einh)
e estou criando uns outros.
Ai vou criar um package com os componetes e
distribuir pra galera.... :wink:
T+


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar