2 TADOQueries

[[cHackAll]]

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