Frage : DELPHI 2010 -- INDY 9 oder INDY 10

als Tragen einer komplizierten Anwendung von Delphi 7 nach Delphi I#m bemüht Fighting 2010 die Zusammenstellung meines Code
again.

is die indy Materialversion 9 oder 10, die mit meinem D2010?? kommt?


copyright:
(c) 1993-2005, Tschad Z. Hower und die Indy Gruben-Mannschaft. Alles Rechte reserved.
}
{
$Log$
}
{
Rev 1.38 1/15/05 2:14: 58 entferntes virtuelles Spezifikationselement P.M.-RLebeau
von SetConnectTimeout () und von SetReadTimeout (), not
, das durch irgendein descendants.
 verwendet wird 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:

TIdTCPClientCustom = Kategorie (TIdTCPConnection)
  geschützt
    FBoundIP: Schnur;
    FBoundPort: TIdPort;
    FBoundPortMax: TIdPort;
    FBoundPortMin: TIdPort;
    FConnectTimeout: Ganze Zahl;
    FDestination: Schnur;
    FHost: Schnur;
    FIPVersion: TIdIPVersion;
    FOnConnected: TNotifyEvent;
    FPassword: Schnur;
    FPort: TIdPort;
    FReadTimeout: Ganze Zahl;
    FUsername: Schnur;
    FReuseSocket: TIdReuseSocket;
    //
    FOnBeforeBind: TNotifyEvent;
    FOnAfterBind: TNotifyEvent;
    FOnSocketAllocated: TNotifyEvent;
    //
    Verfahren DoOnConnected; virtuell;
    Funktion MakeImplicitClientHandler: TIdIOHandler; virtuell;
    //
    Verfahren SetConnectTimeout (const AValue: Ganze Zahl);
    Verfahren SetReadTimeout (const AValue: Ganze Zahl);
    Verfahren SetReuseSocket (const AValue: TIdReuseSocket);
    Verfahren SetBoundIP (const AValue: Schnur);
    Verfahren SetBoundPort (const AValue: TIdPort);
    Verfahren SetBoundPortMax (const AValue: TIdPort);
    Verfahren SetBoundPortMin (const AValue: TIdPort);
    Verfahren SetHost (const AValue: Schnur); virtuell;
    Verfahren SetPort (const AValue: TIdPort); virtuell;
    Verfahren SetIPVersion (const AValue: TIdIPVersion); virtuell;
    //
    Verfahren SetOnBeforeBind (const AValue: TNotifyEvent);
    Verfahren SetOnAfterBind (const AValue: TNotifyEvent);
    Verfahren SetOnSocketAllocated (const AValue: TNotifyEvent);
    //
    Verfahren SetIOHandler (AValue: TIdIOHandler); Übersteuerung;
    Verfahren InitComponent; Übersteuerung;
    //
    Funktion GetReadTimeout: Ganze Zahl;
    Funktion GetReuseSocket: TIdReuseSocket;
    //
    Eigentum Wirt: Schnur las FHost schreiben SetHost;
    Eigentum IPVersion: TIdIPVersion las FIPVersion schreiben SetIPVersion;
    Eigentum Kennwort: Schnur las FPassword schreiben FPassword;
    Eigentum Hafen: TIdPort las FPort schreiben SetPort;
    Eigentum username: Schnur las FUsername schreiben FUsername;
  Öffentlichkeit
    Verfahren schließen an; Überlastung; virtuell;
    // dieses wird und nicht als Rückstellung Params damit Nachkommen aufgehoben
    // müssen nicht um die Argumente sich sorgen.
    // auch ist weiter aufgespaltet worden, um Verbrauch von C# zu erlauben, da es nicht wahlweise freigestelltes hat
    //params
    Verfahren schließen an (const AHost: Schnur); Überlastung;
    Verfahren schließen an (const AHost: Schnur; const APort: TIdPort); Überlastung;
    Funktion ConnectAndGetAll: Schnur; virtuell;
    //
    Eigentum BoundIP: Schnur las FBoundIP schreiben SetBoundIP;
    Eigentum BoundPort: TIdPort las FBoundPort schreiben SetBoundPort Rückstellung DEF_PORT_ANY;
    Eigentum BoundPortMax: TIdPort las FBoundPortMax schreiben SetBoundPortMax Rückstellung DEF_PORT_ANY;
    Eigentum BoundPortMin: TIdPort las FBoundPortMin schreiben SetBoundPortMin Rückstellung DEF_PORT_ANY;
    //
    Eigentum ConnectTimeout: Ganze Zahl las FConnectTimeout schreiben SetConnectTimeout;
    Eigentum ReadTimeout: Ganze Zahl las GetReadTimeout schreiben SetReadTimeout;
    Eigentum ReuseSocket: TIdReuseSocket las GetReuseSocket schreiben die rsOSDependent SetReuseSocket Rückstellung;
    //
    Eigentum OnBeforeBind: TNotifyEvent las FOnBeforeBind schreiben SetOnBeforeBind;
    Eigentum OnAfterBind: TNotifyEvent las FOnAfterBind schreiben SetOnAfterBind;
    Eigentum OnSocketAllocated: TNotifyEvent las FOnSocketAllocated schreiben SetOnSocketAllocated;
    //
  veröffentlicht
    Eigentum OnConnected: TNotifyEvent las FOnConnected schreiben FOnConnected;
  Ende;

Antwort : DELPHI 2010 -- INDY 9 oder INDY 10

Vor AFAIK ist noch wohles gestützt (letzte Entwickler-Freigabe ist 25. Juli, wenigen Tagen http://indy.fulgan.com/zip/)

Die Version 10 war für Kompatibilität und implamentations mit .net erforderlich. Das ist, warum es so viele Unterschiede zwischen 9 und 10 gibt, aber ich bin recht sicher, dass der Stütznoch Wille für lange Zeit existiert.
Weitere Lösungen  
 
programming4us programming4us