Marcelo,
Interessante é mesmo, mas dá uns bugs feios de vez em quando viu. Nossa
aplicação é toda IW e confesso, só não troquei ainda porque estou
estabilizando o sistema para poder redesenhar tudo.
Bom, quanto ao questionamento do colega, eu vi aqui. Realmente, só mudando o
.DFM mesmo. Veja exemplo:
object IWTabControl1: TIWTabControl
Left = 48
Top = 120
Width = 401
Height = 137
Cursor = crAuto
ActiveTabFont.Color = clWebWHITE
ActiveTabFont.FontFamily = 'sans-serif'
ActiveTabFont.Size = 10
ActiveTabFont.Style = [fsBold]
InactiveTabFont.Color = clWebBLACK
InactiveTabFont.FontFamily = 'sans-serif'
InactiveTabFont.Size = 10
InactiveTabFont.Style = []
ActiveTabColor = clWebDARKGRAY
InactiveTabColor = clWebLIGHTGRAY
ActivePage = 0
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsNone
BorderOptions.Color = clNone
Color = clWebSILVER
ParentShowHint = False
ShowHint = True
ClipRegion = False
LayoutMgr = TemplateProcessorHTML
ZIndex = 1000
DesignSize = (
401
137)
object IWTabControl1Page1: TIWTabPage
Left = 0
Top = 20
Width = 401
Height = 117
TabOrder = 1
Title = 'Pagina 0'
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsNone
BorderOptions.Color = clNone
Color = clWebWHITE
end
object IWTabControl1Page0: TIWTabPage
Left = 0
Top = 20
Width = 401
Height = 117
TabOrder = 0
Title = 'Pagina 1'
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsNone
BorderOptions.Color = clNone
Color = clWebWHITE
end
object IWTabControl1Page2: TIWTabPage
Left = 0
Top = 20
Width = 401
Height = 117
TabOrder = 2
Title = 'Pagina 2'
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsNone
BorderOptions.Color = clNone
Color = clWebWHITE
end
end
Clique com o botão direito no FORM e selecione View as Text;
Localize a tag object SEU_IWCONTROL: TIWTabControl;
Dentro dessa tag vc vai encontrar uma série de Objects, um para cada Tab. Ai
é só trocar o trecho de código inteiro de lugar. Veja, nesse exemplo ai
tenho 3 tabs. Se quiser mudar a Página 2 de lugar vou recortar o código
inteiro dela e colcar onde eu quiser. O código dela é:
object IWTabControl1Page2: TIWTabPage
Left = 0
Top = 20
Width = 401
Height = 117
TabOrder = 2
Title = 'Pagina 2'
BorderOptions.NumericWidth = 0
BorderOptions.BorderWidth = cbwNumeric
BorderOptions.Style = cbsNone
BorderOptions.Color = clNone
Color = clWebWHITE
end
Ai é só colocar antes de algum outro Object.
Depois disso clique novamente com o direito e use View as Form.
Como o outro camarada disse, se tiver um editor de .DFM ou mesmo bloco de
notas, funciona.
Abs
--
Adriano Santos
http://twitter.com/asrsantos
www.delphitodelphi.blogspot.com
2010/6/21 Marcelo Moacir Florindo <marceloflori...@gmail.com>
> Cara....
> O intraweb é muito interessante.....Estamos desenvolvendo um projeto grande
> com ele.
>
> Att,
>
> Marcelo
>
> Em 21 de junho de 2010 10:15, eric_developer
> <developer.syst...@yahoo.com>escreveu:
>
> >
> >
> > ah! tá, agora melhorou ;) você quer trocar a ordem dos TabPage no
> > TabControl em tempo de projeto.
> >
> > Sugiro alterar o arquivo .DFM correspondente com um editor, antes feche o
> > Delphi, acho mais fácil.
> > Iria sugerir também o Structure, mas não deu muito certo.
> >
> > Nunca usei componentes IW, é comum dar erros em tempo de projeto ou
> > bagunçar as posições ?
> >
> >
> > Eric Developer Systems
> > www.magaldi.eti.br
> >
> > --- Em delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>,
> > Marcelo Moacir Florindo <marceloflori...@...> escreveu
> > >
> > > Então Eric, conforme no email anterior.......:
> > >
> > > TENHO T1,T2 E T3
> > >
> > > QUERO PASSAR PARA T1,T3 E T2
> > >
> > > Quero fazer é alteração fisica da tab que estava no final e quero
> trazer
> > > para o meio.
> > >
> > > Att,
> > >
> > > Marcelo
> > >
> > > Em 21 de junho de 2010 09:37, eric_developer
> > > <developer.syst...@...>escreveu:
> >
> > >
> > > >
> > > >
> > > > eu cliquei na Guia em tempo de projeto e mudou normalmente, não sei
> > qual é
> > > > a dificuldade, usei o D2009.
> > > > A melhor coisa é ser mais específico ao inves de cada um precisar
> ficar
> > > > advinhando.
> > > >
> > > >
> > > > Eric Developer Systems
> > > > www.magaldi.eti.br
> > > >
> > > > --- Em delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br
> ><delphi-br%
> > 40yahoogrupos.com.br>,
> > > > Adriano Santos <asrsantos@> escreveu
> > > > >
> > > > > Eric,
> > > > >
> > > > > É que tem uns componentes no IW que não deixam mudar em tempo de
> > > > > projeto. O TreeView por exemplo só consigo mudar indo no DFM. não
> sei
> > > > > é o caso do TabControl, preciso olhar no Delphi pra ter certeza.
> > > > >
> > > > > Adriano Santos
> > > > > +55 (11)8219-5420
> > > > > http://twitter.com/asrsantos
> > > > > Enviado de meu iPhone
> > > > >
> > > > > Em 21/06/2010, às 01:10, "eric_developer"
> > > > > <developer.systems@> escreveu:
> > > >
> > > > >
> > > > > > ué, mas é só clicar na guia, seja em tempo de projeto ou execuçã
> > > > > > o.
> > > > > > expliquem melhor...
> > > > > >
> > > > > > Eric Developer Systems
> > > > > > www.magaldi.eti.br
> > > > > >
> > > > > > --- Em delphi-br@yahoogrupos.com.br<delphi-br%
> 40yahoogrupos.com.br><delphi-br%
> > 40yahoogrupos.com.br>,
> > > > Marcelo Moacir Florindo
> > > > > > <marceloflorindo@> escreveu
> > > > > > >
> > > > > > > Adriano é isto mesmo, quero mudar a posição do tab
> "fisicamente".
> > > > > > >
> > > > > > > Att,
> > > > > > >
> > > > > > > Marcelo
> > > > > > >
> > > > > > > Em 20 de junho de 2010 22:28, Adriano Santos <asrsantos@>
> > > > > > escreveu:
> > > > > > >
> > > > > > > > Eric,
> > > > > > > >
> > > > > > > > Acho que ele quer fazer isso via projeto. Não entendi direito
> o
> > > > > > que ele
> > > > > > > > quer. Tô sem Delphi nessa máquina, se for o mesmo problema do
> > Tr
> > > > > > eeView
> > > > > > > > imagino que só indo no DFM. Clica com o direito no Form e use
> > Vi
> > > > > > ew as Text.
> > > > > > > > Localiza o código da aba e muda o trecho de código para onde
> > des
> > > > > > eja. Depois
> > > > > > > > clica com o direito e View as Form. No IwTreeView só funciona
> > de
> > > > > > ssa forma
> > > > > > > > para mudar os itens em projeto.
> > > > > > > >
> > > > > > > > Amanhã no escritório dou uma olhada nisso direito. Se não for
> > > > > > isso a dica
> > > > > > > > do
> > > > > > > > Eric funciona.
> > > > > > > > --
> > > > > > > > Adriano Santos
> > > > > > > > http://twitter.com/asrsantos
> > > > > > > > www.delphitodelphi.blogspot.com
> > > > > > > >
> > > > > > > >
> > > > > > > > 2010/6/20 eric_developer <developer.systems@>
> > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > Olá,
> > > > > > > > >
> > > > > > > > > IWTabControl1.ActivePage:=0; // primeira guia
> > > > > > > > > IWTabControl1.ActivePage:=1; // segunda guia
> > > > > > > > > ...
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > Eric Developer Systems
> > > > > > > > > www.magaldi.eti.br
> > > > > > > > >
> > > > > > > > > --- Em delphi-br@yahoogrupos.com.br<delphi-br%
> 40yahoogrupos.com.br>
> > <delphi-br%40yahoogrupos.com.br><delphi-br
> >
> > > > > > %40yahoogrupos.com.br>,
> > > > > > > > > Marcelo Moacir Florindo <marceloflorindo@> escreveu
> > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > Colegas,
> > > > > > > > > >
> > > > > > > > > > Tenho 2 tabs quero alterar a posição delas,
> > > > > > > > > >
> > > > > > > > > > Qual seria o procedimento?
> > > > > > > > > >
> > > > > > > > > > Grato,
> > > > > > > > > >
> > > > > > > > > > --
> > > > > > > > > > Marcelo Moacir Florindo
> > > > > > > > > > Analista/Desenvolvedor
> > > > > > > > > > http://www.gestaotec.com.br
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > [As partes desta mensagem que não continham texto foram
> > remo
> > > > > > vidas]
> > > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > [As partes desta mensagem que não continham texto foram
> > removida
> > > > > > s]
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > ------------------------------------
> > > > > > > >
> > > > > > > > --
> > > > > > > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
> >>>>>
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > --
> > > > > > > Marcelo Moacir Florindo
> > > > > > > Analista/Desenvolvedor
> > > > > > > http://www.gestaotec.com.br
> > > > > > >
> > > > > > >
> > > > > > > [As partes desta mensagem que não continham texto foram
> > removidas]
> > > > > > >
> > > > > >
> > > > > >
> > > > >
> > > > >
> > > > > [As partes desta mensagem que não continham texto foram removidas]
> > > > >
> > > >
> > > >
> > > >
> > >
> > >
> > >
> > > --
> > > Marcelo Moacir Florindo
> > > Analista/Desenvolvedor
> > > http://www.gestaotec.com.br
> > >
> > >
> > > [As partes desta mensagem que não continham texto foram removidas]
> > >
> >
> >
> >
>
>
>
> --
> Marcelo Moacir Florindo
> Analista/Desenvolvedor
> http://www.gestaotec.com.br
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> ------------------------------------
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
--
Adriano Santos
http://twitter.com/asrsantos
www.delphitodelphi.blogspot.com
[As partes desta mensagem que não continham texto foram removidas]
