Hello.

Normally I would have used Firebird to solve the simple task,
but this is not allowed to install on the PC and then
I have to use two unfamiliar components, like listboxes, to solve a
record task instead of data aware components.

The task:
A column of initials is copied into a listbox or something that can
take care of
the list of random Initials.
I e 
KIB
FAH
KLS

Then the program will somehow go through the list in the first listbox
and in
another listbox, that has all the initials in one column and
corresponding numbers in another, show only the rows that correspond
with the list of initials given in the first listbox.

If someone could give a syntax example of such a use of two listboxes,
I would be grateful.

Thanks in advance.

:)
Kai Inge

Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
> Hello.
> 
> Normally I would have used Firebird to solve the simple task,
> but this is not allowed to install on the PC and then
> I have to use two unfamiliar components, like listboxes, to solve a
> record task instead of data aware components.
> 
> The task:
> A column of initials is copied into a listbox or something that can
> take care of
> the list of random Initials.
> I e 
> KIB
> FAH
> KLS
> 
> Then the program will somehow go through the list in the first listbox
> and in
> another listbox, that has all the initials in one column and
> corresponding numbers in another, show only the rows that correspond
> with the list of initials given in the first listbox.
> 
> If someone could give a syntax example of such a use of two listboxes,
> I would be grateful.
> 
> Thanks in advance.
> 
> :)
> Kai Inge
> 

Hello,

three different ideas:

1. Use Firebird embedded so it's only a few files which get deployed
   with your application

2. Use FireDAC which has an in memory SQL dataset.

3. I'm not sure how your output shall look, but:
   - loop over your first list and for each entry of it
   - loop over the 2nd list from begining to end and if the 1st column
     with the initials matches your current value from your first list
     add the number of the 2nd column

Greetings

Markus

Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
> Hello.
> 
> Normally I would have used Firebird to solve the simple task,
> but this is not allowed to install on the PC and then
> I have to use two unfamiliar components, like listboxes, to solve a
> record task instead of data aware components.
> 
> The task:
> A column of initials is copied into a listbox or something that can
> take care of
> the list of random Initials.
> I e 
> KIB
> FAH
> KLS
> 
> Then the program will somehow go through the list in the first listbox
> and in
> another listbox, that has all the initials in one column and
> corresponding numbers in another, show only the rows that correspond
> with the list of initials given in the first listbox.
> 
> If someone could give a syntax example of such a use of two listboxes,
> I would be grateful.
> 
> Thanks in advance.
> 
> :)
> Kai Inge
> 

Hello,

three different ideas:

1. Use Firebird embedded so it's only a few files which get deployed
   with your application

2. Use FireDAC which has an in memory SQL dataset.

3. I'm not sure how your output shall look, but:
   - loop over your first list and for each entry of it
   - loop over the 2nd list from begining to end and if the 1st column
     with the initials matches your current value from your first list
     add the number of the 2nd column

Greetings

Markus

Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
> Hello.
> 
> Normally I would have used Firebird to solve the simple task,
> but this is not allowed to install on the PC and then
> I have to use two unfamiliar components, like listboxes, to solve a
> record task instead of data aware components.
> 
> The task:
> A column of initials is copied into a listbox or something that can
> take care of
> the list of random Initials.
> I e 
> KIB
> FAH
> KLS
> 
> Then the program will somehow go through the list in the first listbox
> and in
> another listbox, that has all the initials in one column and
> corresponding numbers in another, show only the rows that correspond
> with the list of initials given in the first listbox.
> 
> If someone could give a syntax example of such a use of two listboxes,
> I would be grateful.
> 
> Thanks in advance.
> 
> :)
> Kai Inge
> 

Hello,

three different ideas:

1. Use Firebird embedded so it's only a few files which get deployed
   with your application

2. Use FireDAC which has an in memory SQL dataset.

3. I'm not sure how your output shall look, but:
   - loop over your first list and for each entry of it
   - loop over the 2nd list from begining to end and if the 1st column
     with the initials matches your current value from your first list
     add the number of the 2nd column

Greetings

Markus

Markus Humm wrote:

> Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
> > Hello.
> > 
> > Normally I would have used Firebird to solve the simple task,
> > but this is not allowed to install on the PC and then
> > I have to use two unfamiliar components, like listboxes, to solve a
> > record task instead of data aware components.
> > 
> > The task:
> > A column of initials is copied into a listbox or something that can
> > take care of
> > the list of random Initials.
> > I e 
> > KIB
> > FAH
> > KLS
> > 
> > Then the program will somehow go through the list in the first
> > listbox and in
> > another listbox, that has all the initials in one column and
> > corresponding numbers in another, show only the rows that correspond
> > with the list of initials given in the first listbox.
> > 
> > If someone could give a syntax example of such a use of two
> > listboxes, I would be grateful.
> > 
> > Thanks in advance.
> > 
> > :)
> > Kai Inge
> > 
> 
> Hello,
> 
> three different ideas:
> 
> 1. Use Firebird embedded so it's only a few files which get deployed
>    with your application
> 
> 2. Use FireDAC which has an in memory SQL dataset.
> 
> 3. I'm not sure how your output shall look, but:
>    - loop over your first list and for each entry of it
>    - loop over the 2nd list from begining to end and if the 1st column
>      with the initials matches your current value from your first list
>      add the number of the 2nd column
> 
> Greetings
> 
> Markus

Hello Markus

and thank you for answering me.

1. I have never used Firebirds embedded flavour, so now is anyway the
time to learn what it's all about.
If it can be installed without the PC's security system preventing it,
its worth a try.

2. I have UniDAC implemented in XE7, if it has a memory SQL dataset
also, I will try this. If not, I will explore the FireDAC collection.

3. The output is just two columns, the initials and the employee
numbers. The initials is copied from an excel column in a
administration duty list and the program
will provide a column with the employee numbers for theese initials.
(The initials in question is 12 per day, changing every day and there
are 56 employees they are taken from.)

No doubt this could be done directly in the excel system by formulas or
macros, but first thing is that we are not allowed to change anything
in the administrations excel system,
second thing is that I want Delphi to handle this little task for the
lady at work. :-)
She copies the initials list from the administration system and into
Delphi, which provide the correct employee numbers column that then is
copied back into the correct excel column
that was supposed to be filled in by hand.

:)
Kai Inge

Markus Humm wrote:

> Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
> > Hello.
> > 
> > Normally I would have used Firebird to solve the simple task,
> > but this is not allowed to install on the PC and then
> > I have to use two unfamiliar components, like listboxes, to solve a
> > record task instead of data aware components.
> > 
> > The task:
> > A column of initials is copied into a listbox or something that can
> > take care of
> > the list of random Initials.
> > I e 
> > KIB
> > FAH
> > KLS
> > 
> > Then the program will somehow go through the list in the first
> > listbox and in
> > another listbox, that has all the initials in one column and
> > corresponding numbers in another, show only the rows that correspond
> > with the list of initials given in the first listbox.
> > 
> > If someone could give a syntax example of such a use of two
> > listboxes, I would be grateful.
> > 
> > Thanks in advance.
> > 
> > :)
> > Kai Inge
> > 
> 
> Hello,
> 
> three different ideas:
> 
> 1. Use Firebird embedded so it's only a few files which get deployed
>    with your application
> 
> 2. Use FireDAC which has an in memory SQL dataset.
> 
> 3. I'm not sure how your output shall look, but:
>    - loop over your first list and for each entry of it
>    - loop over the 2nd list from begining to end and if the 1st column
>      with the initials matches your current value from your first list
>      add the number of the 2nd column
> 
> Greetings
> 
> Markus

Hello Markus

and thank you for answering me.

1. I have never used Firebirds embedded flavour, so now is anyway the
time to learn what it's all about.
If it can be installed without the PC's security system preventing it,
its worth a try.

2. I have UniDAC implemented in XE7, if it has a memory SQL dataset
also, I will try this. If not, I will explore the FireDAC collection.

3. The output is just two columns, the initials and the employee
numbers. The initials is copied from an excel column in a
administration duty list and the program
will provide a column with the employee numbers for theese initials.
(The initials in question is 12 per day, changing every day and there
are 56 employees they are taken from.)

No doubt this could be done directly in the excel system by formulas or
macros, but first thing is that we are not allowed to change anything
in the administrations excel system,
second thing is that I want Delphi to handle this little task for the
lady at work. :-)
She copies the initials list from the administration system and into
Delphi, which provide the correct employee numbers column that then is
copied back into the correct excel column
that was supposed to be filled in by hand.

:)
Kai Inge

Handle the data indipendent from the view.

Simply create a collection, filter and render the view (listbox.Items.Clear and Add). If possible stop repainting the listbox.BeginUpdate, listbox.EndUpdate ...

Consider creating an Index over the Items that should be listed (2nd listbox) and just use the Index.

I cannot really help you with the process of filtering, since I don't know if the assoziation 1:n or n:m and if the index has to be rebuilt often.


> {quote:title=Kai Inge Buseth wrote:}{quote}
> Hello.
> 
> Normally I would have used Firebird to solve the simple task,
> but this is not allowed to install on the PC and then
> I have to use two unfamiliar components, like listboxes, to solve a
> record task instead of data aware components.
> 
> The task:
> A column of initials is copied into a listbox or something that can
> take care of
> the list of random Initials.
> I e 
> KIB
> FAH
> KLS
> 
> Then the program will somehow go through the list in the first listbox
> and in
> another listbox, that has all the initials in one column and
> corresponding numbers in another, show only the rows that correspond
> with the list of initials given in the first listbox.
> 
> If someone could give a syntax example of such a use of two listboxes,
> I would be grateful.
> 
> Thanks in advance.
> 
> :)
> Kai Inge

--
Delphi Programming is fun. Hilarious.

Am 15.08.2015 um 17:57 schrieb Kai Inge Buseth:
> Markus Humm wrote:
> 
>> Am 15.08.2015 um 14:01 schrieb Kai Inge Buseth:
>>> Hello.
>>>
>>> Normally I would have used Firebird to solve the simple task,
>>> but this is not allowed to install on the PC and then
>>> I have to use two unfamiliar components, like listboxes, to solve a
>>> record task instead of data aware components.
>>>
>>> The task:
>>> A column of initials is copied into a listbox or something that can
>>> take care of
>>> the list of random Initials.
>>> I e 
>>> KIB
>>> FAH
>>> KLS
>>>
>>> Then the program will somehow go through the list in the first
>>> listbox and in
>>> another listbox, that has all the initials in one column and
>>> corresponding numbers in another, show only the rows that correspond
>>> with the list of initials given in the first listbox.
>>>
>>> If someone could give a syntax example of such a use of two
>>> listboxes, I would be grateful.
>>>
>>> Thanks in advance.
>>>
>>> :)
>>> Kai Inge
>>>
>>
>> Hello,
>>
>> three different ideas:
>>
>> 1. Use Firebird embedded so it's only a few files which get deployed
>>    with your application
>>
>> 2. Use FireDAC which has an in memory SQL dataset.
>>
>> 3. I'm not sure how your output shall look, but:
>>    - loop over your first list and for each entry of it
>>    - loop over the 2nd list from begining to end and if the 1st column
>>      with the initials matches your current value from your first list
>>      add the number of the 2nd column
>>
>> Greetings
>>
>> Markus
> 
> Hello Markus
> 
> and thank you for answering me.
> 
> 1. I have never used Firebirds embedded flavour, so now is anyway the
> time to learn what it's all about.
> If it can be installed without the PC's security system preventing it,
> its worth a try.
> 

I just read the releasenotes of the current embedded version 2.5.4 as
the last time I had used the embedded variant for a project at home was
back in the 1.5.x days.

It doesn't require installation, you just need to deploy the necessary
files along with your app. You can put them in the same directory.
Just be aware that there's no login security as in the normal variant.

Since 2.5.x it even supports the backup API which can be accessed from
Delphi via FireDAQ.


> 2. I have UniDAC implemented in XE7, if it has a memory SQL dataset
> also, I will try this. If not, I will explore the FireDAC collection.
> 
> 3. The output is just two columns, the initials and the employee
> numbers. The initials is copied from an excel column in a
> administration duty list and the program
> will provide a column with the employee numbers for theese initials.
> (The initials in question is 12 per day, changing every day and there
> are 56 employees they are taken from.)
> 
> No doubt this could be done directly in the excel system by formulas or
> macros, but first thing is that we are not allowed to change anything
> in the administrations excel system,
> second thing is that I want Delphi to handle this little task for the
> lady at work. :-)
> She copies the initials list from the administration system and into
> Delphi, which provide the correct employee numbers column that then is
> copied back into the correct excel column
> that was supposed to be filled in by hand.

Your attempts to solve the issue seem overcomßplicated to me, if I
understood your problem correctly.

Why don't you create a TDictionary where the key is an initial and the
data is the employee number?

Then create an array or a string list and fill it with the desired
initials. Loop over it and fetch the corresponding value from the
dictionary and put that combo out in any way you like.

If that's no good solution I didn't yet properly understand your problem.
Btw. if the data is already in Excel you can access Excel via OLE and
directly copy it from there.

Greetings

Markus