Search found 386 matches

by ike
Feb 24, 2017 21:54
Forum: Projects
Topic: FBB - FreeBasic Bézier
Replies: 13
Views: 2145

Re: FBB - FreeBasic Bézier

by ike
Feb 24, 2017 20:44
Forum: Libraries
Topic: FLTK-C-1.3.3 for FreeBASIC
Replies: 393
Views: 87815

Re: FLTK C for FreeBASIC Jan 09, 2017

please note the return 1 vs return 0 in the HandleCB (it was missed in your short demo)
I know that - but I did this demo fast - so I did not have time to check

Thank you for telling me about scaling - I did not know those functions exist!!
by ike
Feb 24, 2017 16:16
Forum: Projects
Topic: FBB - FreeBasic Bézier
Replies: 13
Views: 2145

Re: FBB - FreeBasic Bézier

Zooming - try mousewheel #include once "fltk-c.bi" namespace MAIN dim as double x1, y1, w, h, xc, yc, xx1, yy1, xx2, yy2, left DIM AS Fl_Window PTR win DIM AS Fl_BoxEx PTR box DIM AS Fl_Button PTR btn1 end namespace SUB WH() MAIN.x1 = Fl_WidgetGetX(MAIN.box) MAIN.y1 = Fl_WidgetGetY(MAIN.bo...
by ike
Feb 23, 2017 22:38
Forum: Projects
Topic: FBB - FreeBasic Bézier
Replies: 13
Views: 2145

Re: FBB - FreeBasic Bézier

Nice work. But if you wish to continue work on this I recommend you to switch to FLTK lib (find it on this forum) It has good drawing routines and then you can have real windows program Look how easy is to draw and control events: #include once "fltk-c.bi" function DrawCB cdecl (byval self...
by ike
Feb 07, 2017 1:25
Forum: Libraries
Topic: FLTK-C-1.3.3 for FreeBASIC
Replies: 393
Views: 87815

Re: FLTK C for FreeBASIC Jan 09, 2017

I dont do 3d - just 2.5D Contours cutting - and now I am developing routines for pocket milling and V-bit carving like this http://www.scorchworks.com/Fengrave/v-carve.jpg I am missing routines to read TTF and place text on circle or bezier curve Right now i use Inkskape and Krita and then import SV...
by ike
Feb 06, 2017 20:11
Forum: Libraries
Topic: FLTK-C-1.3.3 for FreeBASIC
Replies: 393
Views: 87815

Re: FLTK C for FreeBASIC Jan 09, 2017

some screenshoots CAM software for 2.5 D (plasma, laser, waterjet, knife, oxy) https://postimg.org/image/6c6f8l2c9/ https://postimg.org/image/6q35hsgf5/ https://postimg.org/image/llpxinewt/ https://postimg.org/image/j6rix8mif/ https://postimg.org/image/t5ffed3nt/ Developed in FB+FLTK
by ike
Feb 06, 2017 19:46
Forum: Libraries
Topic: Tokamak-c (Windows/Linux 32/64-bit) Tue Oct 17
Replies: 14
Views: 2801

Re: Tokamak-c (Windows/Linux 32/64-bit) Jan 26, 2017

I'm sure nobody will learn or use it however I share all my work here since 2005 :-)


We use your work DJ! Let's say I use your FLTK lib on almost everyday base
But I have nothing to say or ask, I didnot find any bug or so ..
by ike
Feb 01, 2017 16:45
Forum: Community Discussion
Topic: Is this a bug in FB?
Replies: 3
Views: 716

Re: Is this a bug in FB?

It works in double (()) NAMESPACE ORDERPARTS DIM as String sORD1 DIM as String sORD2 end NAMESPACE ORDERPARTS.sORD1 = "abc" ORDERPARTS.sORD2 = "haha" 's1 = ORDERPARTS.sORD1 's2 = ORDERPARTS.sORD2 ? ORDERPARTS.sORD2 ? "LEN=", LEN((ORDERPARTS.sORD2))
by ike
Feb 01, 2017 15:49
Forum: Community Discussion
Topic: Is this a bug in FB?
Replies: 3
Views: 716

Is this a bug in FB?

namespace ORDERPARTS DIM as String sORD1, sORD2 end namespace dim as string s1, s2 ORDERPARTS.sORD1 = "abc" ORDERPARTS.sORD2 = "haha" s1 = ORDERPARTS.sORD1 s2 = ORDERPARTS.sORD2 if len(s1) <> len(s2) then ' this works 'if len(s1) <> len(ORDERPARTS.sORD2) then ' this does not -> ...
by ike
Jan 23, 2017 0:49
Forum: General
Topic: I need someone to defeat my string splitting algo
Replies: 113
Views: 6566

Re: I need someone to defeat my string splitting algo

I use V1ctors split and it works for me well I tested yours on long string and it crashes dim as string txt dim as integer i open "data1.txt" for input as #1 line input #1, txt close #1 'test v1ctor 'split_v1ctor(txt, ":", a()) 'for i = 0 to ubound(a)-1 '? a (i) 'next i split(txt...
by ike
Jan 08, 2017 2:13
Forum: Libraries
Topic: FLTK-C-1.3.3 for FreeBASIC
Replies: 393
Views: 87815

Re: FLTK C for FreeBASIC.

This is very nice! You can rotate icons on buttons Look at your numeric keyboard for meanings like 8 mean UP 4 mean left MOVROT.btn1 = Fl_ButtonNew(50, 130, 40, 40, "@1>>") MOVROT.btn2 = Fl_ButtonNew(100, 130, 40, 40, "@2>>") MOVROT.btn3 = Fl_ButtonNew(150, 130, 40, 40, "@3>...
by ike
Dec 21, 2016 0:05
Forum: Beginners
Topic: TTF in vector format
Replies: 1
Views: 369

TTF in vector format

How I can read vector data from TTF here is idea what I need. Code is in VB6 BeginPath Picture1.hdc Picture1.CurrentX = 0 Picture1.CurrentY = 0 Picture1.ForeColor = vbRed Picture1.Print "FREEBASIC" EndPath Picture1.hdc Dim hm As Long Dim A(10000) As POINTAPI Dim b(10000) As Byte Dim x As L...
by ike
Oct 02, 2015 20:01
Forum: Community Discussion
Topic: [offtopic]Refugees here in germany
Replies: 9
Views: 1367

Re: [offtopic]Refugees here in germany

Refugees are not problem. INCOMPETENT EURO LEADERS - that is problem When Barack Obama started bombing Libya and arming Al-Qaeda backed, jihadists, Gaddafi said if I go down, Europe goes black. ”Now, without Gaddafi fighting to stop of the flow of illegals, the greatest tidal wave of illegal aliens ...
by ike
Jul 10, 2015 2:03
Forum: Community Discussion
Topic: Version 1.03.0
Replies: 39
Views: 5115

Re: Version 1.03.0

we've got several non-"official" versions flying around in the Libraries sub-forum) I learn IUP using Joshi's lib, then I have found some examples that works with AGS's lib, and some examples working with official version. Then I quit experimenting and switch to FLTK. I hope nobody is wor...
by ike
Jun 22, 2015 2:20
Forum: Libraries
Topic: FLTK 1.3.x C Wrapper (obsolete)
Replies: 753
Views: 98661

Re: FLTK 1.3.3 C Wrapper Windows/Linux 32/64-bit.

Code: Select all


sub heavyDataCruncher()
    for i as integer = 1 to 10
        sleep 500, 1
        logLine(str(i *10) + "%")
        print str(i *10) + "%"


       Fl_Flush


    next
end sub


Go to advanced search