Exibição das abas do PageControl

[Aninh@ 1]

:) Oi Pessoal,Tô precisando da ajuda de vocês para resolver um probleminha...Gostaria de saber se no PageControl tem como eu mudar a ação das abas.Por exemplo, para que eu possa exibí-las de acordo com uma tecla de atalho e não com um clique do mouse.

[bdexterholland 0]

Bom, você pode brincar com panels ou usar o page control mesmopara ambos uma dica é:form1.keypreview:=true;form.onkeypress:if key=<tecla> then begin panel1.bringtofront //se for com panels pagecontrol.activepageindex:= //caso seja com pagecontrol lembrando que a primeira aba tem índice 0.... end;

[marcio.theis 3]

Outra coisa que se pode fazer é colocar o Caption das abas com o "&", podendo assim acessar elas pelo ALT + letra, exemplo:

 

Caption Aba1 -> "&Clientes" -> Clientes -> ALT + C

Caption Aba2 -> "&Fornecedores" -> Fornecedores -> ALT + F

[Aninh@ 1]

Não entendi essa parte do form. onkeypress...aonde coloco esse código verificando se a tecla foi pressionada???Legal Márcio, mas o problema é que o sistema terá que ser usado de forma rápida e ágil, então acho que se fosse apenas uma tecla facilitaria mais as coisas...Obrigada pela ajuda....

[marcio.theis 3]

Para fazer diretamente sobre o Form, precisa setar a propriedade KeyPreview como True, depois no evento OnKeyDown fazer algo do tipo:

 

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);begin//F1 ativa a primeira páginaif key = 112 then	PageControl1.ActivePageIndex:=0;//F2 ativa a segunda páginaif key = 113 then	PageControl1.ActivePageIndex:=1;//F3 ativa a terceira páginaif key = 114 then	PageControl1.ActivePageIndex:=2;end;

[Aninh@ 1]

Obrigada a você Márcio e ao bdexterhollandque me responderam e super rápido ....Valeu pela ajuda!!!!!!!!!!!

http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[marcio.theis 3]

beleza... Estamos ai para qualquer coisa... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[bdexterholland 0]

http://forum.imasters.com.br/public/style_emoticons/default/blush.gif

 

 

 

 

 

:P