|
Welcome to the GSM-Forum forums. You are currently viewing our boards as a guest which gives you limited access to view most discussions and access our other features. Only registered members may post questions, contact other members or search our database of over 8 million posts. Registration is fast, simple and absolutely free so please - Click to REGISTER! If you have any problems with the registration process or your account login, please contact contact us . |
|
Register | FAQ | Donate | Forum Rules | Root any Device | ★iPhone Unlock★ | ★ Direct Codes ★ | Direct Unlock Source |
GSM Programming & Reverse Engineering Here you can post all Kind of GSM Programming and Reverse Engineering tools and Secrets. |
| LinkBack | Thread Tools | Display Modes |
05-14-2019, 16:18 | #2 (permalink) | |
No Life Poster Join Date: Feb 2006 Location: Caribbean
Posts: 1,034
Member: 237911 Status: Offline Thanks Meter: 632 | in .Net: Quote:
| |
05-17-2019, 04:01 | #3 (permalink) |
Junior Member Join Date: Jan 2019 Location: cayman islands
Posts: 39
Member: 2889809 Status: Offline Thanks Meter: 10 | For delphi var iPos : integer; result , str : string; begin ComPort1.Port:='\\.\' + MODEMPORT; ComPort1.CustomBaudRate:=115200; if ComPort1.Connected then ComPort1.Close; ComPort1.Open; if ComPort1.Connected then begin WritePortString('41 54 2B 43 47 4D 52 0D 0A'); Application.ProcessMessages; sleep(100); form1.ComPort1.ReadStr(result, 200); result:= strtohex(result); iPos := Pos ('0D0A', result); if (iPos > 0) then begin SW := hextostr(Copy(result, iPos + 4, length(result)-20)); sMemo1.Lines.Add('Firmware Version : ' + SW); end; |
The Following User Says Thank You to temporary1221 For This Useful Post: |
Bookmarks |
| |
|