Page 22 of 104
Posted: Mon May 08, 2006 10:36 am
by inc.
Ill give you a link of the Source code I modified by myself this evening, so you can maybe follow the approach.
I simply added to Packdata.pb? The Keywords and then I searched in the several Source files for the new added "Macro". There, when I found routines for "Macro" I added "Class" and "EndClass" in the same logic. That was the approach.
But anyway .... maybe you just could add the Keywords explained in a way in my posting above? That would be verrrry kind

Cause Hallodri's Plugin makes the OOP approach in PB sooo easy and useful (me and some others already cant live without it

).
Code: Select all
ENABLEOOP
CLASS Test
Handle.l
get()
set(val.l)
ENDCLASS
PROCEDURE Test::Test()
*this\Handle = 666
ENDPROCEDURE
PROCEDURE Test::get()
PROCEDURERETURN *this\Handle
EndProcedure
PROCEDURE.s Test::set(val.l)
*this\Handle = val
PROCEDURERETURN "bla"
ENDPROCEDURE
*b.Test = Test()
DEBUG *b\get()
DEBUG *b\set(9999999)
DEBUG *b\Handle
DISABLEOOP
Posted: Tue May 09, 2006 8:36 am
by gnozal
inc. wrote:I simply added to Packdata.pb? The Keywords and then I searched in the several Source files for the new added "Macro". There, when I found routines for "Macro" I added "Class" and "EndClass" in the same logic. That was the approach.
Seems ok to me ; I had the same approach.
Posted: Tue May 09, 2006 7:18 pm
by AL90
gnozal wrote: It seems to work Ok : correct parameters shown and code reloaded.
What is wrong with your plugin ?
I have now test it with your example here and it don't works with v503.
So I use now again 3.6.4.496 and it works again fine. Sorry I can't reproduce
this problem why it will work with 496 and not with 503?!

Posted: Wed May 10, 2006 7:42 am
by gnozal
AL90 wrote:gnozal wrote: It seems to work Ok : correct parameters shown and code reloaded.
What is wrong with your plugin ?
I have now test it with your example here and it don't works with v503.
So I use now again 3.6.4.496 and it works again fine. Sorry I can't reproduce this problem why it will work with 496 and not with 503?!

Hmm... Yes, there is a problem if you use more than one plugin. I will try to fix it.
Posted: Wed May 10, 2006 7:44 am
by gnozal
gnozal wrote:inc. wrote:I simply added to Packdata.pb? The Keywords and then I searched in the several Source files for the new added "Macro". There, when I found routines for "Macro" I added "Class" and "EndClass" in the same logic. That was the approach.
Seems ok to me ; I had the same approach.
Some thought : did you try to modify the last source version [build 503] ? Maybe it's a bug in the earlier version.
Posted: Wed May 10, 2006 8:49 am
by inc.
Im at work right now but AFAIK the version I modified was from last Saturday.
Posted: Wed May 10, 2006 9:56 am
by gnozal
AL90 wrote:gnozal wrote: It seems to work Ok : correct parameters shown and code reloaded.
What is wrong with your plugin ?
I have now test it with your example here and it don't works with v503.
So I use now again 3.6.4.496 and it works again fine. Sorry I can't reproduce this problem why it will work with 496 and not with 503?!

I think I found the problem (happens only if more than one plugin and %FILE was used) ; could you please download the new EXE and test it ?
New EXE http://people.freenet.de/gnozal/jaPBeForPB400_beta.zip
Posted: Wed May 10, 2006 6:38 pm
by AL90
I have test it now and it don't work. Sorry.
Here the part from my Converter to run the CommandLine
Code: Select all
;
; Nur über CommandLine starten und Programm wieder beenden
;
If CountProgramParameters()=3
config$=ProgramParameter(0)
code$=ProgramParameter(1)
save$=ProgramParameter(2)
ConfigFile$=appdir$+"Plugins\"+config$
If LCase(GetExtensionPart(ConfigFile$))<>"pbc":ConfigFile$+".pbc":EndIf
If LCase(GetExtensionPart(save$))<>"pb":save$+".pb":EndIf
If FileSize(ConfigFile$)>0 And FileSize(code$)>0
ConvertFile(code$,save$,ConfigFile$,0,0,0)
End
EndIf
EndIf
and here the complete list of
jaPBe-Tools config file.
Code: Select all
; jaPBe Tools/Plugin Menu Configuration
;
[ToolsInfo]
ToolCount = 21
InBuildIncluded = 2
;
;
[Tool_1]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 227
Language = 205
Hide = 0
;
;
[Tool_2]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 226
Language = 195
Hide = 0
;
;
[Tool_3]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 228
Language = 206
Hide = 0
;
;
[Tool_4]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 225
Language = 288
Hide = 0
;
;
[Tool_5]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 223
Language = 299
Hide = 0
;
;
[Tool_6]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 222
Language = 331
Hide = 0
;
;
[Tool_7]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 221
Language = 350
Hide = 0
;
;
[Tool_8]
Command =
Arguments =
WorkingDir =
MenuItemName =
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 2
Menu = 213
Language = 466
Hide = 0
;
;
[Tool_9]
Command =
Arguments =
WorkingDir =
MenuItemName = -
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 0
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_10]
Command = Cutter
Arguments =
WorkingDir =
MenuItemName = Cutter Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_11]
Command = CodeTemplates
Arguments =
WorkingDir =
MenuItemName = CodeTemplates Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_12]
Command = Installer
Arguments =
WorkingDir =
MenuItemName = Installer Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_13]
Command = MessageRequester
Arguments =
WorkingDir =
MenuItemName = MessageRequester Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_14]
Command = PureBasic Smart Updater
Arguments =
WorkingDir =
MenuItemName = PureBasic Smart Updater Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_15]
Command = ReadMe - WordPad
Arguments =
WorkingDir =
MenuItemName = ReadMe - WordPad Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_16]
Command = ReadMe
Arguments =
WorkingDir =
MenuItemName = ReadMe Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_17]
Command = Remove Space
Arguments =
WorkingDir =
MenuItemName = Remove Space Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_18]
Command = ToDo-List
Arguments =
WorkingDir =
MenuItemName = ToDo-List Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_19]
Command = Visual Designer
Arguments =
WorkingDir =
MenuItemName = Visual Designer Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
;
;
[Tool_20]
Command = C:\Programme\PBSourceConverter\PBSourceConverter.exe
Arguments = PB394toPB400 "%FILE" "%TEMPFILE"
WorkingDir =
MenuItemName = PB3.94 to PB4.00
Shortcut =
Flags = 1
ReloadSource = 1
HideEditor = 0
IsPlugIn = 0
Menu = 0
Language = 0
Hide = 0
Trigger = 0
;
;
[Tool_21]
Command = CodeExplorer
Arguments =
WorkingDir =
MenuItemName = CodeExplorer Plugin
Shortcut =
Flags = 0
ReloadSource = 0
HideEditor = 0
IsPlugIn = 1
Menu = 0
Language = 0
Hide = 0
Normaly its all correct, I have no idea why it don't work.
BTW:
I use WinXP HomeEdition - System P4 2.66 - 512MB
I hope I can help you with these deatils.

Posted: Thu May 11, 2006 11:17 am
by Amundo
inc. wrote:
Cause Hallodri's Plugin makes the OOP approach in PB sooo easy and useful (me and some others already cant live without it

).
Hi inc.
Where could one acquire Hallodri's OOP plugin, please?
Posted: Thu May 11, 2006 11:21 am
by inc.
Here you have both announcements. The one at
www.Purebasic-lounge.de and the one at the german purebasic board.
http://www.purebasic-lounge.de/viewtopi ... hlight=oop
http://www.purebasic.fr/german/viewtopi ... hlight=oop
Samples are inside. Its a plugin for both, the PB-IDE and jaPBe.
Posted: Thu May 11, 2006 11:24 am
by gnozal
AL90 wrote:I have test it now and it don't work. Sorry.
This one should really work (like 496)
Please try http://people.freenet.de/gnozal/jaPBeForPB400_beta.zip
Posted: Thu May 11, 2006 11:32 am
by Amundo
Thank you inc.
Damn! You German dudes have flash looking forums! Wish I could translate it all!
Posted: Thu May 11, 2006 1:10 pm
by inc.
Amundo wrote:Damn! You German dudes have flash looking forums! Wish I could translate it all!
phpBB "was" known to be a bit unsecure as several communites have been hacked. But imho fred performed for shure the right updates.
vBulletin board v. 3.5.4 to me is one of the comfortablest forum boards I know - well seen with user eyes.
[Back To Topic]
Posted: Thu May 11, 2006 4:48 pm
by AL90
Yes it works now. But I have now three panels. (2 x Sourcename + the NewOne (Empty)
So it works fine now.

Posted: Thu May 11, 2006 5:18 pm
by gnozal
AL90 wrote:Yes it works now. But I have now three panels. (2 x Sourcename + the NewOne (Empty)
So it works fine now.

It's because you use %FILE and %TEMPFILE as arguments, and 'Reload Source In New Tab'.
If you use 'Reload Source In Same Tab', you only have two panels (%File + %TempFile)
In jaPBe, the logic is the following :
Code: Select all
; Pseudo code ;-)
If Used(%FILE)
If ReloadSource = #SameTab
ReLoadSourceCode(%FILE, #SameTab)
ElseIf ReloadSource = #NewTab
ReLoadSourceCode(%FILE, #NewTab)
EndIf
EndIf
If Used(%TempFile)
If ReloadSource
ReLoadSourceCode(%TempFile, #NewTab)
EndIf
EndIf
I could disable the new panel for %TempFile if %FILE is also used.
What do you suggest ?