Search found 715 matches

by grindstone
Jan 13, 2019 16:32
Forum: Libraries
Topic: No german umlauts with libcurl
Replies: 25
Views: 3301

No german umlauts with libcurl

libcurl in general works fine here, but if I call a URL containing german umlauts (eg. https://de.wikipedia.org/wiki/Spezial:Zuf%C3%A4llige_Seite ) the receive buffer remains empty (seems to be a general problem with UTF-8-coded URLs). Does anyone know how to get it working? Or maybe another librar...
by grindstone
Jan 13, 2019 15:01
Forum: Projects
Topic: fbNetwork - OOP networking
Replies: 3
Views: 838

Re: fbNetwork - OOP networking

Runtime error "Procedure entry point "inet_ntop" in "WS2_32.dll" wasn't found"

WinXP 32bit / FB 1.05 here.
by grindstone
Jan 13, 2019 14:09
Forum: General
Topic: Where to put keyboard code
Replies: 31
Views: 2249

Re: Where to put keyboard code

Gablea wrote:I could post the source code here if anyone could translate it to FB.
I volunteer.
by grindstone
Jan 08, 2019 10:12
Forum: Beginners
Topic: Array as overlay
Replies: 14
Views: 1004

Re: Array as overlay

@grindstone That code does not work on 64bit machines. If it works on 32bit, how do you get from a(x) back to a string? I can't help the 64bit issue due to lack of 64bit here. The pointer acrobatics for the reverse conversion is a little more tricky : 'string to array Dim As String g = "abcd&q...
by grindstone
Jan 08, 2019 0:43
Forum: Beginners
Topic: Array as overlay
Replies: 14
Views: 1004

Re: Array as overlay

You could abuse a ZString Ptr: Dim As String g = "abcd" + Chr(0,0,0,0) + "ijklmnop" Dim As ZString*20 h = "abcd" + Chr(0,0,0,0) + "ijklmnop" Dim As Integer a(1 To 4), b(1 To 4) For x As Integer = 1 To 4 Print a(x) Next Print *Cast(ZString Ptr, @a(1)) = g For x...
by grindstone
Jan 06, 2019 18:58
Forum: Tips and Tricks
Topic: CountInString()
Replies: 16
Views: 2171

Re: CountInString()

Looks quite complicated to me. ' count how often the string "search" is in string "source" Function CountInString OverLoad (ByRef source As String, _ ByRef search As String, _ ByVal case_sensitive As boolean=TRUE) As Integer Dim As Integer count, begin If Not case_sensitive Then ...
by grindstone
Jan 04, 2019 11:21
Forum: General
Topic: Select Case
Replies: 6
Views: 552

Re: Select Case

My QB 1.1 definitely does not work with comma separated SELECT CASE.
by grindstone
Jan 03, 2019 23:15
Forum: Windows
Topic: Play nostalgic C64 sounds v1 + v2
Replies: 4
Views: 935

Re: Play nostalgic C64 sounds v1

Working properly on WinXP.
by grindstone
Jan 01, 2019 21:38
Forum: Tips and Tricks
Topic: Fireworks v0.60 build 2020-07-13 beta
Replies: 14
Views: 1316

Re: Fireworks v0.5 build 2019-01-01 beta

That should have no effect, for the program sleeps at least ~15ms, independent from the value. Here a value of 25 works fine.
by grindstone
Jan 01, 2019 21:14
Forum: Tips and Tricks
Topic: Fireworks v0.60 build 2020-07-13 beta
Replies: 14
Views: 1316

Re: Fireworks v0.5 build 2019-01-01 beta

Great work, but moving a little bit too fast, IMO!
by grindstone
Jan 01, 2019 19:55
Forum: Community Discussion
Topic: out of the closet
Replies: 7
Views: 1016

Re: out of the closet

To recognize a delusion by yourself is really a great skill, for I know that for you such a delusion is as real as the "real" reality. I take my hat off to you, keep on struggling! And yes, for most people Schizophrenia is simply a "split personality". To say it with Jhonny Cash:...
by grindstone
Dec 30, 2018 9:50
Forum: Beginners
Topic: How to put screen to foreground
Replies: 5
Views: 557

Re: How to put screen to foreground

Which OS / IDE ?
by grindstone
Dec 30, 2018 9:42
Forum: General
Topic: Is there existing an inputroutine?
Replies: 46
Views: 2954

Re: Is there existing an inputroutine?

Now it's almost working. If you type a long string, then go to the beginning using arrow left, and then press repeatedly backspace, you will see unexpected behaviour. Yep, press 'a', 'left', 'backspace', 'right' for a funny character. And if I remove 'ScreenRes 640, 480, 32', the cursor keys don't ...
by grindstone
Dec 29, 2018 9:55
Forum: Tips and Tricks
Topic: Confederation snake
Replies: 3
Views: 746

Re: Confederation snake

Watching that snake is real relaxing. <smile>
by grindstone
Dec 29, 2018 9:16
Forum: General
Topic: Is there existing an inputroutine?
Replies: 46
Views: 2954

Re: Is there existing an inputroutine?

Just a little Christmas gift: Added a graphical cursor. Dim Shared nn As String Dim Shared pp As String Declare Sub xText(x As Integer, y As Integer, bb As String, s As Integer) Main: ScreenRes 640, 480, 32: Width 80, 30: Color 0, -1 Cls Locate 5, 6: Print "Name: "; xText(12, 5, nn, 0) Loc...

Go to advanced search