• Welcome to Forum.Deepsoftware.Com. Please login or sign up.
 
March 28, 2024, 11:26:11 pm

News:

SMF - Just Installed!


problem USSD command using nrGSM

Started by alegularte, August 25, 2014, 04:42:45 pm

Previous topic - Next topic

alegularte

Hi,

return msg "ERROR" command using nrGSM:

procedure TfrmdirectSMSSend.nrComm1AfterReceive(Com: TObject;
  Buffer: Pointer; Received: Cardinal);
var
  rcv :  AnsiString;
  i : Integer;
begin
  if (vSaldo) then begin
   for i:=0 to Received-1 do
       rcv:=rcv+PAnsiChar(Buffer);
   ShowMessage('Saldo: '+rcv); //HexToBin(
   vSaldo := False;
  end;
end;

program:

Var
   S:String;
Begin
   vSaldo := True;
   nrGsm1.CmdSendAndWaitResult('AT+CUSD=1,"*544#",15'+#13);

regards,

Roman Novgorodov

Hello

Thank you for your information.

The next version of nrComm Lib (9.39 or above) contains following:

TnrGsm.SendUSSD(request:string):boolean; // method for send USSD request
TnrGsm.OnUssd(Sender:TObject; sData:string); // event for handle USSD message

Roman Novgorodov
DeepSoftware llc
DeepSoftware llc - The professional components for Delphi/CBuilder/.NET. The high quality custom software development.
Forums.nrCommLib.Com - DeepSoftware Tech Support Forum.