mensaje en pantalla

[CAR3S?]

bueno estoy haciendo un programa que hace aparecer un mensaje en pantalla (En un cuadrito blanco, pero no un msgbox).

osea, aparece una cajita de texto chiquita que dura como... 1/4 segundo.

podria hacer un form principal con un timer que cada 2 segundos ejecute un formulario sin bordes y con un label con el texto, que a la vez tenga otro time que en 1/4segundo cierre ese FormMensaje1

me explico? el problema ahora esta en que

cuando se abre el  formmensaje1 (Tiene que estar maximizado, osea, adelante de todo), se me 'sale' si estoy escribiendo... (Por ejemplo)

Osea estoy en el msn y se abre el FormMensaje1 y se me sale lo q estoy escribiendo. lo que necesito es q se maximize el FormMensaje1 pero que no me saque de lo que estoy escribiendo... :c

[raul338]

Busca sobre SetWindowPos con la constante SWP_NOACTIVATE y utilizalo en lugar del Form2.Show

[CAR3S?]

ok, gracis raul!

mañana cuand uelvo de la escuela omento como va la cosa :p


alu2!

n es que escribo mal, es que el programa no me deja escribir bie ajajajajaj

[79137913]

HOLA!!!

Lo que dice raul lo tengo en el proyecto del bloqueo de pantalla para el TOP-MOST:

Te dejo un link http://foro.elhacker.net/programacion_visual_basic/source_bloqueo_de_pantalla-t322438.0.html

GRACIAS POR LEER!!!

[CAR3S?]

7913 Me baje tu programa y... carajo no termine de leer y no sabia la password JAJAJAJAJAJAJAJA xd.

Sobre SWP_NOACTIVATE

encontre todo en ingles, tambien un codigo que hace lo que quiero.

modulo:

Código (vb) [Seleccionar] Expandir

Option Explicit
'Api
Public Declare Sub SetWindowPos _
Lib "user32" _
(ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, _
ByVal X As Long, _
ByVal Y As Long, _
ByVal cx As Long, _
ByVal cy As Long, _
ByVal wFlags As Long)

'constantes
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_SHOWWINDOW = &H40



Form_Load

Código (vb) [Seleccionar] Expandir


SetWindowPos Me.hwnd, _
HWND_TOPMOST, _
Me.Left / Screen.TwipsPerPixelX, _
Me.Top / Screen.TwipsPerPixelY, _
Me.Width / Screen.TwipsPerPixelX, _
Me.Height / Screen.TwipsPerPixelY, _
SWP_NOACTIVATE Or SWP_SHOWWINDOW

pero como abro el form2 sin que me joda mientras escribo? osea, el form 1 queda siempre abierto, cada tanto llama al 2, pero no quiero que me joda :c

SOLUCIONADO

como?

Un bucle entre el formmensaje visible false y true + traer al frente