Power Builder - Ayuda con Api

 
Vista:

Ayuda con Api

Publicado por Manuel Ruiz (33 intervenciones) el 27/10/2002 15:44:33
Hola, necesito ayuda, miren en mi aplicación no quiero que salgan los comunes messagebox , quiero que aparezcan messagebox personalidos, de diferente color(no ese plomo clasico), he encontrado la api pero no se como usarla, acá se las paso para ver si me la pueden interpretar esta para Visual:

Const MB_DEFBUTTON1 = &H0&
Const MB_DEFBUTTON2 = &H100&
Const MB_DEFBUTTON3 = &H200&
Const MB_ICONASTERISK = &H40&
Const MB_ICONEXCLAMATION = &H30&
Const MB_ICONHAND = &H10&
Const MB_ICONINFORMATION = MB_ICONASTERISK
Const MB_ICONQUESTION = &H20&
Const MB_ICONSTOP = MB_ICONHAND
Const MB_OK = &H0&
Const MB_OKCANCEL = &H1&
Const MB_YESNO = &H4&
Const MB_YESNOCANCEL = &H3&
Const MB_ABORTRETRYIGNORE = &H2&
Const MB_RETRYCANCEL = &H5&
Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
Private Sub Form_Load()
'Show a messagebox
MessageBox Me.hwnd, "KPD-Team 1998", App.Title, MB_YESNOCANCEL
End
End Sub

Gracias


Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder