BlackBox Beta

Ivan Denisov
Posts: 1700
Joined: Tue Sep 17, 2013 12:21 am
Location: Russia

BlackBox Beta

Post by Ivan Denisov »

I think that we are very close to beta stage.
It seems that there are enough features for 1.7 release.
Are there any essential features you think we should apply for 1.7 ?

From my self, I want to add the tool to open URLs for better Internet integration (some version of InfoCmds.Start).

Josef already added some implementation of this tool in HostTextConv module...

Code: Select all

	PROCEDURE ShellExecute*(path: ARRAY OF CHAR);
		VAR res: INTEGER;
	BEGIN
		res := WinApi.ShellExecuteW(0, NIL, path, NIL, NIL, WinApi.SW_SHOWNORMAL);
	END ShellExecute;
However we can implement this like in this module:

Code: Select all

StdCoder.Decode ..,, ..Sb,...3QwdONl9RhOO9vRbf9b8R7fJHPNGomCrlAyIhgs,CbKBhZ
 xi2,CoruKu4qouqm8rtuGfa4.hOO9vRb1Y66wb8RTfQ9vQRtIdvPZHWKqtCa.E.U5UfB16.5Qw
 dONlnayKmKKqCLLCJuGqayKm6F9vQ5nsH3.bnayKmKa2,Cor.kay4.qorGqmQCU2,CJuyKtQC9
 8P9PP7ONbXmb.2.YbLk5EOS,,6.,U,oX9U00.bnUGLu8ro8quGrmCLWKqt.2.w22U.EBU.U,2.
 I3tfj1.0E65.I0AU0Ky8U.2.C12.e,2..e0M.6YE.G.4E.kv0y6QXiI.3Qwb8R7vIdPMP9Qbf9
 bWK,U1.,UT1,U31,c.NET4w39lBEwfn3Aw3kTnM05KBkCfn3w7YtlxjtD1IgrQ,9T,IZZJnVo,
 IqpQ,J5FdbNz.P.ZvALENH.rPdxD2J.NhALk4L.rvqpzAH.7cALEND.rPd2,cALkFC.Tw,rCkD
 .,cALEaD.RuFpQOB.NNALEZL.XxgXC,7.TMALEpGE.oml4n,R.wzjQ,,d.AUAU,U.okJK.rc93
 .6HHfPLvQR7HHfPL9F9vQ.,6.,UW3.0E.MKE.AUFV13iXRcVZhgRiiwdkhgi3Zb2hoZikJbjwZ
 axhmhihpZjJgZJijphXxhmhgiIipxZhhghJgZJigBhnZii2ic3izghjZAvdRHPNj9QZvPBPONP
 NBNRvNAjt7HF,8Mtf.2.C1,E.c4E..c8M.C.,6YE.ezzzzz5.oE.8T4E.EjU.E2E..AU0U,Iyz
 zzzP.M.tzzzzz1.2yzzzz1ozzzzz1Yxzzzz12Sc6E.2U.oE..,.Z9.2U.EgE.M.V050.....Um
 ,.....wabA3ezzzzz3.oE..,.,W..F.,.k.8.4Emzzzzj,U,oT.YyzzzzP1E.6.B2.E.EtE.0.
 l0,U,28Q6..............,.B2.E.EK0E.2.2,2..1c.M.Fzzzzzm.2.oE..,.Z1,6.292.4E
 ckV..............2.oE..,.F1,.F.,.k.8.4EuV,U,oxzzzz1IS.2yz1Ey,Exzzzzj5U,YTc
 .E.2U.oE..,.,X.2.o66.4ETkV...Eo4Kl8rkWqk8KtuGtKrL8KqyqnCrLGqmOrmmqr0rqKKrG
 rLWHQaHMSnLSmIAUBU,2.0E1,.2.I22U.E2E..AUBU,2.0E1,.2.YC2.I96.4EdkV...En...g
 B.....IasQamw23cyz5,.B2.E.Ed0.,6.2,2..1c.M.x54.4Eq,EzV6.J5m.oRM..M,2U1IkmL
 ,2U.EKE.EBU.U,2.0EJk.0k.E6V.A.sv5U2IkmL,6.wl1E.0E.I16.M.EJ.,U.Yr0E.w.c4M.7
 .16xk.k.WC.8D.uC2,6wz5T.1cyk.UqzzzzTUi1UszzzzT3.mD.8DA.cu.cx.6x..Y.QU,U.QF
 s.EuV,U,oSM0EzV,.U0.h54.YT...h5.R5.d5.Z5.t5.N5.Z5W.0kAE0O.0kBU2U,ISM.M.F5.
 V5.t5m.oTc.M.Z5.R5.U,.x5.Z5.t5.x5.J5.h5.U0.V5.U4.h54.YS.oTM0EwV,.R5.d5.x5.
 Z5.x5.Z5S.ITM.Ev,Er,EwV0.t5.Z54.IR.oS.YS..G.0k3V1.d54.oSM0EzV,.U0.h54.YT..
 .h5.R5.d5.Z5.t5.N5.Z5W.0ECE.UHBm0s4ksHomOrVyqqqqkuKmKKtCLLCJu.70,Mw7ONh1.u
 Gf.2Um1,6.220E.E1U.M3M66.,.b0Umj,6..E1U.M36AszPuH7OJNOF,tEVvMUvgV72ZeIZUIU
 BAVm2ak2bkgalAbg2Y0IY2aY2KW2KUg2Y,ZkyYklYk.ZkkYkxYkyYkU2b2ya24YzYk.ZksYkwY
 kpYk.ZkyYkmYkUIa24Y,ZEuH05X7ZkpYkxYksYkDZk3ZkU2c24418V18VL8Vr7Vp7Vl7V,dENP
 M5vO3uPlP9POMH9PHfPD96NOObn4aEN0nM0nM0nMaHK00KF0rG09EK0GBGMTGsSGMNGsOGMU25
 38V,8Vx,V7Vv,,dAod2ib245p7Vx7Vd7VRN1HcAEM0HPmGE8EF.c97QD72UsYkr6A7gF7AC7wH
 qk2810HO4nNmGE8EF.c57QE7gD4XkYkDZkUob2Kc246VlMGMTGMVIb24a24YuYky6D7AA7QDGH
 0jI01GT.,8VL8V38Vl7V6C7Yhwb2qb2a4,tRHfP996FNE7AD7g9,d.FPM3fQ1XWd9c.HN1HcAV
 lN0nO4nPmGE8E8GMAGM6GM,mGE4YUYa2qb24a2Ka2Sb2ia2i5ga2ab24YmYE7OO19PTvN,7F7w
 E7QD7gC7gF7ACuH0rXkYkvYkkYkUAhmAanBjnBdipgj3YmYk9ZkzYkyYkvYkxYkpYEiI01GQES
 GsOg5f,llbg,Jd8HN1PM0HOHVuHZ8J,tInuIdOFP89,7FH1mGEWorCLuGoo44sI9fQhPO5PNb9
 9,tJHfP18QHvCPM1H6Jn8I9O1HM01uMdPOTfP,ND,7ITOGR8J9eI,7JT86ZOF5uHZ8F,78bONZ
 1oZ,RgoBBam4ak2aEnaKqKKb4qqKKR0GcyoY.MEZeI1OK,tHB8658G1eIrN1HM09eH7uCPM1HM
 010gcshgUgbU28.cI...kIk2...kU....VeITuE98FfeI986FNMp761uMdPO667uPrN1HM0hOE
 ZO1HM0H6OjfP7fC,tJHfPc9FuJR8FrN1HM0H6PVvHVPNZPMdPOTfPN76N9QBOONPNN76N9QVOM
 ZPMPPNdPNZHK0Gq0LWaKtKqlGrrAju2YLBBEcGLtSpdGJdin4a.RvIFvPjvEP9Np76HeHdOFDO
 FZuCP.FPORvQdfC,tJ.FOGRuIdOERuE9uCPM0HkvaKryJnaKqo7YZUwidtLVPMZPMCLK0mva4j
 vPZvO7OOZfC,NEZeIQfpphoBgbxgZZgR3Yp2ak2aUwd432.3OFDOGRO1HM0HeF,7FHPMc9HuQj
 OORPNFN8,7JFOFRO1Hk2kjO4UUIbx2YWwidphZJgmxhrRiZJiUIYUQZUAgiogdZBEGqk2akWmo
 dKo4ak2..22AgioA.7,u2sR6QUUIbx2YbwYvgV7.S5EEenS00Eq.UUIbxc6T9Q9fP3tCPM0HU4
 BB0GRqXrBhidNcHsCP.0pkkmG50GRq16Qktin4a.Goo.2Yug5kv.in4cP.0GRqHESpouqUkdSp
 jCJYyofin4aUc,,dCv,.FPNN9P98S9vMf9R9vJF7OjfP799,7PVvHVHt.N,B0N,V0K4Y3Y6.mG
 EuqdWqrUdgV7gcC767uPrl4a....9Wd2Y2xBaUK,3OF.FuPb9R.CJu4KtGLI4KLO4u2GmIq..q
 ..sIdPMZHJ0GIKKwKKb44plU8300MEamR0GIeGJ0mPGMMwb2Sc2Cc2Kb24YzYEuXsYkrcA7gD7
 wCmI0rH0vXtYkUIa2ib2i4F8Vv7VflQGMEyH0VnYk.Zkk6D7AD7wG7A6FNFlOFHtC,ND7AAyX.
 7CmXp6EmGEuqrGrm0rkGKLKKwKqR0GQGMSwd24YwYkyYkqYkpYk0ZkUA6xFOGsOG6h7VV7V38V
 N8V,tD7wE8I0nYv2Y,Zkwc9yH012MBsGIb2GSY5V7VvFOg4o5Z7V,tDuX,ZkvYkp6638Vf7Vp7
 V18V38VV7V,7D7YosE7wC7wH7A6Jd8HN1HEf661fC,ll.QbBAV0,cH9uJFNMHtCPM0HcHELO4U
 g6H9eHFNNlPNR07FEiGE4nIin4MMRdNH1cL,dCvlmWrmUYQbBA,bONZfRU2xhABgohgm3ZVZZU
 QeZ,cPTvRHtC,780mPG6Q610,tF7QB7AEKH0TH01mUCKuEKIc2qZuYki2YsYkxYkksF7QB0m6G
 s6GMEqH0LXUYb2GPEV2YmsGUvMDyI09I076d7V,8V58Vb7Vl7VfFEeH0VkUosGYa2q5,tB7AA8
 Xp6EWI0LH0r1kPG6z,EMGc33f3pZUIZdgV7g6QeoBAin4q..sHVHreGEWGnaKqK4I58Z,,.EJo
 b2K66VI6sD0Yy6C.iXAV9NC7A6d,p7V58Vt7VEVGcSYkVYkUgdH3YLBhiZgjxin3YmYkU2ZmYk
 xU6VpMCaGEyH012C10Xw6DKXg2Y,ZkmYkDZkrYkkMDqH0vXtEN2Y.ZkpMB7QE7gE0Yp66x6VME
 7A6,GMAc24d24b24c2i4vFQg4tFEWH0n1q10GWGMMGsQGsRGMMGsR0mSG6zFU25t,,GKYa2GR.
 g53GEumf4If0mMGsVGMOGsOI6uH0V.tG66ZVLBB1OPV99,NB7QEiH0XH01mTo510fFOGsSGMQA
 b24Y,dA.qXUI40YpMBcE0Yp661GEGI0Vv6AmXsYkUoZLlR0GQG6TWwUqU0761GTY4fFUo4I6U1
 dEmYvMEc9.mXpU976p,tFS24vFOg4o5Z7VyXy.KXUI6fFRA63GM2YwUosEi1I3M0kkklABin4a
 EV..a0o7c9.Y3EnaKq.7N8.MM.cLEnaKq.7tCsI.Y6...R1EEUzsE420026flP.69c9.24D0,N
 2.2YwUqU076ZlZ.rlS.2Yo6ECYnUp66p,24Y4LWocD00I4fFU27g5llbsBsD.0190U3VD3iZtC
 PM19eH7mV0rl.RN1Pc.3tEVvM50Q81XcwYixhohA1HLkHaGFqk48..w79HI.sRjvRRNORfQRNM
 5f9ZPRTdTHfPBvPZNATt7Hd63QwdONlnVyKrGLtyKqmqm8rtumdYg1ZimZh2hgnRg.AyI,.ELC
 oruKu.GomCrl0U1VV,.Z1...bf9.EWE.8T06.,.d.,.HE.2U..U,IklbeZFdKLqKKtCLLC3ZOR
 NX2V.AyI,ktuGdKLqKa2V.Iy1.,Uf8.S.,sc6.,k,Z8.CLLC3bmwmqmGomCb.AS.c9Ajg,0EtX
 .0.U66.,cKE.cUX5.umUGbmVoFWE.Y.2..EG2.,M.,E.2.2YXK96.tfj16.zwPA.A.2U.E,9T3
 U...p.0.4.IZ..,U.2m,.,..Y4....
 --- end of encoding ---
User avatar
Josef Templ
Posts: 2047
Joined: Tue Sep 17, 2013 6:50 am

Re: BlackBox Beta

Post by Josef Templ »

We are almost done with the CPC changes but not completely.

When we are done with the CPC changes I would like to propose some very small
issues that will make working with BlackBox a lot more productive
and they will not have any impact on the existing system. Just small add ons
and the solution already exists since 20 years and is well tested.

I think that after so much work on exotic and more or less irrelevant bug fixes a
few issues that provide a real benefit for everyday work should be possible.

One example is adding 'source link' buttons to the properties dialog Dev/Rsrc/Inspect.
They allow to jump directly into the source code of Links, Guards, and Notifiers.
This is very simple and very convenient. It was the very first feature I added to my
BlackBox installation when I started professional work with it.

- Josef
Attachments
Inspect.jpg
Inspect.jpg (20.63 KiB) Viewed 9711 times
User avatar
Robert
Posts: 1024
Joined: Sat Sep 28, 2013 11:04 am
Location: Edinburgh, Scotland

Re: BlackBox Beta

Post by Robert »

Josef Templ wrote:I think that after so much work on exotic and more or less irrelevant bug fixes a
few issues that provide a real benefit for everyday work should be possible.
I am very tempted to agree. But we have to find the balance between small and simple new features, larger tasks, and getting 1.7 actually issued.

I also (after 20 years!) have some private patches. I try to keep these to a minimum, and, in fact, can only think of 3 source code patches - I am even using the new standard Stamps!

But your example (which I agree is useful) reminded me of another. On that Form I have changed the Level Control to an UpDownField. And I have patched the Controls code so that the modifier (sorry - control) key alters the behaviour from "Adding/subtracting 1" to "Multiplying / dividing by 10". This I often find very convenient.

Code: Select all

	PROCEDURE SetUpDownField (f: StdCFrames.UpDownField; val: INTEGER);
		VAR c: UpDownField; old: INTEGER;
		was, new: LONGINT;
	BEGIN
		c := f.view(UpDownField);
		IF c.item.Valid() & ~c.readOnly THEN
			old := c.item.IntVal();
			IF WinApi.GetKeyState(WinApi.VK_CONTROL) < 0 THEN
				was := old;
				IF val = was + 1 THEN new := was * 10
				ELSIF val = was - 1 THEN
					IF old < 0 THEN new := (was + 9) DIV 10 ELSE new := was DIV 10 END
				ELSE
					new := val
				END;
				val := SHORT (MAX (MIN (INTEGER), MIN (MAX (INTEGER), new)))
			END;
			IF (val >= c.min) & (val <= c.max) THEN
(*
				old := c.item.IntVal();
*)
				IF old # val THEN c.item.PutIntVal(val); Notify(c, f, Dialog.changed, old, val) END
			ELSE Dialog.Beep
			END
		END
	END SetUpDownField;
User avatar
Josef Templ
Posts: 2047
Joined: Tue Sep 17, 2013 6:50 am

Re: BlackBox Beta

Post by Josef Templ »

I agree.
1.7 should be such that private patches are avoided, as long as they are of general use of course.

Using an Up-Down-Field for level is perfectly OK for me and is an improvement.
One private patch can be removed. Great.

The Ctrl-Up/Down modification is also OK and should be included in issue-#98,
which is still open. The point here is that it should be done at a different place,
viz. in HostCFrames or such that import of WinApi in Controls is not need.
Another private patch to be removed. Great.
And one more reason to proceed with issue-#98.

- Josef
Ivan Denisov
Posts: 1700
Joined: Tue Sep 17, 2013 12:21 am
Location: Russia

Re: BlackBox Beta

Post by Ivan Denisov »

One more feature resolved and we one step closer to beta version. There are two features to resolve and we can change from alpha to beta.
Ivan Denisov
Posts: 1700
Joined: Tue Sep 17, 2013 12:21 am
Location: Russia

Re: BlackBox Beta

Post by Ivan Denisov »

Ivan Denisov
Posts: 1700
Joined: Tue Sep 17, 2013 12:21 am
Location: Russia

Re: BlackBox Beta

Post by Ivan Denisov »

Do we ready to announce beta? Can someone help with the announcement message? It should clarify all the features which were adopted, some minor bug fixes and, I guess, our plans how to go further, what we are waiting from the community (some testing)...
User avatar
DGDanforth
Posts: 1061
Joined: Tue Sep 17, 2013 1:16 am
Location: Palo Alto, California, USA
Contact:

Re: BlackBox Beta

Post by DGDanforth »

Ivan Denisov wrote:Do we ready to announce beta? Can someone help with the announcement message? It should clarify all the features which were adopted, some minor bug fixes and, I guess, our plans how to go further, what we are waiting from the community (some testing)...
If we really are at a stable version of 1.7 then I think all of us need to move our software to that version.
This means that I will need to recompile a large number of my files and use them for some time before
I can say that alpha -> beta.

I'll start doing that now.

-Doug
User avatar
DGDanforth
Posts: 1061
Joined: Tue Sep 17, 2013 1:16 am
Location: Palo Alto, California, USA
Contact:

Re: BlackBox Beta

Post by DGDanforth »

By the way,
Does anyone have a tool (utility) that can recompile all modules?
Required:
(1) Enter (or browse to) top level directory and hit Compile
(2) have that tool search all sub "Mod" directories
(3) Open all .odc in Mod aan obtain IMPORT list
(4) Sort all those imports into compilation order
(5) Compile as much as possible but don't halt on a failure but rather put the file name into a failure list (document)
(6) Continue until done.

-Doug
Ivan Denisov
Posts: 1700
Joined: Tue Sep 17, 2013 12:21 am
Location: Russia

Re: BlackBox Beta

Post by Ivan Denisov »

As I remember there is one such a tool made by Peter K. I will check it today and publish here.

We can provide such a tool for community for easier migration.
Post Reply