Add multiple properties to ListView1

[gambafeliz]

I have this line that works:

ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor]).Foreground = Color.RGB(255, 0, 125) 
' ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor]).RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"  (This works but I don't want to do it like this)

But I want to add .Font.Bold = True but how would it be done if possible.

Thank you.

[gambafeliz]

My solution:

               With ListView1
                  .Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
                  .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
                  .Font.Bold = True
               End With  

Note: (This solution does not work for the individual addition therefore it is not a valid solution. It is valid for all items)

[BruceSteers]

My solution:

               With ListView1
                  .Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
                  .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
                  .Font.Bold = True
               End With  

Note: (This solution does not work for the individual addition therefore it is not a valid solution. It is valid for all items)

You're pretty close...
If you mix your 2 solutions together you will get this...

               With ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
                  .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
                  .Font.Bold = True
               End With  

[gambafeliz]

Thank you very much for your always effort. Thank you.

With ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
   .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
   .Font.Bold = True 'Here
End With 

But right on the line that I indicated, the Subroutine is exited. As if an error occurred. I don't know what's happening yet. But this gives an error, when I do what you tell me, in fact I already tried it but since it failed me, I have left it, because it is impossible for the moment.

Note: Error.Code = 13 = Null object

[BruceSteers]

Thank you very much for your always effort. Thank you.

With ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
   .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
   .Font.Bold = True 'Here
End With 

But right on the line that I indicated, the Subroutine is exited. As if an error occurred. I don't know what's happening yet. But this gives an error, when I do what you tell me, in fact I already tried it but since it failed me, I have left it, because it is impossible for the moment.

Note: Error.Code = 13 = Null object

You are correct, the .Font property does not seem to be initialized , so accessing it's .Bold property throws an error.

So this works...

With ListView1.Add(resultado["ID"], resultado["Name"], Picture[$sNoMonitor])
   .Foreground = Color.RGB(255, 0, 125) '.RichText = "<b style='color:rgb(255,0,125);'>" & resultado["Nombre"] & "</b>"
   .Font = ListView1.Font  ' initalize the Font property
   .Font.Bold = True '  okay now
End With 

[gambafeliz]

Thanks, it works perfectly.
You do know about Gambas programming.

That's if I painted the wall in my living room, maybe I wouldn't call you.