Zenity and QB64

[George McGinn]

I'm not sure if this is me, QB64, Zenity, pipecom, or a mixture of all.

I took an example from the Zenity documentation, and it is presenting me with garbage. Here is the code from the documentation, my QB64 code, and a screen print of what I am getting.

I originally had all the parameters in, but I removed the "--title" and the ">> addr.csv" and reordered it the same way as the code given to me by Spriggs, with no changes in my results.

The commented out part works fine (It is Spriggs code that was provided).

From Zenity Documentation (just the portion of the BASH script that is the call to Zenity):

Code: [Select]

zenity --forms --title="Add Friend" \
--text="Enter information about your friend." \
--separator="," \
--add-entry="First Name" \
--add-entry="Family Name" \
--add-entry="Email" \
--add-calendar="Birthday" >> addr.csv
QB64:

Code: QB64: [Select]

1. OPTION _EXPLICIT
2. '$CONSOLE:ONLY
3. '_DEST _CONSOLE
4. DIM AS STRING email, dates, other, form, birthday, firstname, lastname
5.  
6. 'form = pipecom_lite("zenity --forms --add-entry=" + CHR$(34) + "Email" + CHR$(34) + _
7. '                    " --add-calendar=" + CHR$(34) + "Pick date" + CHR$(34) + _
8. '                    " --text=" + CHR$(34) + "This is a form made in zenity" + CHR$(34) + _
9. '                    " --add-entry=" + CHR$(34) + "Ultimate Haxxor" + CHR$(34) _
10. '                    )
11.  
12.  
13. form = pipecom_lite( _
14.                     "zenity --forms --add-entry=" + CHR$(34) + "First Name" + CHR$(34) + _
15.                     "--add-calendar=" + CHR$(34) + "Birthday" + CHR$(34) + _
16.                     "--text=" + CHR$(34) + "Enter information about your friend." + CHR$(34) + _
17.                     "--add-entry=" + CHR$(34) + "Last Name" + CHR$(34) + _
18.                     "--add-entry=" + CHR$(34) + "Email" + CHR$(34) _
19.                     )
20.  
21.  
22.  
23. 'email = MID$(form, 1, INSTR(form, "|") - 1)
24. 'PRINT email
25. 'form = MID$(form, INSTR(form, "|") + 1)
26. 'dates = MID$(form, 1, INSTR(form, "|") - 1)
27. 'PRINT dates
28. 'other = MID$(form, INSTR(form, "|") + 1)
29. 'PRINT other
30.  
31. '$INCLUDE:'pipecomqb64.bas'

Here is the run results:
  [ You are not allowed to view this attachment ]  

[SpriggsySpriggs]

@George McGinn Looks like you need a space before each of your arguments. In the commented code right above yours, there is a space just before each new argument. That would be my guess as to why it isn't working. It's not able to parse it without the spaces.

[George McGinn]

Thanks. That makes sense.

When I am done testing my iOS App, I will give that a try.

@George McGinn Looks like you need a space before each of your arguments. In the commented code right above yours, there is a space just before each new argument. That would be my guess as to why it isn't working. It's not able to parse it without the spaces.

[George McGinn]

@SpriggsySpriggs

It works. I like it. I have no idea why I didn't think about the spaces (probably because on the BASH script, it wasn't apparent).

While it is not InForm, and it is very simplistic, if you want something quick on Linux, this is a great tool to create basic GUI's.

When put everything back in from the BASH example, it works great. It even writes the results to a file with " >> addr.csv" tacked on to the end. (addr.csv can be any file name you chose).

When it writes to a file, you cannot print it to the terminal, and when you do multiple writes, it appends it to the end of existing data, if the file exists. (For those who want to know more about how it works)

George.

[johnno56]

"File pipecomqb64.bas not found..." after cutting and pasting into the IDE....

[George McGinn]

@johnno56 - You can find it at: https://www.qb64.org/forum/index.php?topic=3981.msg133226#msg133226

"File pipecomqb64.bas not found..." after cutting and pasting into the IDE....

[johnno56]

Thanks George.

J