Search found 57 matches

by danepa
12 Jan 2012 1:56
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Re:

How to read line in line 2 or line 3 without unknown data, just read the content of that line?
by danepa
2 Jan 2012 11:09
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Re:

Tonton Luc wrote:Hi,

One way :

Code: Select all

    foreach Cpt = std::fromTo(1,10) do         stdio::write(Cpt),stdio::nl     end foreach
what's the function? how to use it?
by danepa
1 Jan 2012 2:21
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Re:

Hi, 1) how to i get the 2nd line? (the content is variable, not constant -> can change) - Solution 1 : test():- data(E1,E2,"30",E3), stdio::write(E1,",",E2,",",E3),stdio::nl, !. test(). - Solution 2 : test():- data(E1,E2,E3,"29 - 12 - 2011"), stdio::write(E1,",",E2,",",E3),stdio::nl, !. test(). - S...
by danepa
31 Dec 2011 1:36
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Re:

How do you to know that this is the second line you need (from your database) ? Your goal is not clear for me. ex my database : clauses data("daniel",["Anda menderita penyakit Rinitis Alergi dengan kemungkinan"],"10","28 - 12 - 2011"). data("daniel",["Anda menderita penyakit Rinitis Alergi dengan k...
by danepa
30 Dec 2011 15:34
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

How to get the 2nd line from textfile

How to get the 2nd line from textfile? (ex : danepa.txt)
by danepa
30 Dec 2011 4:46
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Re:

How to create new line in the listbox?
by danepa
29 Dec 2011 14:57
Forum: Visual Prolog
Topic: Take the value of the listbox
Replies: 13
Views: 2909

Take the value of the listbox

if i have a database : penyakitDB.txt : clauses penyakit("Rinitis Alergi") penyakit("Rinitis Vasomotor") penyakit("Sinusitis Maksilaris Kronik") penyakit("Sinusitis Maksilaris Akut") penyakit("Influenza") penyakit("Polip Hidung") And i want take it into the listbox clauses new(Parent):- formWindow::...
by danepa
14 Dec 2011 16:36
Forum: Visual Prolog
Topic: How to load all data from textfile?
Replies: 2
Views: 1740

Re: My Dear Daniel , Please review attached project .

daniel.txt clauses data("daniel",["Anda menderita penyakit Sinusitis Maksilaris Kronik dengan kemungkinan"],"77.0833333333333","12 - 11 - 2011"). data("daniel",["Anda menderita penyakit Sinusitis Maksilaris Akut dengan kemungkinan"],"85","16 - 11 - 2011"). data("daniel",["Anda menderita penyakit Rin...
by danepa
13 Dec 2011 8:29
Forum: Visual Prolog
Topic: How to load all data from textfile?
Replies: 2
Views: 1740

How to load all data from textfile?

If i have a data text, like this : Daniel.txt clauses data("daniel",["Anda menderita penyakit Sinusitis Maksilaris Akut dengan kemungkinan"],"85","21 - 11 - 2011"). data("daniel",["Anda menderita penyakit Sinusitis Maksilaris Kronik dengan kemungkinan"],"60","24 - 11 - 2011"). data("daniel",["Anda m...
by danepa
22 Nov 2011 4:30
Forum: Visual Prolog
Topic: How to check a valid date?
Replies: 11
Views: 3343

How to check a valid date?

CreateID.pro predicates onPushButtonClick : button::clickResponder. clauses onPushButtonClick(_Source) = button::defaultAction :- Tgllahir = toTerm(tgllahir_ctl:gettext()), %date Blnlahir = toTerm(blnlahir_ctl:gettext()), %monthdate Thnlahir = toTerm(thnlahir_ctl:gettext()). %yeardate How can i chec...
by danepa
16 Nov 2011 7:05
Forum: Visual Prolog
Topic: How to user string::concat
Replies: 10
Views: 3546

Re:

facts - userOLDB useronline : (string). clauses new(Parent):- formWindow::new(Parent), generatedInitialize(), file::consult("useronline.txt", userOLDB), useronline(UserOL), predicates onSaveClick : button::clickResponder. clauses onSaveClick(_Source) = button::defaultAction :- useronline(UserOL), %...
by danepa
16 Nov 2011 3:42
Forum: Visual Prolog
Topic: How to user string::concat
Replies: 10
Views: 3546

Re:

How about this, George : facts - userOLDB useronline : (string). clauses new(Parent):- formWindow::new(Parent), generatedInitialize(), file::consult("useronline.txt", userOLDB), useronline(UserOL), predicates onSaveClick : button::clickResponder. clauses onSaveClick(_Source) = button::defaultAction ...
by danepa
15 Nov 2011 9:05
Forum: Visual Prolog
Topic: How to user string::concat
Replies: 10
Views: 3546

Re:

If your code really looks like the code you have written here then you shouldn't get that error. Are you sure the code is identical? class facts - dateDB date : (string Date). clauses new(Parent):- GmT = gmttime::new(), TF = timeFormatter::new(), Date = TF:format(GmT,"dd - MM - yyyy"), file::save(s...
by danepa
15 Nov 2011 6:30
Forum: Visual Prolog
Topic: How to insert into listbox from textfile
Replies: 1
Views: 1331

How to insert into listbox from textfile

If i have a database like : medicalhistory.txt clauses data("daniel",["Anda menderita penyakit Sinusitis Maksilaris Kronik dengan kemungkinan"],"77.0833333333333","12 - 11 - 2011"). data("joko",["Anda menderita penyakit Rinitis Vasomotor dengan kemungkinan"],"72.9166666666667","13 - 11 - 2011"). dat...
by danepa
15 Nov 2011 5:58
Forum: Visual Prolog
Topic: How to user string::concat
Replies: 10
Views: 3546

How to user string::concat

class facts - dateDB date : (string Date). clauses new(Parent):- GmT = gmttime::new(), TF = timeFormatter::new(), Date = TF:format(GmT,"dd - MM - yyyy"), file::save(string::concat(Date,".txt"),dateDB) c603: The flow pattern '(o,i)' does not exist for 'string::concat/2->' string.cl predicates concat...