Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #21  
Antiguo 28-10-2017
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 23
maeyanes Va por buen camino
Hola...

La forma correcta sería:

Código:
procedure TfPrincipal.BvnuevaClick(Sender: TObject);
begin
  fmodulo.tVenta.Active := true;
  fmodulo.tVenta.Insert;
  fmodulo.tVentadetalle.Active :=true;
  fventa :=tfVenta.Create(self);
  fventa.Parent := Dp1;
  fventa.Align := alClient; // Si no lo haz hecho...
  fVenta.ManualDock(dp1); // Si Dp1 es un TPanel, esto no es necesario...
  fventa.Show
end;
Saludos...
__________________
Lee la Guía de Estilo antes que cualquier cosa. - Twitter
Responder Con Cita
  #22  
Antiguo 29-10-2017
Avatar de The Cid James
The Cid James The Cid James is offline
Miembro
NULL
 
Registrado: jun 2013
Posts: 129
Poder: 11
The Cid James Va por buen camino
Cita:
Empezado por maeyanes Ver Mensaje
Hola...

La forma correcta sería:

Código:
procedure TfPrincipal.BvnuevaClick(Sender: TObject);
begin
  fmodulo.tVenta.Active := true;
  fmodulo.tVenta.Insert;
  fmodulo.tVentadetalle.Active :=true;
  fventa :=tfVenta.Create(self);
  fventa.Parent := Dp1;
  fventa.Align := alClient; // Si no lo haz hecho...
  fVenta.ManualDock(dp1); // Si Dp1 es un TPanel, esto no es necesario...
  fventa.Show
end;
Saludos...
De todas formas me queda alineado en arriba a la izquierda y no se acopla al tamaño de dp1 (si es el tpanel)
Responder Con Cita
  #23  
Antiguo 30-10-2017
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 23
maeyanes Va por buen camino
Hola...

Probando tu código original, veo que funciona bien, tal y como debería.

Código Delphi [-]
procedure TfPrincipal.BvnuevaClick(Sender: TObject);
begin
  fmodulo.tVenta.Active := true;
  fmodulo.tVenta.Insert;
  fmodulo.tVentadetalle.Active :=true;
  fventa := tfVenta.Create(self);
  fventa.Align := alClient; // Si asignaste esta propiedad en tiempo de diseño, esto no es necesario...
  fVenta.ManualDock(dp1);
  fventa.Show
end;

Por lo que el comportamiento que describes es raro... Verifica que en la propiedad Constrains del formulario fventa no tenga valores en MaxWidth o MaxHeight...


Saludos...
__________________
Lee la Guía de Estilo antes que cualquier cosa. - Twitter
Responder Con Cita
  #24  
Antiguo 31-10-2017
Avatar de The Cid James
The Cid James The Cid James is offline
Miembro
NULL
 
Registrado: jun 2013
Posts: 129
Poder: 11
The Cid James Va por buen camino
Cree dos form para probar y tenes razon funciona perfectamente, revise las propiedades de todo los dos form y no toque ningun item de medida aun porque primero quiero hacer que trabaje bien esto, despues pasare en limpio el codigo a ver que tengo mal con mas detalle.

Muchas gracias
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
DBChart interactivo LIGERO Varios 0 07-10-2011 20:56:50
Currículum interactivo Ñuño Martínez La Taberna 21 02-10-2007 14:55:59
Entorno 3D interactivo con Kylix???? mamsantos Lazarus, FreePascal, Kylix, etc. 3 20-04-2005 12:48:48
Mapa Interactivo de España Foetas Varios 5 08-09-2004 22:06:32


La franja horaria es GMT +2. Ahora son las 11:59:34.


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