Question : Listbox question

Hi,

I have a listbox with 3 strings preset:
Name:
SN:
Last recorded:

with the procedure in the code-section is it possible to get it like this:

Name: [Name]
Sn: [SN]
Last recorded: [Dt] + [Tm]

Greetings,

Peter Kiers
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
procedure TForm1.Button1Click(Sender: TObject);
var
  LoopNodes : IDOMNodeList;
  i: Integer;
begin
  XMLDoc.FileName := '.\G1839366.XML';
  XMLDoc.Active := True;
  try
    LoopNodes:= XMLDoc.DOMDocument.getElementsByTagName( 'DEVICE' );
      for i:= 0 to LoopNodes.length -1 do
       listbox1.Items.Add(
       LoopNodes[i].attributes.getNamedItem('Name').nodeValue + ' ' +
       LoopNodes[i].attributes.getNamedItem('SN').nodeValue);

    LoopNodes:= XMLDoc.DOMDocument.getElementsByTagName( 'RECENTREC' );
       for i:= 0 to LoopNodes.length -1 do
       listbox1.Items.Add(
       LoopNodes[i].attributes.getNamedItem('Dt').nodeValue + ' ' +
       LoopNodes[i].attributes.getNamedItem('Tm').nodeValue);
    finally
  XMLDoc.Active := False;
  end;
end;

Answer : Listbox question

I'm sure there is... but as I stated, it's not reasonable.  How could you do it?  As I told someone else asking a question of a similar nature, hire a programmer/hacker who can analyze how Windows does the upgrade to 32 bit, what calls it makes, and so-on and so-forth, and eventually, I'm sure they'll figure out a way.  It may costs 5 or 6 figures... but if you've got the money, nothing is impossible.

Put simply, as others and myself have stated in one way or another - and I'll restate for a second time in this comment - there is NO REASONABLE way of doing this.  That is your answer.  No reasonable technician (as I would define them) would spend any significant time trying to do this so it's HIGHLY unlikely you'll find ANYONE, especially anyone here, who has found a way of doing it - reasonable or otherwise.  Experts-Exchange is a great place to find answers to questions and problems that impact a business or your ability to use a system.  When you want to do something that no one thinks is a good idea or even possible, you'll almost certainly not find an answer you're satisfied with even when the answers provided are, lacking further evidence to the contrary, 100% accurate.
Random Solutions  
 
programming4us programming4us