Ver Mensaje Individual
  #2  
Antiguo 20-11-2003
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
No sé a qué hilo te refieres pero para desplegar una ventana y colocarla en la posición deseada usas Left y Top. Sí ya sé que dices que no puedes usarlos aunque no sé por qué.

El único problema que alcanzo a ver es que las propiedades Left y Top del formulario deben darse con relación a la pantalla mientras que la posición del Edit estará dada en relación al formulario donde está. Pero para ello existe el método ClientToScreen que convierte coordenadas relativas al formulario en coordenadas relativas a la pantalla. Algo sí como

Código:
var
  Form: TForm2; // Formulario a mostrar
  Pt: TPoint;

begin
  Pt := Point(Edit.Left, Edit.Top);
  Pt := ClientToScreen(Pt);

  Form := TForm2.Create(Self);
  Form.Left := Pt.X;
  Form.Top := Pt.Y + Edit.Height;
  Form.Show;
end;
Esto colocará la ventana justo por debajo del Edit y alineado a su izquierda.

// Saludos
Responder Con Cita