دخول

mobile · 07-04-2021, 06:08 PM

سهلة ان شاء الله

ما نوع الهاتف الذي التريد ؟ المديل

**أبو معاذ** · 07-04-2021, 07:51 PM

(07-04-2021, 06:08 PM)mobile كتب : سهلة ان شاء الله

ما نوع الهاتف الذي التريد ؟ المديل

سهل الله أمورك.

الهاتف الذي أريد هو redmi note 7.

**أبو معاذ** · 09-04-2021, 05:12 PM

السلام عليكم.
لازلت أنتظر الرد ، بارك الله فيكم.

mobile · 10-04-2021, 06:20 PM

(09-04-2021, 05:12 PM)أبو معاذ كتب : السلام عليكم.
لازلت أنتظر الرد ، بارك الله فيكم.

;وعليكم السلام ورحمة الله
اسف على التاخير لي ظروف .
اما جهازك فبمجرد ربطه على الانترنت ينصب لا داعي لارسال تعريفات لانه جديد

كود :
procedure Tform_Starter.Button8Click(Sender: TObject);
var
  n:Integer ;
begin
  ComPort.Port:='COM3' ;
  ComPort.BaudRate:=br9600 ;
  ComPort.Parity.Bits:=prNone  ;
  ComPort.DataBits:=dbEight ;
  ComPort.StopBits:=sbOneStopBit ;
  ComPort.Open ;
  if ComPort.Connected then
    memo_Text.lines.add('Connected')
  else
    memo_Text.lines.add('Not Connected') ;

  sleep(4000) ;

  sysSndStr:='AT+CMGF=1'+#13#10 ;
  n:=ComPort.WriteStr(sysSndStr) ;
  memo_Text.lines.add(IntToStr(n)) ;
  sleep(4000) ;


  sysSndStr:='AT+CMGS="9867015256"'+#13#10+'"HI"'+#26+#13#10 ;
  n:=ComPort.WriteStr(sysSndStr) ;
  memo_Text.lines.add(IntToStr(n)) ;

  sleep(4000) ;

  ComPort.Close  ;
end

**أبو معاذ**

جزاك الله خيرا.
قيل أن العلم ضاع بين مستحي و متكبر.
وبإذن الله لن يمنعني الحياء على طرح الأسئلة حتى و إن كانت عند البعض تافهة، حتى أتعلم هذه الجزئية.
أليس هاتفي موصول بمنفذ usb ؟
فكيف يمكنني التعامل مع المنفذ com؟

mobile · 10-04-2021, 10:53 PM

اسف لضيق وقتي
https://delphi4arab.net/forum/showthread...9#pid53049

يقال عندنا "خيرك سبق" انت صاحب الفضل

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة