preciso de converter o seguinte código em C++ em função xHarbour.
Ele apenas cria uma janela Windows com ajuda das api´s.
Todavia, o compilador dá erro.
Alguém com conhecimento nessa linguagem poderia me ajudar?
Código: Selecionar todos
#pragma BEGINDUMP
# include <windows.h>
{
LRESULT CALLBACK JanelaProcess(HWND,UINT,WPARAM,LPARAM);
int WINAPI WinMain(HINSTANCE hInstance , HINSTANCE hPrevInstance ,
LPSTR lpCmdLine , int nCmdShow )
{
WNDCLASS JnlClass;
JnlClass.style = 0;
JnlClass.lpfnWndProc = JanelaProcess;
JnlClass.cbClsExtra = 0;
JnlClass.cbWndExtra = 0;
JnlClass.hInstance = hInstance;
JnlClass.hIcon = LoadIcon (NULL,IDI_APPLICATION);
JnlClass.hCursor = LoadCursor(NULL,IDC_ARROW);
JnlClass.hbrBackground = (HBRUSH) COLOR_WINDOW;
JnlClass.lpszMenuName = NULL;
JnlClass.lpszClassName = "class_janela";
RegisterClass(&JnlClass);
HWND hwnd;
hwnd = CreateWindow(
"class_janela",
"Primeira Janela no braço...",
WS_OVERLAPPEDWINDOW,
CW_USEDEFAULT,
CW_USEDEFAULT,
400,
300,
HWND_DESKTOP,
NULL,
hInstance,
NULL
);
if(hwnd == NULL)
{
MessageBox(NULL , "Erro ao Criar a Janela" , "Erro!!!" ,
MB_ICONEXCLAMATION | MB_OK );
return 0;
}
ShowWindow(hwnd,nCmdShow);
UpdateWindow(hwnd);
MSG Msg;
while(GetMessage(&Msg,NULL,0,0))
{
TranslateMessage(&Msg);
DispatchMessage (&Msg);
}
return Msg.wParam;
}
/* Esta função é chamada pela função da API DispatchMessage()*/
LRESULT CALLBACK JanelaProcess(HWND hwnd , UINT msg,WPARAM wParam , LPARAM lParam)
{
switch(msg)
{
case WM_CLOSE:
DestroyWindow (hwnd);
break;
case WM_DESTROY:
PostQuitMessage(0);
break;
default:
return DefWindowProc(hwnd,msg,wParam,lParam);
}
return 0;
}
}
#pragma ENDDUMP Obrigado.
MarceloG