delphi4arab منتديات دلفي للعرب - استفسآر عن الحدث OnConnect في IdTCPServer ؟

السلام عليكم ورحمة الله

اخوآني الكرآم

كنت اتآبع درس اليوم من كتآب ماسترينج دلفي ويتحدث فيه عن اخآدم و العميل,, اي سيرفر و كليانت,,

ووصل لحد انه بدئ يستخدم الآمر Connect ,, الكود التآلي,,

إقتباس :procedure TFormServer.IdTCPServer1Connect(AThread: TIdPeerThread);
begin
lbLog.Items.Add ('Connected from: ' +
AThread.Connection.Socket.Binding.PeerIP);
end;

لآحظوا AThread: TIdPeerThread ولكن عندي في نفس الحدث يظهر

إقتباس :(AContext: TIdContext);

وكذلك هو الحآل مع بآقي الأحدآث,,

ما الخلل بارك الله لكم ؟

لا يوجد خلل لأنو تم استبدال ال Athread في ال Indy 10 بال AContext

و التعليمة تصبح
AContext.Binding.PeerIP

o15s19 كتب :لا يوجد خلل لأنو تم استبدال ال Athread في ال Indy 10 بال AContext

و التعليمة تصبح
AContext.Binding.PeerIP

شكرا لك اخي على التوضيح,,

لكن يبدوا هناك خلل عندي ؟؟ عذرا على الخروج من الموضوع نسبياًَ,,,

لاحظ ال اليونيت,.,

PHP كود :
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdBaseComponent, IdComponent, IdCustomTCPServer, IdTCPServer;

type
  TForm1 = class(TForm)
    IdTCPServer1: TIdTCPServer;
 procedure IdTCPServer1Connect(AContext: TIdContext);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.IdTCPServer1Connect(AContext: TIdContext);
begin
self.Caption:= 'Connect';
end;

end. 

و الخلل كما في الدلفي هو

إقتباس :[DCC Error] Unit1.pas(12): E2003 Undeclared identifier: 'TIdContext'
[DCC Error] Unit1.pas(26): E2005 'TIdContext' is not a type identifier
[DCC Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

بارك الله لكم

AL-MOB4RM3G كتب :و الخلل كما في الدلفي هو

[DCC Error] Unit1.pas(12): E2003 Undeclared identifier: 'TIdContext'
[DCC Error] Unit1.pas(26): E2005 'TIdContext' is not a type identifier
[DCC Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

أخي الكريم ضع IdContext في Uses و ستحل المشكلة إن شاء الله

o15s19 كتب :أخي الكريم ضع idcontext في uses و ستحل المشكلة إن شاء الله

نعم بارك الله فيك اخي الكريم,, اشكرك كثيرا,,
سبحان الله,, الأمر كان بهذه السهولة ومع ذلك لم يخطر هذا في بالي,,,
اشكرك اخي الكريم كثيرا,, لأني كنت على وشك ان افقد صوآبي والله المستعان,,