Use the properties varianble for global access..

If you define a properties varible in .cl file - you can access them globally..

Any personal support reach me to my personal email id..

:idea: :idea: :idea: facts lastKnownYearInQuarters : unsigned := 2014. lastKnownQuarter : string := "Q2". predicates addTillLastQuater : (). clauses addTillLastQuater():- QuaterList = ["Q1", "Q2", "Q3", "Q4"], Year = varM_unsigned::new(2012), lastKnownQuarter := "Q2", ExistLoop = varM_Boolean::new(f...

This forum is for Visual Prolog support. But, the assignment you posted is SWI-Prolog..

Any personal support : reach me at : georgeananth.prolog@gmail.com - I'll support you for completing the task..

You may refer the following URL,

http://wiki.visual-prolog.com/index.php ... nding_to_C


http://wiki.visual-prolog.com/index.php ... ual_Prolog

http://wiki.visual-prolog.com/index.php ... rp_via_COM

Create a separate class file and put all of them in the ".cl" file..

and make use of it..

The following is the vpiOldDomains module - have all the domain in your project and use that ... /***************************************************************************** Copyright (c) Prolog Development Center A/S ******************************************************************************/ ...

Its working perfect to me..

Try to rebuildAll

If not working -
Give the following entry on the "PlayWindow.pack" and "TaskWindow.pack" file

#include @"pfc\vpi\vpiOldDomains\vpiOldDomains.ph"

Rebuild all

It upto your call, Depends upon the requirement, you can setup the constants value and build the new setup - The final setup will use only the last modified constant value - If you need to change the value, every time you have to do it manually which is really not good.. So, play with that depends u...

You are trying through conditional compilation #if contenu_visible = b_true #then clauses get_win() = getVpiWindow(). #else clauses get_win() = applicationWindow::get():getVpiWindow(). #endif constants % contenu_visible = b_true. contenu_visible = b_false. Since you have used conditional compilation...

constants % contenu_visible = b_true. contenu_visible = b_false. clauses start():- if contenu_visible = b_true then Win = getVpiWindow() % here is TaskWindow\frm1.pro(52,15) else Win = applicationWindow::get():getVpiWindow() end if, Container = activeXContainer::new(Win), First of all, You have use...

I think, you are trying to convert old version Prolog VIP 6.x to latest version 7.x .. I looked into your project - I got too many errors - I addressed most of the errors but, at the end I was not able to run your project - I'm not sure about my fix - I just tried to make the project to run.. Got in...

:roll: :roll: predicates writeCsv_table : (outputStream Out, string Seperator, Type** ColumnList). clauses writeCsv_table(Out, Sep, ColumnList1) :- if moreData(ColumnList1) then ColumnList2 = writeCsv_row(Out, Sep, ColumnList1), Out:write("\n"), writeCsv_table(Out, Sep, ColumnList2) end if. predicat...

using stream function to read term in a txt file all example in forum failed ,to read term in txt,why this powerful development tool can't do this easy work, I don't know what kind of problem are you experiencing. As of my experience Visual Prolog 7.4 is really awesome and simple compared to other ...

The following is the some possible way of doing this, I'd like to get some idea about Code efficiency Case 1: Recursive solution predicates copyTextStream : (inputStream In, outputStream Out). clauses copyTextStream(In, Out) :- if not(In:endOfStream()) then Out:write(In:readline(), "\n"), copyTextSt...