Re: [BLACKBOX] INI files

From: [at]} <Rainer>
Date: Sat, 21 Jul 2012 06:17:48 +0200

----boundary-LibPST-iamunique-612172294_-_-
Content-type: text/plain

Chris,
thanks a lot for your contribution.
The ini files part of my project is quite finished and running, but in spite of this I'm interested in your approach and I would like to learn how you did it. It might be of interest for the community too.
If it does not take too much time please let us know ...

Best regards,
Rainer

Am 19.07.2012 um 00:30 schrieb Chris Burrows:

>> -----Original Message-----
>> From: BlackBox [mailto:BLACKBOX{([at]})nowhere.xy
>> Neubauer
>> Sent: Wednesday, 18 July 2012 11:42 PM
>> To: BLACKBOX{([at]})nowhere.xy
>> Subject: Re: [BLACKBOX] How to find out if a document is "dirty"
>>
> ....
>>
>> I should have mentioned perhaps that in my application the user will not
>> modify source code usually found in programs.
>> The application needs a bunch of parameters the user should be able to
>> modify. At first I planned to put them in a configuration file like this
> one:
>>
>> [ClimateChamber]
>> Enabled=TRUE
>> MinTemp=-50
> ...
> ...
>> For the user this is very ugly to maintain and error prone, and for me it
> means
>> to develop a program which would interpret this stuff, that means, first
>> checking for presence of all parameters and then checking all types and
>> values. Because from time to time the number of these parameters will
>> change, I would have to change my program too.
>>
>
> This is a fairly common task that justifies a standard library module. I
> described an alternative approach which I use regularly in a reply to this
> mailing list back in 2006. It's a good simple example of the usefulness of
> Oberon's / Component Pascal's 'type extensions':
>
>> Is there a standard way in BlackBox for keeping program's settings
>> between runs?
>> HostRegistry is not a good idea, because it is not portable.
>> I'm talking about some sort of configuration files, like ini-files?
>> Did anyone work with those? Do you have any modules of subsystems
>> you could share?
>>
>
> I don't know about a standard way for BlackBox but I've done some work on
> this using GPCP and have designed a system that can be interchangeable
> between Ini files and Registry keys. The following snippet should give you a
> feel for how it works:
>
> VAR
> formHeight: IniFile.IntegerItem;
> formTitle: IniFile.StringItem;
> maximised: IniFile.BooleanItem;
> list: IniFile.List;
>
> BEGIN
> NEW(list);
> IniFile.Init(list, 'test.ini');
>
> (* Associate INI file keys with program variables and default values
> *)
> list.AddInteger('Form Height', formHeight, 400);
> list.AddString('Form Title', formTitle, 'Test Program');
> list.AddBoolean('Maximised', maximised, TRUE);
>
> (* Read the contents of the INI file and assign values to the program
> variables *)
> list.Load();
> ...
> ...
> ...
> formHeight.value := formHeight.value + 20;
> formTitle.value := formTitle.value + ' v1.0';
> maximised.value := ~ maximised.value;
>
> (* Write the updated values to the INI file *)
> list.Save();
>
>
> With the above code, if the initial IniFile, 'test.ini', had the
> contents:
>
> Form Height = 420
> Maximised = FALSE
>
> After executing the code the IniFile would have the contents:
>
> Form Height = 440
> Form Title = Test Program v1.0
> Maximised = TRUE
>
> It shouldn't take long to port it to BlackBox - it's mainly the text file IO
> that would have to be translated. Let me know if you are interested and I'll
> give it a go.
>
> Chris Burrows
> CFB Software
> http://www.cfbsoftware.com/gpcp
>
>
> ----
> To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-612172294_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGZiaWRpcyBcZGVmZjB7XGZvbnR0YmwN
CntcZjBcZnN3aXNzIEFyaWFsO30NCntcZjFcZm1vZGVybiBDb3VyaWVyIE5ldzt9DQp7XGYyXGZu
aWxcZmNoYXJzZXQyIFN5bWJvbDt9DQp7XGYzXGZtb2Rlcm5cZmNoYXJzZXQwIENvdXJpZXIgTmV3
O319DQp7XGNvbG9ydGJsXHJlZDBcZ3JlZW4wXGJsdWUwO1xyZWQwXGdyZWVuMFxibHVlMjU1O30N
Clx1YzFccGFyZFxwbGFpblxkZWZ0YWIzNjAgXGYwXGZzMjAgQ2hyaXMsXHBhcg0KdGhhbmtzIGEg
bG90IGZvciB5b3VyIGNvbnRyaWJ1dGlvbi5ccGFyDQpUaGUgaW5pIGZpbGVzIHBhcnQgb2YgbXkg
cHJvamVjdCBpcyBxdWl0ZSBmaW5pc2hlZCBhbmQgcnVubmluZywgYnV0IGluIHNwaXRlIG9mIHRo
aXMgSSdtIGludGVyZXN0ZWQgaW4geW91ciBhcHByb2FjaCBhbmQgSSB3b3VsZCBsaWtlIHRvIGxl
YXJuIGhvdyB5b3UgZGlkIGl0LiBJdCBtaWdodCBiZSBvZiBpbnRlcmVzdCBmb3IgdGhlIGNvbW11
bml0eSB0b28uXHBhcg0KSWYgaXQgZG9lcyBub3QgdGFrZSB0b28gbXVjaCB0aW1lIHBsZWFzZSBs
ZXQgdXMga25vdyAuLi5ccGFyDQpccGFyDQpCZXN0IHJlZ2FyZHMsXHBhcg0KUmFpbmVyXHBhcg0K
XHBhcg0KQW0gMTkuMDcuMjAxMiB1bSAwMDozMCBzY2hyaWViIENocmlzIEJ1cnJvd3M6XHBhcg0K
XHBhcg0KPj4gLS0tLS1PcmlnaW5hbCBNZXNzYWdlLS0tLS1ccGFyDQo+PiBGcm9tOiBCbGFja0Jv
eCBbbWFpbHRvOkJMQUNLQk9YQExJU1RTLk9CRVJPTi5DSF0gT24gQmVoYWxmIE9mIFJhaW5lclxw
YXINCj4+IE5ldWJhdWVyXHBhcg0KPj4gU2VudDogV2VkbmVzZGF5LCAxOCBKdWx5IDIwMTIgMTE6
NDIgUE1ccGFyDQo+PiBUbzogQkxBQ0tCT1hATElTVFMuT0JFUk9OLkNIXHBhcg0KPj4gU3ViamVj
dDogUmU6IFtCTEFDS0JPWF0gSG93IHRvIGZpbmQgb3V0IGlmIGEgZG9jdW1lbnQgaXMgImRpcnR5
IlxwYXINCj4+IFxwYXINCj4gLi4uLlxwYXINCj4+IFxwYXINCj4+IEkgc2hvdWxkIGhhdmUgbWVu
dGlvbmVkIHBlcmhhcHMgdGhhdCBpbiBteSBhcHBsaWNhdGlvbiB0aGUgdXNlciB3aWxsIG5vdFxw
YXINCj4+IG1vZGlmeSBzb3VyY2UgY29kZSB1c3VhbGx5IGZvdW5kIGluIHByb2dyYW1zLlxwYXIN
Cj4+IFRoZSBhcHBsaWNhdGlvbiBuZWVkcyBhIGJ1bmNoIG9mIHBhcmFtZXRlcnMgdGhlIHVzZXIg
c2hvdWxkIGJlIGFibGUgdG9ccGFyDQo+PiBtb2RpZnkuIEF0IGZpcnN0IEkgcGxhbm5lZCB0byBw
dXQgdGhlbSBpbiBhIGNvbmZpZ3VyYXRpb24gZmlsZSBsaWtlIHRoaXNccGFyDQo+IG9uZTpccGFy
DQo+PiBccGFyDQo+PiBbQ2xpbWF0ZUNoYW1iZXJdXHBhcg0KPj4gRW5hYmxlZD1UUlVFXHBhcg0K
Pj4gTWluVGVtcD0tNTBccGFyDQo+IC4uLlxwYXINCj4gLi4uIFxwYXINCj4+IEZvciB0aGUgdXNl
ciB0aGlzIGlzIHZlcnkgdWdseSB0byBtYWludGFpbiBhbmQgZXJyb3IgcHJvbmUsIGFuZCBmb3Ig
bWUgaXRccGFyDQo+IG1lYW5zXHBhcg0KPj4gdG8gZGV2ZWxvcCBhIHByb2dyYW0gd2hpY2ggd291
bGQgaW50ZXJwcmV0IHRoaXMgc3R1ZmYsIHRoYXQgbWVhbnMsIGZpcnN0XHBhcg0KPj4gY2hlY2tp
bmcgZm9yIHByZXNlbmNlIG9mIGFsbCBwYXJhbWV0ZXJzIGFuZCB0aGVuIGNoZWNraW5nIGFsbCB0
eXBlcyBhbmRccGFyDQo+PiB2YWx1ZXMuIEJlY2F1c2UgZnJvbSB0aW1lIHRvIHRpbWUgdGhlIG51
bWJlciBvZiB0aGVzZSBwYXJhbWV0ZXJzIHdpbGxccGFyDQo+PiBjaGFuZ2UsIEkgd291bGQgaGF2
ZSB0byBjaGFuZ2UgbXkgcHJvZ3JhbSB0b28uXHBhcg0KPj4gXHBhcg0KPiBccGFyDQo+IFRoaXMg
aXMgYSBmYWlybHkgY29tbW9uIHRhc2sgdGhhdCBqdXN0aWZpZXMgYSBzdGFuZGFyZCBsaWJyYXJ5
IG1vZHVsZS4gSVxwYXINCj4gZGVzY3JpYmVkIGFuIGFsdGVybmF0aXZlIGFwcHJvYWNoIHdoaWNo
IEkgdXNlIHJlZ3VsYXJseSBpbiBhIHJlcGx5IHRvIHRoaXNccGFyDQo+IG1haWxpbmcgbGlzdCBi
YWNrIGluIDIwMDYuIEl0J3MgYSBnb29kIHNpbXBsZSBleGFtcGxlIG9mIHRoZSB1c2VmdWxuZXNz
IG9mXHBhcg0KPiBPYmVyb24ncyAvIENvbXBvbmVudCBQYXNjYWwncyAndHlwZSBleHRlbnNpb25z
JzpccGFyDQo+IFxwYXINCj4+ICBJcyB0aGVyZSBhIHN0YW5kYXJkIHdheSBpbiBCbGFja0JveCBm
b3Iga2VlcGluZyBwcm9ncmFtJ3Mgc2V0dGluZ3NccGFyDQo+PiAgYmV0d2VlbiBydW5zP1xwYXIN
Cj4+ICBIb3N0UmVnaXN0cnkgaXMgbm90IGEgZ29vZCBpZGVhLCBiZWNhdXNlIGl0IGlzIG5vdCBw
b3J0YWJsZS5ccGFyDQo+PiAgSSdtIHRhbGtpbmcgYWJvdXQgc29tZSBzb3J0IG9mIGNvbmZpZ3Vy
YXRpb24gZmlsZXMsIGxpa2UgaW5pLWZpbGVzP1xwYXINCj4+ICBEaWQgYW55b25lIHdvcmsgd2l0
aCB0aG9zZT8gRG8geW91IGhhdmUgYW55IG1vZHVsZXMgb2Ygc3Vic3lzdGVtc1xwYXINCj4+ICB5
b3UgY291bGQgc2hhcmU/XHBhcg0KPj4gXHBhcg0KPiBccGFyDQo+IEkgZG9uJ3Qga25vdyBhYm91
dCBhIHN0YW5kYXJkIHdheSBmb3IgQmxhY2tCb3ggYnV0IEkndmUgZG9uZSBzb21lIHdvcmsgb25c
cGFyDQo+IHRoaXMgdXNpbmcgR1BDUCBhbmQgaGF2ZSBkZXNpZ25lZCBhIHN5c3RlbSB0aGF0IGNh
biBiZSBpbnRlcmNoYW5nZWFibGVccGFyDQo+IGJldHdlZW4gSW5pIGZpbGVzIGFuZCBSZWdpc3Ry
eSBrZXlzLiBUaGUgZm9sbG93aW5nIHNuaXBwZXQgc2hvdWxkIGdpdmUgeW91IGFccGFyDQo+IGZl
ZWwgZm9yIGhvdyBpdCB3b3JrczpccGFyDQo+IFxwYXINCj4gVkFSXHBhcg0KPiAgZm9ybUhlaWdo
dDogSW5pRmlsZS5JbnRlZ2VySXRlbTtccGFyDQo+ICBmb3JtVGl0bGU6IEluaUZpbGUuU3RyaW5n
SXRlbTtccGFyDQo+ICBtYXhpbWlzZWQ6IEluaUZpbGUuQm9vbGVhbkl0ZW07XHBhcg0KPiAgbGlz
dDogSW5pRmlsZS5MaXN0O1xwYXINCj4gXHBhcg0KPiBCRUdJTlxwYXINCj4gIE5FVyhsaXN0KTtc
cGFyDQo+ICBJbmlGaWxlLkluaXQobGlzdCwgJ3Rlc3QuaW5pJyk7XHBhcg0KPiBccGFyDQo+ICAo
KiBBc3NvY2lhdGUgSU5JIGZpbGUga2V5cyB3aXRoIHByb2dyYW0gdmFyaWFibGVzIGFuZCBkZWZh
dWx0IHZhbHVlc1xwYXINCj4gKilccGFyDQo+ICBsaXN0LkFkZEludGVnZXIoJ0Zvcm0gSGVpZ2h0
JywgZm9ybUhlaWdodCwgNDAwKTtccGFyDQo+ICBsaXN0LkFkZFN0cmluZygnRm9ybSBUaXRsZScs
IGZvcm1UaXRsZSwgJ1Rlc3QgUHJvZ3JhbScpO1xwYXINCj4gIGxpc3QuQWRkQm9vbGVhbignTWF4
aW1pc2VkJywgbWF4aW1pc2VkLCBUUlVFKTtccGFyDQo+IFxwYXINCj4gICgqIFJlYWQgdGhlIGNv
bnRlbnRzIG9mIHRoZSBJTkkgZmlsZSBhbmQgYXNzaWduIHZhbHVlcyB0byB0aGUgcHJvZ3JhbVxw
YXINCj4gdmFyaWFibGVzICopXHBhcg0KPiAgbGlzdC5Mb2FkKCk7XHBhcg0KPiAuLi5ccGFyDQo+
IC4uLlxwYXINCj4gLi4uXHBhcg0KPiAgZm9ybUhlaWdodC52YWx1ZSA6PSBmb3JtSGVpZ2h0LnZh
bHVlICsgMjA7XHBhcg0KPiAgZm9ybVRpdGxlLnZhbHVlIDo9IGZvcm1UaXRsZS52YWx1ZSArICcg
djEuMCc7XHBhcg0KPiAgbWF4aW1pc2VkLnZhbHVlIDo9IH4gbWF4aW1pc2VkLnZhbHVlO1xwYXIN
Cj4gXHBhcg0KPiAgKCogV3JpdGUgdGhlIHVwZGF0ZWQgdmFsdWVzIHRvIHRoZSBJTkkgZmlsZSAq
KVxwYXINCj4gIGxpc3QuU2F2ZSgpO1xwYXINCj4gXHBhcg0KPiBccGFyDQo+IFdpdGggdGhlIGFi
b3ZlIGNvZGUsIGlmIHRoZSBpbml0aWFsIEluaUZpbGUsICd0ZXN0LmluaScsIGhhZCB0aGVccGFy
DQo+IGNvbnRlbnRzOlxwYXINCj4gXHBhcg0KPiAgRm9ybSBIZWlnaHQgPSA0MjBccGFyDQo+ICBN
YXhpbWlzZWQgPSBGQUxTRVxwYXINCj4gXHBhcg0KPiBBZnRlciBleGVjdXRpbmcgdGhlIGNvZGUg
dGhlIEluaUZpbGUgd291bGQgaGF2ZSB0aGUgY29udGVudHM6XHBhcg0KPiBccGFyDQo+ICBGb3Jt
IEhlaWdodCA9IDQ0MFxwYXINCj4gIEZvcm0gVGl0bGUgPSBUZXN0IFByb2dyYW0gdjEuMFxwYXIN
Cj4gIE1heGltaXNlZCA9IFRSVUVccGFyDQo+IFxwYXINCj4gSXQgc2hvdWxkbid0IHRha2UgbG9u
ZyB0byBwb3J0IGl0IHRvIEJsYWNrQm94IC0gaXQncyBtYWlubHkgdGhlIHRleHQgZmlsZSBJT1xw
YXINCj4gdGhhdCB3b3VsZCBoYXZlIHRvIGJlIHRyYW5zbGF0ZWQuIExldCBtZSBrbm93IGlmIHlv
dSBhcmUgaW50ZXJlc3RlZCBhbmQgSSdsbFxwYXINCj4gZ2l2ZSBpdCBhIGdvLlxwYXINCj4gXHBh
cg0KPiBDaHJpcyBCdXJyb3dzXHBhcg0KPiBDRkIgU29mdHdhcmVccGFyDQo+IGh0dHA6Ly93d3cu
Y2Zic29mdHdhcmUuY29tL2dwY3BccGFyDQo+IFxwYXINCj4gXHBhcg0KPiAtLS0tXHBhcg0KPiBU
byB1bnN1YnNjcmliZSwgc2VuZCBhIG1lc3NhZ2Ugd2l0aCBib2R5ICJTSUdOT0ZGIEJMQUNLQk9Y
IiB0byBMSVNUU0VSVkBMSVNUUy5PQkVST04uQ0hccGFyDQpccGFyDQpccGFyDQotLS0tXHBhcg0K
VG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdpdGggYm9keSAiU0lHTk9GRiBCTEFDS0JP
WCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLn19ADogUmU6IA=
----boundary-LibPST-iamunique-612172294_-_---

Received on Sat Jul 21 2012 - 06:17:48 UTC