LINQ เลือก Distinct ที่มีประเภท Anonymous

ดังนั้นฉันมีชุดของวัตถุ ประเภทที่แน่นอนไม่สำคัญ จากนั้นฉันต้องการแยกคู่ที่ไม่ซ้ำกันของคู่ของคุณสมบัติเฉพาะดังนั้น:

myObjectCollection.Select(item=>new
                                {
                                     Alpha = item.propOne,
                                     Bravo = item.propTwo
                                }
                 ).Distinct();

ดังนั้นคำถามของฉันคือ: ความแตกต่างในกรณีนี้จะใช้วัตถุเริ่มต้นเท่ากับ (ซึ่งจะไร้ประโยชน์กับฉันเนื่องจากวัตถุแต่ละชิ้นเป็นของใหม่) หรือสามารถบอกให้ทำสิ่งต่าง ๆ ได้ (ในกรณีนี้ค่าที่เท่ากันของ Alpha และ Bravo => อินสแตนซ์ที่เท่ากัน)? มีวิธีใดบ้างที่จะบรรลุผลดังกล่าวหากไม่ได้ผล

อ่านโพสต์ที่ยอดเยี่ยมของ K. Scott Allen ได้ที่นี่:

และความเท่าเทียมกันสำหรับทุกคน ... ประเภทที่ไม่เปิดเผยตัว

คำตอบสั้น ๆ (และฉันพูด):

เปลี่ยนคอมไพเลอร์ C # แทนที่ Equals และ GetHashCode สำหรับประเภทที่ไม่ระบุตัวตน การใช้งานวิธีการแทนที่ทั้งสองวิธีใช้คุณสมบัติสาธารณะทั้งหมดบนชนิดเพื่อคำนวณรหัสแฮชของวัตถุและทดสอบความเท่าเทียมกัน หากวัตถุสองชนิดที่ไม่ระบุชื่อเดียวกันมีค่าเหมือนกันทั้งหมดสำหรับคุณสมบัติของพวกเขา - วัตถุนั้นเท่ากัน

ดังนั้นจึงปลอดภัยอย่างยิ่งที่จะใช้วิธี Distinct () ในการสืบค้นที่ส่งคืนชนิดที่ไม่ระบุตัวตน

public class DelegateComparer<T> : IEqualityComparer<T>
{
    private Func<T, T, bool> _equals;
    private Func<T, int> _hashCode;
    public DelegateComparer(Func<T, T, bool> equals, Func<T, int> hashCode)
    {
        _equals= equals;
        _hashCode = hashCode;
    }
    public bool Equals(T x, T y)
    {
        return _equals(x, y);
    }

    public int GetHashCode(T obj)
    {
        if(_hashCode!=null)
            return _hashCode(obj);
        return obj.GetHashCode();
    }       
}

public static class Extensions
{
    public static IEnumerable<T> Distinct<T>(this IEnumerable<T> items, 
        Func<T, T, bool> equals, Func<T,int> hashCode)
    {
        return items.Distinct(new DelegateComparer<T>(equals, hashCode));    
    }
    public static IEnumerable<T> Distinct<T>(this IEnumerable<T> items,
        Func<T, T, bool> equals)
    {
        return items.Distinct(new DelegateComparer<T>(equals,null));
    }
}

var uniqueItems=students.Select(s=> new {FirstName=s.FirstName, LastName=s.LastName})
            .Distinct((a,b) => a.FirstName==b.FirstName, c => c.FirstName.GetHashCode()).ToList();

ขออภัยสำหรับการจัดรูปแบบสับสนก่อนหน้านี้

น่าสนใจว่ามันใช้งานได้ใน C # แต่ไม่ใช่ใน VB

ส่งคืน 26 ตัวอักษร:

var MyBet = "aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ";
MyBet.ToCharArray()
.Select(x => new {lower = x.ToString().ToLower(), upper = x.ToString().ToUpper()})
.Distinct()
.Dump();

ส่งคืน 52 ...

Dim MyBet = "aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ"
MyBet.ToCharArray() _
.Select(Function(x) New With {.lower = x.ToString.ToLower(), .upper = x.ToString.ToUpper()}) _
.Distinct() _
.Dump()

ฉันรันการทดสอบเล็กน้อยและพบว่าถ้าคุณสมบัติเป็นชนิดค่าดูเหมือนว่าจะใช้ได้ หากพวกเขาไม่ใช่ประเภทของค่าความต้องการประเภทนั้นจะมีการใช้งาน Equals และ GetHashCode ของตัวเองเพื่อให้ทำงานได้ ฉันจะคิดว่าเงื่อนไข

คุณสามารถสร้างวิธีการขยายความแตกต่างของคุณเองซึ่งแสดงออกแลมบ์ดา นี่คือตัวอย่าง

สร้างคลาสที่มาจากอินเทอร์เฟซ IEqualityComparer

public class DelegateComparer<T> : IEqualityComparer<T>
{
    private Func<T, T, bool> _equals;
    private Func<T, int> _hashCode;
    public DelegateComparer(Func<T, T, bool> equals, Func<T, int> hashCode)
    {
        _equals= equals;
        _hashCode = hashCode;
    }
    public bool Equals(T x, T y)
    {
        return _equals(x, y);
    }

    public int GetHashCode(T obj)
    {
        if(_hashCode!=null)
            return _hashCode(obj);
        return obj.GetHashCode();
    }       
}

จากนั้นสร้างวิธีการขยายแบบพิเศษของคุณ

public static class Extensions
{
    public static IEnumerable<T> Distinct<T>(this IEnumerable<T> items, 
        Func<T, T, bool> equals, Func<T,int> hashCode)
    {
        return items.Distinct(new DelegateComparer<T>(equals, hashCode));    
    }
    public static IEnumerable<T> Distinct<T>(this IEnumerable<T> items,
        Func<T, T, bool> equals)
    {
        return items.Distinct(new DelegateComparer<T>(equals,null));
    }
}

และคุณสามารถใช้วิธีนี้เพื่อค้นหารายการที่แตกต่าง

var uniqueItems=students.Select(s=> new {FirstName=s.FirstName, LastName=s.LastName})
            .Distinct((a,b) => a.FirstName==b.FirstName, c => c.FirstName.GetHashCode()).ToList();

ถ้าAlphaและทั้งสืบทอดจากระดับธรรมดาที่คุณจะสามารถที่จะสั่งการตรวจสอบความเท่าเทียมกันในระดับผู้ปกครองโดยการใช้BravoIEquatable<T>

ตัวอย่างเช่น:

public class CommonClass : IEquatable<CommonClass>
{
    // needed for Distinct()
    public override int GetHashCode() 
    {
        return base.GetHashCode();
    }

    public bool Equals(CommonClass other)
    {
        if (other == null) return false;
        return [equality test];
    }
}

เฮ้ฉันมีปัญหาเดียวกันและฉันพบวิธีแก้ปัญหา คุณต้องใช้อินเทอร์เฟซ IEquatable หรือเพียงแค่แทนที่ (Equals & GetHashCode) วิธีการ แต่นี่ไม่ใช่กลอุบายเคล็ดลับที่มาในวิธี GetHashCode คุณไม่ควรส่งคืนรหัสแฮชของวัตถุในคลาสของคุณ แต่คุณควรส่งคืนค่าแฮชของคุณสมบัติที่คุณต้องการเปรียบเทียบเช่นนั้น

public override bool Equals(object obj)
    {
        Person p = obj as Person;
        if ( obj == null )
            return false;
        if ( object.ReferenceEquals( p , this ) )
            return true;
        if ( p.Age == this.Age && p.Name == this.Name && p.IsEgyptian == this.IsEgyptian )
            return true;
        return false;
        //return base.Equals( obj );
    }
    public override int GetHashCode()
    {
        return Name.GetHashCode();
    }

อย่างที่คุณเห็นฉันได้คลาสเรียกว่า person มีคุณสมบัติ 3 อย่าง (ชื่อ, อายุ, IsEgyptian "เพราะฉันเป็น") ใน GetHashCode ฉันส่งคืนแฮชของคุณสมบัติ Name ไม่ใช่วัตถุบุคคล

ลองใช้และจะใช้งานได้กับ ISA ขอบคุณ Modather Sadik

เพื่อให้มันทำงานใน VB.NET คุณจะต้องระบุKeyคำหลักก่อนทุกคุณสมบัติในประเภทที่ไม่ระบุชื่อเช่นนี้:

myObjectCollection.Select(Function(item) New With
{
    Key .Alpha = item.propOne,
    Key .Bravo = item.propTwo
}).Distinct()

ฉันดิ้นรนกับสิ่งนี้ฉันคิดว่า VB.NET ไม่รองรับคุณสมบัติประเภทนี้ แต่จริงๆแล้วมันทำ