It is currently Thu Jun 20, 2013 11:05 am

All times are UTC + 1 hour




Post new topic Reply to topic  [ 587 posts ]  Go to page Previous  1 ... 24, 25, 26, 27, 28, 29, 30 ... 40  Next
Author Message
 Post subject:
PostPosted: Wed Jun 21, 2006 12:14 pm 
Offline
PureBasic Expert
PureBasic Expert
User avatar

Joined: Sat Apr 26, 2003 8:27 am
Posts: 4231
Location: Strasbourg / France
I have a wish.
Could you add a /THRD flag to TailBite.exe, so we can compile our libs in threadsafe mode ?
I suggest :
TAILBITE.PB
Code:
...
; gnozal
Global UseThreadOption
;
...
ForEach Parameter()
  Select UCase(Left(Parameter(), 5))
    ; gnozal
    Case "/THRD"
      UseThreadOption = 1
    ;
    Case "/ASKD"
      AskDelete = 1
...

PBCOMPILE.PB
Code:
Procedure PBCompile(ThisFile$, ExeName$, Extra$, Icon, DelFolder$, fatal)
...
  If Icon
    CmdLine$+" /ICON "+q+GetPathPart(ThisFile$)+"Windows.ico"+q
  EndIf
 
  ; gnozal
  If UseThreadOption
    CmdLine$+" /THREAD"
  EndIf
  ;
...

So we can compile a standard and a threadsafe version of our libs and use them together via the subsystems. It seems to work well : http://www.purebasic.fr/english/viewtopic.php?t=22347

_________________
For free libraries and tools, visit my web site (also home of jaPBe V3 and PureFORM).


Top
 Profile  
 
 Post subject:
PostPosted: Sun Jun 25, 2006 6:36 pm 
Offline
User
User
User avatar

Joined: Sat Sep 25, 2004 2:02 pm
Posts: 53
Location: Netherlands (Nijmegen)
@El_Choni,

If there is anything this great PB community can help you with PLEASE let us know.
I'm sure that even on your great Tailbyte program some genious minds of this community can help you solve the problem you're facing right now.

You're so good sharing Tailbyte with us, let us share our mindpower with you to solve any problem...

Regards,
Rob.


Top
 Profile  
 
 Post subject:
PostPosted: Fri Jul 07, 2006 2:41 pm 
Offline
Addict
Addict
User avatar

Joined: Wed Apr 20, 2005 12:48 pm
Posts: 1074
@El Choni:
Version: 1.3 PR 1.8 Date: May 29th 2006 seems to be the latest public version, right? Is or will there be any new fixed version soon? Because i have a lot sources they may not tailibited :( Would be nice if you can tell the comunity about future plans/updates ^^

If you need, i can send you the "routines" that may not work with tailibite. have a nice day

_________________
va!n aka Thorsten

Intel i7-980X Extreme Edition, 12 GB DDR3, Radeon 5870 2GB, Windows7 x64,


Top
 Profile  
 
 Post subject:
PostPosted: Sun Jul 23, 2006 12:11 pm 
Offline
Enthusiast
Enthusiast

Joined: Tue Aug 05, 2003 11:30 pm
Posts: 407
@El Choni

If i use the functions TB_UsedWindow() or so from TailBite i have all times errors like this:
"POLINK: fatal errors: 3 unresolved external(s)"

Is it true taht you work on a update?

THX,
Nico

_________________
my live space


Top
 Profile  
 
 Post subject:
PostPosted: Sun Jul 23, 2006 1:48 pm 
Offline
Addict
Addict
User avatar

Joined: Thu Jun 24, 2004 2:44 pm
Posts: 4740
Location: Berlin - Germany
@nicolaus
nicolaus wrote:
If i use the functions TB_UsedWindow()

you can use this:
Code:
Procedure GetGadgetParent()
  !EXTRN _PB_Object_GetThreadMemory@4
  !EXTRN _PB_Gadget_Globals
  !MOV   Eax,[_PB_Gadget_Globals]
  !push  eax
  !call  _PB_Object_GetThreadMemory@4
  !MOV   Eax,[Eax]
  ProcedureReturn
EndProcedure

_________________
PureBasic 5.11 | Windows 7 SP1 (x64) | Linux Mint 15 (x64) | RealSource

The use of EnableExplicit is free of charge and avoids errors.


Top
 Profile  
 
 Post subject:
PostPosted: Sun Jul 23, 2006 1:59 pm 
Offline
Enthusiast
Enthusiast

Joined: Tue Aug 05, 2003 11:30 pm
Posts: 407
@ts-soft

Danke dir erstmal jedoch hat sich nix geändert.
Ich benutze aber noch mehr von den TB-Funktionen wie z.b. TB_SetGadget() oder die strukture TB_GadgetVT.

Wenn ich alle TB-Funktionen aus dem code nehme erstellt tailbit die lib jedoch gehts sie ja dann nit ;-(

_________________
my live space


Top
 Profile  
 
 Post subject:
PostPosted: Sun Jul 23, 2006 2:52 pm 
Offline
Addict
Addict
User avatar

Joined: Thu Jun 24, 2004 2:44 pm
Posts: 4740
Location: Berlin - Germany
You can use CreateGadget from PBOSL :wink:

_________________
PureBasic 5.11 | Windows 7 SP1 (x64) | Linux Mint 15 (x64) | RealSource

The use of EnableExplicit is free of charge and avoids errors.


Top
 Profile  
 
 Post subject:
PostPosted: Wed Jul 26, 2006 1:49 am 
Offline
Addict
Addict
User avatar

Joined: Tue Jul 22, 2003 5:02 pm
Posts: 1496
Location: Nantes, France
Don't if it was already reported but there's a bug here :

Code:
TB_DebugError(#LIB_MSG_NOT_INITIALIZED)


Compiler complains :
Quote:
Bad parameter type, number expected instead of string

_________________
No programming language is perfect. There is not even a single best language.
There are only languages well suited or perhaps poorly suited for particular purposes. Herbert Mayer


Top
 Profile  
 
 Post subject:
PostPosted: Thu Jul 27, 2006 8:23 pm 
Offline
Addict
Addict
User avatar

Joined: Thu Oct 30, 2003 11:19 pm
Posts: 1814
Location: Emerald Cove, Unformed
Any news on a working update?


Top
 Profile  
 
 Post subject: PB4 and return Strings?
PostPosted: Thu Aug 03, 2006 12:44 am 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Sat Oct 04, 2003 12:57 pm
Posts: 211
Location: Germany
Sorry, is it a Bug or a Future?

The following source shold be a lib. There are global variables in it:

Code:
; Globalisierungen
 Global MeinString.s
 Global MeinLong.l
 MeinString=Space(255)
ProcedureDLL.l Mul(a.l,b.l)
  Shared MeinString
  MeinLong=a*b
  If MeinLong <=0
    MeinString="Du solltest Werte größer als Null eingeben"
  Else
    MeinString="Du hast alles richtig gemacht"
  EndIf
  ProcedureReturn MeinLong
EndProcedure

ProcedureDLL.s RetErr()
 ProcedureReturn MeinString
EndProcedure


and this source i do testing this lib:

Code:
Debug   Mul(200,200)
Debug RetErr()
Debug"----------------------------------------"

Debug Mul(0,0)
Debug RetErr()


but the strings, returns following:

PB4-Debug wrote:
40000
???4??????????t
----------------------------------------
0
?????4????????????????5?????????????


Regards, Falko


Top
 Profile  
 
 Post subject:
PostPosted: Thu Aug 03, 2006 2:01 am 
Offline
Addict
Addict
User avatar

Joined: Thu Jun 24, 2004 2:44 pm
Posts: 4740
Location: Berlin - Germany
your code runs, but only in ascii - mode, tailbite doesn't support unicode in the moment!

This works:
Code:
; Globalisierungen
 Global MeinString.s
 Global MeinLong.l
ProcedureDLL.l Mul(a.l,b.l)
  Shared MeinString
  MeinLong=a*b
  If MeinLong <=0
    MeinString="Du solltest Werte größer als Null eingeben"
  Else
    MeinString="Du hast alles richtig gemacht"
  EndIf
  ProcedureReturn MeinLong
EndProcedure

ProcedureDLL.s RetErr()
 ProcedureReturn MeinString
EndProcedure

ProcedureDLL.s RetErr_UNICODE()
 Protected MeinString_ascii.s = Space(255)
 PokeS(@MeinString_ascii, MeinString, #PB_Any, #PB_Unicode)
 ProcedureReturn MeinString_ascii
EndProcedure

_________________
PureBasic 5.11 | Windows 7 SP1 (x64) | Linux Mint 15 (x64) | RealSource

The use of EnableExplicit is free of charge and avoids errors.


Top
 Profile  
 
 Post subject:
PostPosted: Thu Aug 03, 2006 11:12 am 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Sat Oct 04, 2003 12:57 pm
Posts: 211
Location: Germany
Wow, it was unicode marked in my compiler changes.
Thank's TS :)

Regards Falko


Top
 Profile  
 
 Post subject:
PostPosted: Mon Aug 14, 2006 8:13 am 
Offline
Addict
Addict
User avatar

Joined: Fri Feb 25, 2005 1:01 am
Posts: 805
Location: France > Normandy > Near Caen
Excuse me : I have a question...

How can i use a linked list (of string) by example in parameter... ?

Because if we use this code
Code:
;--- The userlib
ProcedureDLL MaFonction(truc.l, Param.s())
  Debug truc
  ForEach Param()
    MessageRequester("", Param())
  Next
EndProcedure

We compile thee userlib

Code:
;--- The code
NewList Linked.s()
For i=0 To 10
  AddElement(Linked())
  Linked()= "----"+Str(i)+"----"
Next
MaFonction(7,Linked())


That doesn't run...
The error : "Ligne 8 : Bad Parameter type, number expected instead of string"
In the status bar : "MaFonction(truc.l, Param.s()"


Last edited by Progi1984 on Mon Aug 14, 2006 2:41 pm, edited 1 time in total.

Top
 Profile  
 
 Post subject:
PostPosted: Mon Aug 14, 2006 2:27 pm 
Offline
Addict
Addict
User avatar

Joined: Thu Jun 24, 2004 2:44 pm
Posts: 4740
Location: Berlin - Germany
Progi1984 wrote:
Excuse me : I have a question...

How can i use a linked list (of string) by example in parameter... ?

Use
Quote:
"%FILE" "%TEMPFILE" /KEEPSRCFILES /WRITEBATCH

as parameter for TailBite.
Change the type from Long to LinkedList
ReCreate the lib.

_________________
PureBasic 5.11 | Windows 7 SP1 (x64) | Linux Mint 15 (x64) | RealSource

The use of EnableExplicit is free of charge and avoids errors.


Top
 Profile  
 
 Post subject:
PostPosted: Mon Aug 14, 2006 2:40 pm 
Offline
Addict
Addict
User avatar

Joined: Fri Feb 25, 2005 1:01 am
Posts: 805
Location: France > Normandy > Near Caen
That doesn't run....

And i want to use a linked list of string like in my example !


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 587 posts ]  Go to page Previous  1 ... 24, 25, 26, 27, 28, 29, 30 ... 40  Next

All times are UTC + 1 hour


Who is online

Users browsing this forum: No registered users and 0 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  

 


Powered by phpBB © 2008 phpBB Group
subSilver+ theme by Canver Software, sponsor Sanal Modifiye