نسخ التدفق الوارد من com
|
نسخ التدفق الوارد من com
|
22-03-2012, 04:52 PM
سلام الله عليكم
حملت مكون comport و به مثال يقوم بالإتصال و نجحت في مشاهدة التدفق الوارد كيف يمكنني أخذ كل تدفق يدخل عبر هذا المنفذ و حفظه ؟
أدبني الدهر فأراني نقص عقلي وإذا ما ازددت علما زادني علما بجهلي
23-03-2012, 07:14 AM
السلام عليكم ورحمة الله
اولا تجنب اخي في التحية قول سلام الله عليم واكتفي بما ورد قد ادرجت هذا الموضوع لك ولمن يحتاجه اتمنى ان يفيدك.كما ان في المنتدى مواضيع عنه على ما اظن http://www.delphi4arab.net/forum/showthr...p?tid=7057
لأستهلنّ الصعب أو أدرك المنى فما انقادت الآمال إلاّ لصابر
28-03-2012, 09:08 AM
بارك الله فيكم إخواني
للقراءة: كود : procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer);
var
Str: String;
begin
ComPort.ReadStr(Str, Count);
Memo.Text := Memo.Text + Str;
end;للحفظ مثلا عن طريق Memo: كود : procedure TForm1.Button1Click(Sender: TObject);
beginMemo.Lines.SaveToFile(ExtractFilePath(Application.ExeName)+
'Fichier.txt');
Memo.Clear;
end;
أدبني الدهر فأراني نقص عقلي وإذا ما ازددت علما زادني علما بجهلي
28-03-2012, 07:05 PM
السلام عليكم
أهلا أخي louay ، من باب الفضول ماهو الجهاز المستعمل ؟ وإذا كان ممكن وضع مثال عن 'التدفق' المشاهد :o
29-03-2012, 10:21 AM
شكرا أخي عبد الجليل
الجهاز المستعمل هو nortel meridian 81c cs1000 وnortel meridian 11c و هو نظام خاص لتحويل المكالمات الهاتفية الثابتة يحتوي على عدة منافذ من بينها COM و منه تستطيع برمجته ليعطيك : -إتصال بالبروسيسور النظام لإجراء صيانة أو تغير -إعطاك CDR (تقرير دقيق عن المكالمات) وهذا هو الذي أشتغل عليه -إلخ مثال عن ذلك في المرفقات.
أدبني الدهر فأراني نقص عقلي وإذا ما ازددت علما زادني علما بجهلي
30-03-2012, 11:21 AM
السلام عليكم
بارك الله فيك أخي louay  بعيد عن مجالي ، و لا أفهم فيه شيئ :confused: بالتوفيق إن شاء الله |
|
|
