PC Toledo

Ola,

Estou tentando aprender What32 mas, nao estou conseguindo compilar
o exemplo abaixo:

#Include "windows.ch"
#Include "wintypes.ch"
#Include "cstruct.ch"
#Include "winstruc.ch"

#include "commdlg.ch"

function main()
local aFileName
local cFileName
local cPath := curdrive()+":\"+curdir()
local aFilter := {{"Zip Files","*.zip"},{"Text Files","*.*"}}

setmode(50,80)

alert("Begin; OK to Continue")

// what32 part
aFileName := getopenfilename(;
getactivewindow(),; // hWnd:
cPath,; // cPath:
"Select Files to Parse",; // cTitle:
aFilter,; // aFilter:
OFN_ALLOWMULTISELECT+OFN_EXPLORER,;// nFlags:
cPath,; // cInitDir:
"zip",; // cDefExt:
1) // nIndex:

// show dialog results
if !empty(aFileName)
for each cFileName in aFileName
? "Selected-> "+cFileName
next
endif

alert("End; OK to Exit")

return(NIL)


Estes sao os erros na linkagem

Error: Unresolved external '_hb_gt_GetText' referenced from C:\XHARBOUR\LIB\RTL.
LIB|gtapi
Error: Unresolved external '_hb_gt_PutText' referenced from C:\XHARBOUR\LIB\RTL.
LIB|gtapi
Error: Unresolved external '_hb_gt_SetAttribute' referenced from C:\XHARBOUR\LIB
\RTL.LIB|gtapi
Error: Unresolved external '_hb_mouse_IsPresent' referenced from C:\XHARBOUR\LIB
\RTL.LIB|mouseapi
Error: Unresolved external '_hb_mouse_Show' referenced from C:\XHARBOUR\LIB\RTL.
LIB|mouseapi
Error: Unresolved external '_hb_mouse_Hide' referenced from C:\XHARBOUR\LIB\RTL.
LIB|mouseapi
Error: Unresolved external '_hb_mouse_Col' referenced from C:\XHARBOUR\LIB\RTL.L
IB|mouseapi

Os BATs sao os mesmos que uso para compilar outros sistema XHarbour+GTwvW sem problemas.

Sera que a LIB RTL esta incompleta??
Voce podem me dar uma luz do que acontecendo ?

Grato,
cez_a@ubbi.com.br

Cesar, faça um teste use o Hbmake e selecione a WHAT32.LIB

ola,

Com HbMake funciona!!

grato

qualquer coisa prende o grito !!!