BlackBox Component Builder Forums

I have noticed that after PtrArr := S.VAL(oPtrArr, S.ADR(StArr10)) this holds: PtrArr[0] = StArr10[2] PtrArr[1] = StArr10[3] PtrArr[2] = StArr10[4] PtrArr[3] = 0 PtrArr[4] = 0 and after PtrArr := S.VAL(oPtrArr, S.ADR(StArr20)) this PtrArr[0] = StArr20[2] PtrArr[1] = StArr20[3] PtrArr[2] = StArr20[4]...

Thank you, I didn't see it. I think that putting in green colour the commented out lines is a good idea. I usually use CpcBeautifier, but I like to have the "Ident Check" on, and therefore the ident of the commented out block is destroyed, which is not nice: PROCEDURE ImportC*; VAR v: StdV...

How is it possible that module HostPictures uses HostClipboard.len, if len does not exist in module HostClipboard?

What about Paste , i.e. read the content stored in the clipboard? I have tried two versions: PROCEDURE PasteFromClipboard* (): POINTER TO ARRAY OF CHAR; VAR i: INTEGER; T: TextModels.Model; S: TextMappers.Scanner; v: Views.View; w, h: INTEGER; isSingle: BOOLEAN; str: POINTER TO ARRAY OF CHAR; ch: CH...

I made some tests under blackbox-1.7-a1.319, and viewed these things: 1. The SQLite database works ok reading large integer values. In fact, it works better than before, because (although not related to ReadLong) it does not trap when table.Read() is called with an empty table (problem 1 from http:/...

Your procedure TrimTrail is similar to HostFiles.GetPath , that is not exported. MODULE HostFiles; ... PROCEDURE GetPath (IN fname: FullName; OUT path: FullName); VAR i: INTEGER; BEGIN path := fname$; i := LEN(path$); WHILE (i > 0) & (path[i] # "\") & (path[i] # "/") &...

You need to test the existence of a folder. If you know that that folder will ALWAYS have a known file, then you can test for the existence of that file. If file does not exist, then folder does not exist. For example, the file can be readme.txt, and have a content like this: This file must be named...

I would like to propose the addition of a new method ReadLong to the type SqlDrivers.Table . It is necessary to being able to read an integer database column of size 64 bits. I do not need it nowadays, but maybe in the future, and I think it is ok for the sake of completeness of the Sql subsystem. C...

The program from Ivan works really well. The window can even be moved with the mouse while the program is running. But the call to Services.RemoveAction(a) intrigues me. Is it necessary? I thought that the Action a was being consumed during the execution of Do . PROCEDURE (a: Animation) Do (); ... I...

The module LibPlotters (subsystem Lib from http://www.zinnamturm.eu/downloadsIN.htm#Lib ) does not have Plotter. UpdateNow . I modified module LibPlotters as you showed, but got an error: PROCEDURE (v : StdView) HandleViewMsg (f : Views.Frame; VAR msg : Views.Message); BEGIN WITH msg : UpdateViewNow...