Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
Dirigirte a un tabsheet determinado

Hola al foro!

Eh revisado en internet y en distintos foros de aqui y no eh encontrado nada con respecto a lo que necesito..espero aqui puedan ayudarme..

Tengo un formulario con un pagecontrol de 3 solapas (tabsheet)...
Desde otro form yo al presionar un boton, necesito que me dirija a ese form pero a una solapa determinada...

Ejemplo:
Form1 tengo un PageControl --> Alta, modificacion, consulta
Form2 tengo 3 button -->> Agregar, Modificar, Consultar

Yo necesito que al presionar el boton Modificar (ej), este me dirija al pagecontrol en la solapa(tabsheet) Modificacion del Fomr1.. Se entiende??

Pueden ayudarme, por favor?? trabajo con delphi 7
Gracias, saludos.-
Responder Con Cita
  #2  
Antiguo 01-06-2011
Avatar de Spynosa
Spynosa Spynosa is offline
Miembro
 
Registrado: nov 2004
Ubicación: Ecija - Sevilla
Posts: 99
Poder: 20
Spynosa Va por buen camino
PageControl1.ActivePage := TabSheet2;
Responder Con Cita
  #3  
Antiguo 02-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
Hice lo que me has dicho, pero no funciona.. directamente no hace nada el boton.
No existe ninguna forma, como un show o un showmodal que se pueda aplicar a los tabsheet..?? muchas gracias por tu ayuda..

PD: El codigo que me has pasado yolo solia usar en el onshow del form, para q al abrir el form, se habra por defecto n tal solapa(tapsheet)
Responder Con Cita
  #4  
Antiguo 02-06-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Poder: 20
oscarac Va por buen camino
pues deberia funcionar..
yo llo he probado y funciona bien
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #5  
Antiguo 02-06-2011
Avatar de Chris
[Chris] Chris is offline
Miembro Premium
 
Registrado: abr 2007
Ubicación: Jinotepe, Nicaragua
Posts: 1.678
Poder: 19
Chris Va por buen camino
Hola!

Utiliza la propiedad ActivePageIndex. Un ejemplo:
Código Delphi [-]
PageControl1.ActivePageIndex := 1; // activa la segunda pestaña

Saludos,
Chris
__________________
Perfil Github - @chrramirez - Delphi Blog - Blog Web
Responder Con Cita
  #6  
Antiguo 02-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
No me funciona, primero pense q era porque por defecto yo tenia asignado en el onshow del formulario que se dirija al rimer tabsheet, pero no funciona igual..
esto es lo que hago

Código:
Agenda_de_turnos.ShowModal;
Agenda_de_turnos.PageControl1.ActivePage := Agenda_de_turnos.Modificacion;
Agenda_de_turnos -->> Nombre de form
Modificacion -->> nombre de tabsheet
Responder Con Cita
  #7  
Antiguo 02-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
Chris eso tambien lo probe, con el 0, el 1, el 2 pero no me funcina tampoco, no se que hago mal....
Yo hago el showModal primero, para q me dirija a tal form, sino no hace nada..
Responder Con Cita
  #8  
Antiguo 02-06-2011
Avatar de Chris
[Chris] Chris is offline
Miembro Premium
 
Registrado: abr 2007
Ubicación: Jinotepe, Nicaragua
Posts: 1.678
Poder: 19
Chris Va por buen camino
Vale08, lo que debe estar sucediendo es que estás utilizando el procedimiento ShowModal. Este procedimiento ocasiona que la segunda línea del código que has compartido no se ejecute hasta que el formulario Agenda_de_turnos se cierre. Para solucionar tu problema, utiliza simplemente Show en lugar ShowModal.

Saludos,
Chris
__________________
Perfil Github - @chrramirez - Delphi Blog - Blog Web
Responder Con Cita
  #9  
Antiguo 02-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
Solucionadoooo

Ayyyy si tenias razon, era ese mi inconveniente, ahora funciona de 10...

Muchas gracias Spynosa, oscarac y Chris.. me solucionaron un problema, encima me facilita todo, porque yo a esto lo utilizo en muchos lugares de mi proyecto y no sabia como hacerlo..

saludos.-
Responder Con Cita
  #10  
Antiguo 02-06-2011
Avatar de Spynosa
Spynosa Spynosa is offline
Miembro
 
Registrado: nov 2004
Ubicación: Ecija - Sevilla
Posts: 99
Poder: 20
Spynosa Va por buen camino
Me alegro que lo solucionaras, pero si quieres seguir usando ShowModal

esto te debe funcionar

Código Delphi [-]
Agenda_de_turnos.PageControl1.ActivePage := Agenda_de_turnos.Modificacion;
Agenda_de_turnos.ShowModal;

es decir ShowModal siempre debe ser lo último

un saludo
Responder Con Cita
  #11  
Antiguo 02-06-2011
Vales08 Vales08 is offline
Miembro
NULL
 
Registrado: feb 2011
Posts: 133
Poder: 14
Vales08 Va por buen camino
Ahh ok, perfecto, lo voy a probar asi entonces, porque me es mejor on el ShowModal...

Muchas gracias...
Saludos a todos.-
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
subir determinado archivo Migue Rguez HTML, Javascript y otros 4 13-05-2006 11:10:56
tabsheet chechu Varios 1 15-11-2005 16:48:33
Encontrar un registro determinado. alfredosg19 Conexión con bases de datos 3 20-06-2005 21:09:49
TabSheet REHome OOP 4 03-12-2004 05:33:23
TabSheet ramonibk Varios 3 23-09-2004 12:47:07


La franja horaria es GMT +2. Ahora son las 00:19:47.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi