Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ventanas de Notificación (otra vez) (https://www.clubdelphi.com/foros/showthread.php?t=5386)

buitrago 19-11-2003 23:43:50

Ventanas de Notificación (otra vez)
 
Hace poco hubo un hilo con el mismo título, al que yo le agrego una pregunta al parecer trivial.

COmo saber en a posición en que he de ubicar la ventana de notificación?, no puedo usar el left ni los otros, me hace falta el valor absoluto donde yo quiero.

Me explico, yo la quiero para cuando esté el usuario mucho tiempo en un edit, ofrecer ayuda no solicitada, por lo que necesito que salga al lado de este objeto pero no encima de él, me hago entender?.

Un saludo

Fer

roman 20-11-2003 02:14:16

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


La franja horaria es GMT +2. Ahora son las 05:31:52.

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