Comment ajouter une ligne dans un ListBox avec 
le message  LB_ADDSTRING

    SendMessage(
            listbox1.Handle,
            LB_ADDSTRING,
            0,
            integer(pchar('http://u.p.s.free.fr')));