Desabilitar tabSheet do pageControl mantendo alguns componentes ativos

Question

Ol� boa tarde, tenho uma tabsheet com v�rios componentes e gostaria que todos os componentes menos um ficassem inativos, eu poderia usar enabled false nos componentes que desejasse inativos mas ficam ...

Raimundo Pereira · Accepted Answer

Talvez Tpanel. Dentro de um Tpanel. Resolva...

Rafael Bosco · Answer

Ol� Francisco, h� v�rias maneiras de resolver isso, voc� pode colocar eles como:...

Francisco J�nior · Answer

O problema � que desta forma poderei entrar e sair nos outros componentes ativando eventos, se setar o enabled dos componentes false eles ficam cinzas e se setar o tabsheet false n�o fica cinza mas tamb�m deixo de ter acesso ao edit...

Francisco J�nior · Answer

Ol� amigo p2 tamb�m n�o resolveu, eu sei que isso pode ser feito pois j� vi em um programa o problema � como fazer......

Francisco J�nior · Answer

Depois de muito bater cabe�a resolvi assim se interessar a algu�m

//no evento onexit do edit2
//n�o sei porque o delphi n�o aceita o comando if not dm.IBFuncionario.State in [dsEdit,dsInsert] then ou if dm.IBFuncionario.State not in [dsEdit,dsInsert] then ent�o coloquei da //forma abaixo
if dm.IBFuncionario.State in [dsEdit,dsInsert] then
else
begin
if not ((ActiveControl.ClassName = 'TBitBtn') or (ActiveControl.ClassName = 'TTabSheet')) then
edit2.SetFocus;
end;

Raimundo Pereira · Answer

Veja se ajuda.C�digoprocedure TForm1.BlockClick(Sender: TObject);beginPanel2.Enabled:=FALSE;end;[img:descricao=Estrutura 1]https://uploaddeimagens.com.br/imagens/1-jpg--3761[/img][img:descricao=Resultado]https://uploaddeimagens.com.br/imagens/2-png--1875[/img]...