.NET Framework

Απ: Type Casting μέσω παραμέτρου Type

George J. Capnias — Fri, 25 Nov 2005 00:20:54 GMT

kkara wrote:
GMT... Πάλι άργησε ο RSS Reader μου και δεν πρόφτασα να απαντήσω... Να κάνουμε διαγωνισμό για το πιο γρήγορο reply

Το έχω ξανακούσει για το εγχείρημα αυτό, πριν από κάτι χρόνια - Σωτήρη θυμάσαι;

Τότε για να κερδίσουν κάποιοι, έβαζαν μια ερώτηση και απάνταγαν στον ευατό τους! Μην φτάσουμε σε τέτοια επίπεδα, ε;

George J.

Απ: Type Casting μέσω παραμέτρου Type

kkara — Thu, 24 Nov 2005 23:55:39 GMT

GMT... Πάλι άργησε ο RSS Reader μου και δεν πρόφτασα να απαντήσω... Να κάνουμε διαγωνισμό για το πιο γρήγορο reply

Απ: Type Casting μέσω παραμέτρου Type

npoulis — Thu, 24 Nov 2005 23:42:03 GMT

Αχ καλα θα ηταν αλλα απο οσο εχω δει αλλες ερωτησεις, μονο περισσοτερες μου δημιουργουν.... Θελω δουλεια ακομα~!!!!!!! Παντως την ψαχνω πυρετωδως!

Απ: Type Casting μέσω παραμέτρου Type

cap — Thu, 24 Nov 2005 23:31:17 GMT

ΧΑΧΑΧΑ!

Το καλύτερο που έχω ακούσει μέχρι στιγμής!

Ε ναι λοιπόν, ανακάλυψες το μυστικό μας! Διαθέτουμε μια ειδικευμένη δύναμη commandos που επιτίθεται σε κάθε νέα ερώτηση και την αποτελειώνει σε χρόνο dt. :)

Βασικά το ευτύχημα είναι ότι είμαστε μια μεγάλη ομάδα από ανθρώπους πρόθυμους να βοηθήσουν με ο,τι γνωρίζει ο καθένας, και η οποία περιλαμβάνει ατομα με διαφορετικές εμπειρίες και ειδικεύσεις. Μαντεψε, είσαι και εσύ μέλος της ομάδας αυτής! :)

Απ: Type Casting μέσω παραμέτρου Type

npoulis — Thu, 24 Nov 2005 23:22:58 GMT

Πρέπει να παίζει reply task force στο φόρουμ αλλιώς δεν εξηγούνται οι γρήγορες απανήσεις ετσι? ;)

Απ: Type Casting μέσω παραμέτρου Type

Παναγιώτης Καναβός — Thu, 24 Nov 2005 23:10:51 GMT

Αυτό που περιγράφεις δεν είναι type-casting αλλά δυναμική δημιουργία ενός αντικειμένου. Δες τη συζήτηση 3 τρόποι να κάνεις new για τις δυνατές λύσεις και την ταχύτητα της καθεμίας.

Απ: Type Casting μέσω παραμέτρου Type

npoulis — Thu, 24 Nov 2005 23:07:42 GMT

Για να είμαι πιο συγκεκριμένος κολλάω φτιάχνοντας αυτο..... το προηγούμενο παράδειγμα ειναι ανούσιο....

Public Function ReadCollection(ByVal CollectionName As String, ByVal CollectionItemsType As Type, Optional ByVal Relation As CollectionType = CollectionType.OneToMany) As ArrayList
Dim command As SqlCommand
Dim detail_ds As New DataSet

ReadCollection = New ArrayList

If Relation = CollectionType.OneToMany Then
      command = New SqlCommand("SELECT tdetail.* FROM " & Me.GetType.Name & " AS tmaster JOIN " _
      & CollectionName & " AS tdetail ON tmaster.RID=tdetail." & Me.GetType.Name & "RID ")
Else
command = New SqlCommand("SELECT tdetail.* FROM " & Me.GetType.Name & " AS tmaster " & _
                  "INNER JOIN " & CollectionName & " AS trelation ON tmaster.RID=trelation." & Me.GetType.Name & "RID " & _
                  "INNER JOIN " & CollectionItemsType.Name & " AS tdetail ON " & CollectionItemsType.Name & "RID=tdetail.RID")
End If

cn.Open()
command.Connection = cn
da.SelectCommand = command
da.Fill(detail_ds)
cn.Close()

Dim collection_item As New Object

collection_item = 'ΕΔΩ ΤΙ ΠΡΕΠΕΙ ΝΑ ΚΑΝΩ , Ο σκοπός είναι το collection_item να γίνει τυπου ότι φέρει η CollectionItemsType.

Dim properties As System.Reflection.PropertyInfo() = CollectionItemsType.GetType.GetProperties()

For Each row As Data.DataRow In detail_ds.Tables(0).Rows
      For Each p As System.Reflection.PropertyInfo In properties
            If p.PropertyType.ToString() <> "System.Collections.ArrayList" Then _
                  p.SetValue(CollectionItemsType, row.Item(p.Name), Nothing)
      Next p
      ReadCollection.Add(CollectionItemsType)
Next row

End Function

Type Casting μέσω παραμέτρου Type

npoulis — Thu, 24 Nov 2005 22:59:19 GMT

Ρε παιδια για δωστε μου τα φωτα σας.

Το ζητούμενο ειναι η παρακατω Sub να δημιουργεί ενα object σε οτι τυπο δωσουμε.

Private Sub DoThis(Byval obj as object, Byval mytype As Type)

obj = new ???

'Με Ctype ουτε λογος να γινεται, επίσης obj = new mytype δεν παιζει

End Sub

Πως το κάνουμε?