dialog style ws_pop and ximage

Post Reply
User avatar
Silvio.Falconi
Posts: 7187
Joined: Thu Oct 18, 2012 7:17 pm
Been thanked: 9 times

dialog style ws_pop and ximage

Post by Silvio.Falconi »

here not run this

Code: Select all | Expand

#include "FiveWin.ch"
#include "Constant.ch"
Function Test()
   local oDlg,oBrw,oFont,oBold,oFontBtn
   local nBottom   := 22
   local nRight    := 60
   local nWidth    := Max( nRight * DLG_CHARPIX_W, 180 )
   local nHeight   := nBottom * DLG_CHARPIX_H
   local oImageBig
   local cImage :="links.png"

 DEFINE DIALOG oDlg SIZE nWidth, nHeight PIXEL ;
   COLOR 0, CLR_WHITE ;
       STYLE WS_POPUP

    @ 0, 0 XIMAGE oImageBig ;
             FILENAME cImage ;
             OF oDlg ;
              SIZE 50,50 ;
             UPDATE NOBORDER

    oImageBig:bRClicked  := { || NIL }
    oImageBig:ltransparent:=.f.
    oImageBig:nUserControl :=0

ACTIVATE DIALOG oDlg  CENTERED
It's compiled but then not run on win 10
why ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
cnavarro
Posts: 6572
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Has thanked: 4 times
Been thanked: 6 times

Re: dialog style ws_pop and ximage

Post by cnavarro »

Please, create image at ON INIT clause dialog and try
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Post Reply