Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Prism VB.NET in Delphi.NET (https://www.delphipraxis.net/36032-vbulletin-net-delphi-net.html)

Curse4Life 14. Dez 2004 21:52


VB.NET in Delphi.NET
 
Kann mir jemand diese beiden Zeilen in Delphi übersetzen, ich kenne dieses cType nicht ;(

Code:
Dim Arr As ArrayList = CType(Ser.Deserialize(Reader), ArrayList)
Dim x1 As X = CType(Arr(0), X)

mfg

Robert_G 14. Dez 2004 22:08

Re: VB.NET in Delphi.NET
 
Zitat:

Zitat von Curse4Life
ich kenne dieses cType nicht ;(

Das ist jetzt ein Witz, oder? :shock:
Du hast nicht einmal danach in der SDK Doku gesucht, oder? Das kann eigentlich nicht sein, dort hättest du es sicher unter Rang 1 gefunden. :roll:

BTW: Du hast dir mit VB.Net die hässlichste Herkunft für deine Sources gefunden. CType ist nur ein Beispiel dafür, wie scheußlich die Syntax von VB.Net ist.

ZeroQool007 20. Feb 2006 13:38

Re: VB.NET in Delphi.NET
 
Hallo, habe so ein ähnliches Problem.
Zitat:

CType-FunktionSiehe auch
Funktionen für die Typkonvertierung
Gibt das Ergebnis der expliziten Konvertierung eines Ausdrucks in einen angegebenen Datentyp, ein Objekt, eine Struktur, eine Klasse oder eine Schnittstelle zurück.


VB.net COde
Delphi-Quellcode:
        Dim OrderResponse As TxmlOrdRsp
        OrderResponse = CType(XMLHelper.GetObjectFromXML(GetType(TxmlOrdRsp), ResponseDoc), TxmlOrdRsp)

umgewandelt in Delphi .net
Delphi-Quellcode:
OrderResponse := XMLHelper.GetObjectFromXML(TypeOf(TxmlOrdRsp), TempAntwort) AS TxmlOrdRsp;
oder
Delphi-Quellcode:
OrderResponse := TxmlOrdRsp(XMLHelper.GetObjectFromXML(TypeOf(TxmlOrdRsp), TempAntwort));


Ich kann zwar beide Varianten problemlos kompilieren, aber sobald ich an der Zeile ankomme kommt der Programmabsturz bzw er springt in die except Anweisung. big thx


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:58 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz