Showing posts with label BlackBerry. Show all posts
Showing posts with label BlackBerry. Show all posts

9900 9930 Measurement Point

By Librarian | At 23:21 | Label : , | 0 Comments

9810 Measurement Point

By Librarian | At 23:19 | Label : , | 0 Comments

9800 Measurement Point

By Librarian | At 23:18 | Label : , | 0 Comments

9700 9780 Measurement Point

By Librarian | At 23:17 | Label : , | 0 Comments

9630 Measzurement Point

By Librarian | At 23:14 | Label : , | 0 Comments

9550 Measurement Point

By Librarian | At 23:12 | Label : , | 0 Comments

9500 Measurement Point

By Librarian | At 22:54 | Label : , | 0 Comments

9360 Measurement Point

By Librarian | At 22:53 | Label : , | 0 Comments

9300 Measurement Point

By Librarian | At 22:52 | Label : , | 0 Comments

9100 9105 Measurement Point

By Librarian | At 22:46 | Label : , | 0 Comments

9000 Measurement Point

By Librarian | At 22:45 | Label : , | 0 Comments

8900 Measurement Point

By Librarian | At 22:44 | Label : , | 0 Comments

8530 Measurement Point

By Librarian | At 22:38 | Label : , | 0 Comments

8520 Measurement Point

By Librarian | At 22:35 | Label : , | 0 Comments

8310 8320 Measurement Point

By Librarian | At 22:33 | Label : , | 0 Comments

8220 Measurement Point

By Librarian | At 22:30 | Label : , | 0 Comments

Some BlackBerry Hardware Trick

By Librarian | At 09:21 | Label : , | 0 Comments
8520 Camera Failed
8520 Keypad Problem
8520 Signal SOS
9100 9105 No LCD Light Jumper
9220 LCD Light
9360 Restart
9380 Orlando Simcard Ways
9700 Lcd Blur
9780 Restart While Charging
9790 BELLAGIO Red Blink
9800 Blank While Slide
9860 Monza Fake Carging

Read Imei Pin Mep BlackBerry Complete Source

By Librarian | At 07:54 | Label : , | 0 Comments

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ActiveX, StdCtrls, RIMRADIOCOMLib_TLB, Buttons;
type
  TForm1 = class(TForm)
    SpeedButton1: TSpeedButton;
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    procedure SpeedButton1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
  i: Cardinal;
  SwPartList: IGetSwPartList;
  PartList: PSafeArray;
  RRO: TRIMRadioObj;
  Connection: IConnection;
  IMEI: IReadIMEI;
  StrImei: WideString;
  pl: WideString;
  BBPIN: IReadBBPIN;
  edtClipBoard: TEdit;
begin
  // Create RIM Radio Object
  RRO := TRIMRadioObj.Create(Form1);
  // Query different interfaces to see if are supported
  // if OK then read desired information
  if RRO.DefaultInterface.QueryInterface(IID_IConnection, Connection) = S_OK then
  begin
    // Connect to phone
    Connection.Connect('USB', 300, 19200, '');
    // Read BBPIN
    if (Connection.IsConnected = 1) and (RRO.DefaultInterface.QueryInterface(IID_IReadBBPIN, BBPIN) = S_OK) then
    begin
      // Use IntToHex(BBPIN.Execute,6) to show BBPIN
      Edit3.Text := IntToHex(BBPIN.Execute,6);
    end;
    // IMEI
    if (Connection.IsConnected = 1) and (RRO.DefaultInterface.QueryInterface(IID_IReadIMEI, IMEI) = S_OK) then
    begin
      IMEI.Execute(StrImei);
      Edit1.Text := StringReplace(StrImei, '/', '', [rfReplaceAll]);
    end;
    // PartList
    if (Connection.IsConnected = 1) and (RRO.DefaultInterface.QueryInterface(IID_IGetSwPartList, SwPartList) = S_OK) then
    begin
      SwPartList.Execute(PartList);
      for i:=0 to PartList.rgsabound[0].cElements-1 do
      begin
         SafeArrayGetElement(PartList, i, pl);
         // From all partlist info just show MEP
         if Pos('MEP', pl) > 0  then
           Edit2.Text := pl;
      end;
    end;
    // Create a TEdit to put IMEI + MEP together and paste it to clipboard
    edtClipBoard := TEdit.Create(Form1);
    edtClipBoard.Parent := Form1;
    edtClipBoard.Text := 'IMEI:' + Edit1.Text + ' MEP:' + Edit2.Text;
    edtClipBoard.SelectAll;
    edtClipBoard.CopyToClipboard;
    edtClipBoard.Free;
    // Finish then disconnect interface
    Connection.Disconnect;
  end;
  // Release Rim Radio Object
  RRO.Free;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Edit1.Text:='';  Edit2.Text:='';  Edit3.Text:='';
end;
end.

Rapido Installer PlayBook 2.0.1.358

By Librarian | At 23:00 | Label : , , | 0 Comments

When we update our PlayBook failed via online, chose this installer to update offline.
Download Link :
Part1
Part2
Part3
Part4
Part5
Older Post ►
 

Copyright © 2012. Gsm Library - All Rights Reserved K-Theme by Vinno