Hola de nuevo:

Estoy haciendo pruebas con MFC C++ y funciona de maravilla, lo que no se cambiar el tamaño de la etiqueta cuando dice Abierto.

Puedo abrir y cerrar la bandeja con este código. Parece mentira con MFC me parezca más fácil que en modo consola, impresioante.

// MFC_ProbandoDlg.cpp: archivo de implementación
//
 
#include "stdafx.h"
#include "MFC_Probando.h"
#include "MFC_ProbandoDlg.h"
#include "afxdialogex.h"
#include "mmsystem.h" // No olvidar.
 
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
 
 
// Cuadro de diálogo de CMFCProbandoDlg
 
 
 
CMFCProbandoDlg::CMFCProbandoDlg(CWnd* pParent /*=NULL*/)
	: CDialog(IDD_MFC_PROBANDO_DIALOG, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}
 
void CMFCProbandoDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
}
 
BEGIN_MESSAGE_MAP(CMFCProbandoDlg, CDialog)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON_ABRIR, &CMFCProbandoDlg::OnBnClickedButtonAbrir)
	ON_BN_CLICKED(IDC_BUTTON_CERRAR, &CMFCProbandoDlg::OnBnClickedButtonCerrar)
END_MESSAGE_MAP()
 
 
// Controladores de mensajes de CMFCProbandoDlg
 
BOOL CMFCProbandoDlg::OnInitDialog()
{
	CDialog::OnInitDialog();
 
	// Establecer el icono para este cuadro de diálogo.  El marco de trabajo realiza esta operación
	//  automáticamente cuando la ventana principal de la aplicación no es un cuadro de diálogo
	SetIcon(m_hIcon, TRUE);			// Establecer icono grande
	SetIcon(m_hIcon, FALSE);		// Establecer icono pequeño
 
	// TODO: agregar aquí inicialización adicional
 
	return TRUE;  // Devuelve TRUE  a menos que establezca el foco en un control
}
 
// Si agrega un botón Minimizar al cuadro de diálogo, necesitará el siguiente código
//  para dibujar el icono.  Para aplicaciones MFC que utilicen el modelo de documentos y vistas,
//  esta operación la realiza automáticamente el marco de trabajo.
 
void CMFCProbandoDlg::OnPaint()
{
	if (IsIconic())
	{
		CPaintDC dc(this); // Contexto de dispositivo para dibujo
 
		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);
 
		// Centrar icono en el rectángulo de cliente
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;
 
		// Dibujar el icono
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}
 
// El sistema llama a esta función para obtener el cursor que se muestra mientras el usuario arrastra
//  la ventana minimizada.
HCURSOR CMFCProbandoDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}
 
 
 
void CMFCProbandoDlg::OnBnClickedButtonAbrir()
{
	// TODO: Agregue aquí su código de controlador de notificación de control.
	SetDlgItemText(IDC_STATIC_MENSAJE, L"Abriendo..."); // Mostrar texto.
	mciSendString(L"set cdaudio door open", nullptr, 0, nullptr); // Abrir bandeja.
	SetDlgItemText(IDC_STATIC_MENSAJE, L"Abierto."); // Mostrar texto.
}
 
 
void CMFCProbandoDlg::OnBnClickedButtonCerrar()
{
	// TODO: Agregue aquí su código de controlador de notificación de control.
	SetDlgItemText(IDC_STATIC_MENSAJE, L"Cerrando..."); // Mostrar texto.
	mciSendString(L"set cdaudio door closed", nullptr, 0, nullptr); // Cerrar bandeja.
	SetDlgItemText(IDC_STATIC_MENSAJE, L"Cerrado."); // Mostrar texto.
}

Siguiendo con el código de C++ en moco consola, he quitado el santo Switch y he usado el else if, ahora puedo abrir la bandeja, pero no puedo cerrarla.

#include "stdafx.h"
#include "stdio.h"
#include "Windows.h"
#include "iostream"
#include "string"
#include "conio.h"
#include "string"
 
using namespace std;
 
 
int main()
{
	// Título de la ventana.
	SetConsoleTitle(L"Abrir y cerrar bandeja del disco C++ Win32");
 
	// Variable
	char entrada[] = "\0"; // Guarda A, a, C, y c tipo string que introduces desde la consola.
 
	while (true)
	{
		cout << "Control bandeja del lector : \n\n" << endl; // Muestra en pantalla textos.
		cout << "A - Abrir bandeja. \n" << endl;
		cout << "C - Cerrar bandeja. \n" << endl;
		cout << "========================== \n\n" << endl;
 
		cin >> entrada; // Aquí introduces letras A, a, C, y c.
 
		int i = 0;
		char c;
 
		while (entrada[i])
		{
			c = entrada[i];
			putchar(tolower(c));
			i++;
		}
 
		string str(entrada);
 
		// Abrir bandeja.
		if (str == "a")
		{
			cout << "Abriendo..." << endl; // Muestra en pantalla textos.
										   //printf("Abriendo...");
										   // Aquí va un evento para que aparezca la palabra Abirendo... mientra se está abriendo el lector.
			mciSendString(L"set cdaudio door open", nullptr, 0, nullptr);
			cout << "Abierto." << endl; // Muestra en pantalla textos.
		}				// Cerrar bandeja.
		else if (str == "b")
		{
			cout << "Cerrando..." << endl; // Muestra en pantalla textos.
										   // Aquí va un evento.
			mciSendString(L"set cdaudio door closed", nullptr, 0, nullptr);
			cout << "Cerrado." << endl; // Muestra en pantalla textos.
		}
		else // Si haz pulsado otro caracter distinto de A, C, a, y c aparece
		{
			cout << "Solo pulsar A o C." << endl; // este mensaje.
 
		}
 
	}
	return EXIT_SUCCESS;
}

¿Alguna idea?

Saludos.

No se a que te refieres.
https://msdn.microsoft.com/es-es/library/k0t5wee3.aspx

Hola Señor.

¿Cómo estás?

Tenía que poner std, no str, me esquivoqué al escribir, en el cual también da errores.

Hice otro código pero sigue con errores.

#include "stdafx.h"
#include "stdio.h"
#include "Windows.h"
#include "iostream"
#include "string"
#include "conio.h"
#include "cctype"
 
using namespace std;
 
 
int main()
{
	// Título de la ventana.
	SetConsoleTitle(L"Abrir y cerrar bandeja del disco C++ Win32");
 
	// Variable
	char entrada[] = "\0"; // Guarda A, a, C, y c tipo string que introduces desde la consola.
 
	while (true)
	{
		cout << "Control bandeja del lector : \n\n" << endl; // Muestra en pantalla textos.
		cout << "A - Abrir bandeja. \n" << endl;
		cout << "C - Cerrar bandeja. \n" << endl;
		cout << "========================== \n\n" << endl;
 
		cin >> entrada; // Aquí introduces letras A, a, C, y c.
 
		switch (tolower(entrada)) // Espera recibir A, a, C, y c. Transforma en minúscula.
		{
			// Abrir bandeja.
		case 'a':
			cout << "Abriendo..." << endl; // Muestra en pantalla textos.
			//printf("Abriendo...");
			// Aquí va un evento para que aparezca la palabra Abirendo... mientra se está abriendo el lector.
			mciSendString(L"set cdaudio door open", nullptr, 0, nullptr);
			cout << "Abierto." << endl; // Muestra en pantalla textos.
			break;
 
			// Cerrar bandeja.
		case 'b':
			cout << "Cerrando..." << endl; // Muestra en pantalla textos.
			// Aquí va un evento.
			mciSendString(L"set cdaudio door closed", nullptr, 0, nullptr);
			cout << "Cerrado." << endl; // Muestra en pantalla textos.
			break;
 
		default: // Si haz pulsado otro caracter distinto de A, C, a, y c aparece
			cout << "Solo pulsar A o C." << endl; // este mensaje.
		}
	}
	return EXIT_SUCCESS;
}
 
 

Errores:


Si que me está dando guerra.

Saludos.

Buenas:

Veo que hay GUI para hacer la vida más fácil, no tiene todos los códigos pero funciona.
https://poshgui.com/#

Más GUI para elegir.
http://tianit.cloudapp.net/blog/index.php/2015/11/04/crear-formularios-con-powershell/

¿Por qué Microsoft no pone como novedad un editor GUI visual para F# y PowerShell?

No se porqué no lo hace si hay demanda, los que lo hacen son terceros y no están completos pero lo intentan y al menos existen para escapar.

Mi truco es, hacer el formulario al 100 % con Visual C# y adaptar los códigos a PowerShell con lo que quiere mucho tiempo.

Saludos.

Hola:

Antes pensaba que PowerShell solo era línea de comandos, el sustituto del CMD de Windows se puede decir. He descubierto hoy que se puede crear formulario tal como lo hace Windows Form de Visual C# o Visual Basic .net.

Aquí hay un editor de formularios para hacerlo más rápido por vía Web y te genera el código para probarlo en el Power Shell.
https://poshgui.com/#

Aquí encuentras más enalces.
# http://tianit.cloudapp.net/blog/index.php/2015/11/04/crear-formularios-con-powershell/

Por ejemplo, abajo un formalario creado en visual solo con códigos de PowerShell.


Mi pregunta es.

¿Se puede crear también formularios con el lenguaje Visual F#?

Por todas partes se llama Visual F#, pero solo he visto códigos en modo consola.

Saludos.

Hola:

Tengo esta ventana creada con PowerShell. Lo que no entiendo por mucho que observe el código, es que me aparezcan dos botones iguales en la parte de arriba.




Saludos.

Hola a todos y a todas:

Quiero hacer un menú sencillo que las funciones se hará después.

Por ahora he hecho esto de esta manera haciendo pruebas.


Como puedes ver, pulso el número 2), luego Enter para poder entrar en el menú. Mi idea es, desde que pulses la tecla número 2), entre directamente a la Segunda opción sin tener que pulsar Enter.



¿Cómo se hace lo que quiero?

Saludos.

Hola:

Una aclaración de lo que quiero hacer.

Puedo introducir estas letras, A, a, C y c. Si introduzco otra cosa, las ignora.

Si en el teclado pulso la letra A mayúscula, pues con el str.ToLower quería que cualquier letra que pulse mayúscula, lo convierta en minúscula.

He comprobado que tu código al final si funciona, si pongo el teclado en mayúscula activado. Solo falta la soltura de vovler a preguntar siempre las teclas en vez de cerrarse el programa.

Aún así, tu código, buen trabajo. Ya vamos paso a paso.

Saludos.

Hola:

Ya está está solucionado. Hay que leerse bien hasta las narices los tutos estos deF#.
https://msdn.microsoft.com/es-es/library/ee241126(v=vs.110).aspx
https://msdn.microsoft.com/es-es/library/dd233160(v=vs.120).aspx

Código F#:

// Más información acerca de F# en http://fsharp.org
 
open System
open System.Runtime.InteropServices
open System.Text;
 
// importar librería o dll externo.
[<DllImport("winmm.dll")>]
extern int mciSendString(string lpstrCommand, StringBuilder lpstrReturnString,
        int uReturnLength, IntPtr hwndCallback)
 
let rt = StringBuilder(127)
 
// Evento.
let DoEvents (transition:string) =
    Console.SetCursorPosition(0, 6)
    Console.Write transition
 
let action state transition (mensaje:string) = 
    Console.SetCursorPosition(0, 6);
    DoEvents transition;
    mciSendString(state, rt, 127, IntPtr.Zero) |> ignore
    Console.SetCursorPosition(0, 6)
    Console.Write("           ")
    Console.SetCursorPosition(0, 6)
    Console.Write(mensaje)
 
// Pulse letra A para abrir bandeja o C para cerrar bandeja.
let rec loop() =
    match Console.ReadKey(true).Key with
    | ConsoleKey.Escape -> ()
    | ConsoleKey.A -> action "set CDAudio door open" "Abriendo..." "Abierto."
                      loop()
    | ConsoleKey.C -> action "set CDAudio door closed" "Cerrando..." "Cerrado."
                      loop()
    | _ -> loop()
 
[<EntryPoint>]
let main argv = 
    // Título de la ventana.
    Console.Title <- "F#"
 
    // Tamaño ventana consola.
    Console.WindowWidth <- 29 // X. Ancho.
    Console.WindowHeight <- 8 // Y. Alto.
 
    // Cursor invisible.
    Console.CursorVisible <- false
 
    // Posición del mansaje en la ventana.
    Console.SetCursorPosition(0, 0)
    Console.Write(@"Control bandeja del lector:
 
A - Abrir bandeja.
C - Cerrar bandeja.
===========================")
    loop()
    0 // return an integer exit code

Por cierto. Los códigos GeSHI no inclute F# de este foro.

¿Se incluirán en el futuro y no se puede?

Saludos.

Buenas:

Tu programa ejecuta pero no pasa nada si pulso las teclas.

Intenté hacerlo como pude a mi manera pero no ejecuta.

#include "stdafx.h"
#include "stdio.h"
#include "Windows.h"
#include "iostream"
#include "string"
#include "conio.h"
 
using namespace std;
 
 
int main()
{
	// Título de la ventana.
	SetConsoleTitle(L"Abrir y cerrar bandeja del disco C++ Win32");
 
	// Variable
	char entrada[] = "\0"; // Guarda A, a, C, y c tipo string que introduces desde la consola.
 
	while (true)
	{
		printf("Control bandeja del lector : \n\n");
		printf("A - Abrir bandeja. \n");
		printf("C - Cerrar bandeja. \n");
		printf("========================== \n\n");
 
		cin >> entrada; // Aquí introduces letras A, a, C, y c.
 
		switch (srt.tolower(entrada)) // Espera recibir A, a, C, y c. Transforma en minúscula.
		{
			// Abrir bandeja.
		case 'a':
			cout << "Abriendo..." << endl; // Muestra en pantalla textos.
			//printf("Abriendo...");
			// Aquí va un evento para que aparezca la palabra Abirendo... mientra se está abriendo el lector.
			mciSendString(L"set cdaudio door open", nullptr, 0, nullptr);
			cout << "Abierto." << endl; // Muestra en pantalla textos.
			break;
 
			// Cerrar bandeja.
		case 'b':
			cout << "Cerrando..." << endl; // Muestra en pantalla textos.
			// Aquí va un evento.
			mciSendString(L"set cdaudio door closed", nullptr, 0, nullptr);
			cout << "Cerrado." << endl; // Muestra en pantalla textos.
			break;
 
		default: // Si haz pulsado otro caracter distinto de A, C, a, y c aparece
			cout << "Solo pulsar A o C." << endl; // este mensaje.
		}
	}
	return EXIT_SUCCESS;
}

Algo se nos escapa.

Saludos.