PDA

Ver la Versión Completa : Ventanas de Notificación (otra vez)


buitrago
19-11-2003, 23:43:50
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


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