Hi,
Yes, you're right. Right clicking shows a popup menu for forms+dialogs with "code expert" greyed out.

I'd not really noticed. I'd managed to work without it without problems.

cheers
s

Hi, You are almost there. If you have menu items "fred" and "joe" in the associated menu: predicates onMenuItem : window::menuItemListener. clauses onMenuItem(_Source, resourceIdentifiers::id_fred):-!,do_fred(). onMenuItem(_Source, resourceIdentifiers::id_joe):-!,do_joe(). onMenu...

Hi Paul,
Yes, I've tried that, and didn't get very far (after several hours). Hence the above idea,just to change the size.

Many thanks for the ideas. I'll continue to play and will post a solution if I am successful.

cheers
steve

Hi Paul, I haven't tried. I want to open a jpg and use vpi::picture (which only reads a bmp). The following works: predicates jpgToBmp :(string JpgFile). clauses jpgToBmp(JpgFile):- Image=image::createFromFile(JpgFile),%or bitmap:: gdiplus::imageCodecInfo(BMPId, _, _, _, _, _, _, _, _, _, _, _, _) =...

Hello again, Still fiddling around with this. The following code is supposed to convert a jpg to a bitmap. The reason I do it this way is that if I do it without any sizing, a 6Mb JPG converts to a 200Mb BMP. Unfortunately, the code below only produces a black bitmap. Any ideas? predicates jpgToBmp ...

Hi,
Many thanks for your thoughts.
Tonton, I assume you mean grab the picture from a window/form/screen....? It's an idea, but I think I (end-users) will lose resolution.

cheers
Steve

Hi Tonton,
Thanks, yes, I saw those, but they don't really help. I want to work with a vpi::picture, but load a jpg.

cheers
steve

Hi, Is there a better way of doing the following, eg using iStream_native, rather than working on disk? predicates jpeg_picture:(string JpegFile)->picture. clauses jpeg_picture(JPG)=Picture:- Workfile="C:\\a.bmp", Bitmap=bitmap::createFromFile(JPG), gdiplus::imageCodecInfo(JpegId, _, _, _,...

Hi, Here is an update - DLL version 1.0.0.6. I've added a bit of extra functionality. http://www.acsumama.com/vip/drawhtml/index.htm There is a movie (you may have to wait 20 seconds for it to load) so you immediately can see what it does: http://www.acsumama.com/vip/drawhtml/drawhtmlmovie.htm Steve

Maybe this is useful to someone. Jump to the bottom to see examples. class predicates mytokenise:(string)->string*. clauses mytokenise(STR)=L:- Rev=mytokprivate(STR,[""]), L=list::reverse(Rev). class facts zz_splitby_items:string*:=[]. zz_previous_char_was_a_split:boolean:=false. class pre...

clauses new(Parent):- formWindow::new(Parent), generatedInitialize(), addNativeMessageHandler(nativeMessageHandler). predicates nativeMessageHandler : window::nativeMessageHandler. clauses nativeMessageHandler(_Source, gui_native::wm_size, _WParam, 47908248)= defaultNativeHandling :-!, vpiCommonDia...

Hi, In your form: predicates onPaint : drawWindow::paintResponder. clauses onPaint(_Source, _Rectangle, GDI):- Pic=get_your_picture(), GDI:pictdraw(Pic,pnt(0,0),rop_SrcCopy), The onPaint is called when the form is invalidate() ed. The onPaint predicate "skeleton" is inserted by the IDE - h...

Hi,
http://wiki.visual-prolog.com/index.php?title=Main_Page

See Visual Prolog for Tyros, chapter 8

cheers
Steve

Hi,
use
GDI:pictdraw()
cheers
Steve

Hi,
Please see
http://wiki.visual-prolog.com/index.php ... :Main_Page

item EDB_Class_Builder

Steve