Los sistemas Windows diálogos

Los sistemas Windows dialogos

Los sistemas Windows dialogos : Multi-millones de consejos para hacer su vida mas facil.

Los cuadros de dialogo de windows que microsoft se olvido de documento
la Mayoria de nosotros hemos visto estos cuadros de dialogo de windows y la mayoria de los ms programas aqui es una manera de ponerse en contacto con la mayoria de estos:
1) Salir de Dialogo de windows se presenta cuando usted vaya al menu inicio y seleccione apagar. el identificador de parametro no se utiliza en windows en windows 95 de obtener una WM_QUIT en el wndproc, sin embargo, si usted asignar un evento OnCloseQuery va a hacer.
& nbsp & nbsp procedimiento ExitWindowsDialog(Mango: THandle) stdcall externos ' shell32.dll el indice de los 60 //declaracion de API
Ejemplo de uso:
procedure TForm1.Button1Click(Sender: TObject)
begin
& nbsp & nbsp ExitWindowsDialog(Asa)
fin
2) Reinicio de dialogo de windows se presenta cuando un sistema de cambio de todo (sobre todo con los drivers), el parametro flags el identificador se utiliza para conocer el titular de la ventana de la razon es una cadena que se muestra en el cuadro de dialogo (sugerencia: utilice un retorno de carro para romper el texto en lineas) los indicadores corresponden a cualquier ExitWindowsEx o ExitWindows bandera (casi con EW_XXX o EWX_XXX)
& nbsp & nbsp funcion RestartWindowsDialog(Mango: THandle Razon: PChar Banderas: Integer): Integer stdcall externos ' shell32.dll indice 59
Ejemplo de uso:
procedure TForm1.Button2Click(Sender: TObject)
begin
& nbsp & nbsp RestartWindowsDialog(Mango, PCHAR('ME DIO LA GANA'), EW_RESTARTWINDOWS)
fin


3)seleccion de un icono de dialogo es la que se muestra cada vez que quieres u para seleccionar un icono en el entorno de windows, filename especifica el nombre del archivo de donde extraer los iconos, filenamesize es la longitud de la cadena (normalmente la Longitud de la(nombre de archivo) suponiendo Filename as string), IconIndex es una variable que recibe el iconindex seleccionado en el cuadro de dialogo. el valor de retorno de la funcion es true si el dialogo es el exito y el aceptar boton esta seleccionado, falso si el boton cancelar se pulsa
& nbsp & nbsp funcion PickIconDialog(Mango:THandle nombre de archivo:PChar FileNameSize:entero var IconIndex:integer):Boolean stdcall externos ' shell32.dll indice 62
Ejemplo de uso:
procedure TForm1.Button3Click(Sender: TObject)
var
& nbsp & nbsp IconIndex: Integer
begin
& nbsp & nbsp si PickIconDialog(Mango, PChar('shell32.dll'), Longitud('shell32.dll'), IconIndex), a continuacion,
& nbsp & nbsp & nbsp & nbsp ShowMessage('Selecciono' IntTOStr(IconIndex))
fin
4) Ejecutar cuadro de dialogo de archivo se ejecuta cada vez que se seleccione el menu inicio ejecutar, y tambien se ve en el reproductor de windows y de internet explorer. aqui es la api que va a hacer el truco
& nbsp & nbsp procedimiento RunDialog(Mango: THandle Icono: HIcon Directorio: PChar Titulo: PChar Descripcion: PChar Banderas: Integer) stdcall externos ' shell32.dll el indice de 61
Ejemplo de uso:
procedure TForm1.Button4Click(Sender: TObject)
begin
& nbsp & nbsp RunDialog(Mango, Icono.Manejar, PCHAR('C:'), PCHAR('SELECCIONE el MALDITO ARCHIVO'),
& nbsp & nbsp & nbsp & nbsp PCHAR('), REF_NOBROWSE o REF_NODEFAULT o REF_CALCDIRECTORY)
fin
este cuadro de dialogo se utiliza las siguientes constantes
const
& nbsp & nbsp REF_NOBROWSE = 1 //Desactivar el boton examinar
& nbsp & nbsp REF_NODEFAULT = 2
& nbsp & nbsp REF_CALCDIRECTORY = 4 //calcular el directorio basado en los propietarios de ruta
& nbsp & nbsp REF_NOLABEL = 8 //No descripcion de la etiqueta
& nbsp & nbsp REF_NOSEPARATEMEM = $20 //No sepated memoria casilla de verificacion (NT)

en el caso de utilizar NT reemplazar todos los pchar por PWChar
Este es por ahora en mi proximo articulo voy a crear el objeto contenedores para estas funciones, usted encontrara el contenedor para el cuadro de dialogo ejecutar muy util