https://youtu.be/S606ShCw06o
https://windevdesenvolvimento.blogspot.com/2019/01/dicas-1975-publica-windev-imagen-11.html
// BTN_PROCURA_IMAGEN // VAMOS PROCURAR UMA IMAGEN E COLOCAR NO EDT IMAGEN // WE WILL LOOK FOR AN IMAGE AND PLACE IN EDIT IMAGE // NOUS CHERCHERONS UNE IMAGE ET PLACERONS-NOUS ÉDITER UNE IMAGE sFile is string // Opens the image picker sFile = fImageSelect("", "", "Selecione Uma Imagen", "ima" + TAB + "*.jpg") EDT_IMAGEN=sFile // VAMOS ABRIR A IMAGEN DENTRO DO NOSSO EDITOR // LET'S OPEN THE IMAGE WITHIN OUR EDITOR // OUVRONS L'IMAGE DANS NOTRE ÉDITEUR
IF PicOpen(IE_NoName1,sFile)=False THEN Error(ErrorInfo()) END
|