Código Delphi [-] // ListBox1.Sorted := True; {si es que no interesa el orden, caso contrario coméntanos} ADOQuery1.SQL.Text := 'select iif(isnull(nm.prefijo),'''',nm.prefijo) + nm.nom + nm.sufijo + '' '' + iif(isnull(m.prefijo),'''',m.prefijo) + m.nom + m.sufijo from muchos nm, muchos m where nm.idtipo = ''NM'' and m.idtipo = ''M'''; // Saludos
// ListBox1.Sorted := True; {si es que no interesa el orden, caso contrario coméntanos} ADOQuery1.SQL.Text := 'select iif(isnull(nm.prefijo),'''',nm.prefijo) + nm.nom + nm.sufijo + '' '' + iif(isnull(m.prefijo),'''',m.prefijo) + m.nom + m.sufijo from muchos nm, muchos m where nm.idtipo = ''NM'' and m.idtipo = ''M'''; // Saludos