Link to home
Start Free TrialLog in
Avatar of hidrau
hidrauFlag for Brazil

asked on

Breakpoint doesn't stop in my variable

Hello guys,

I am having a problem with my debug in a unit.
I made a breakpoint on a line and the debug doesn't stop on it.
I want the breakpoint to stop at this variable : Ā  SomaPeso := ValorCampoSQL(User generated imageWhat could it be?

Please, take a look at my code

procedure TTelaEPDLeituraCodbar.SpeedButton1Click(Sender: TObject);
var
SomaQtd : Integer;
SomaPeso: currency;
begin

  if DS01.dataset.fieldbyname('idtexped').asinteger = 0 then
     exit;

  if DS01.dataset.fieldbyname('STATUS').asinteger = 250 then
     exit;

   if not estaeditando(ds01) then
     exit;

  SomaQtd := ValorCampoSQL('',' select SUM(QTDPRO) as valor from Expedicao_Leitura where IDTExped = '+DS01.dataset.fieldbyname('idtexped').asstring+
                              ' and flagbax = 0 ','valor','I');

  SomaPeso := ValorCampoSQL('',' select isnull(SUM(PESO),0) as valor from Expedicao_Leitura where IDTExped = '+DS01.dataset.fieldbyname('idtexped').asstring+
                               ' and flagbax = 0 ','valor','F');

  if (SomaQtd <> 0) and (not Estavazio(SomaPeso)) then
     PesoBruto :=   (SomaQtd * SomaPeso)
  else
    PesoBruto := 0;

  TelaTranspVol := TTelaTranspVol.Create(Application);
  wEstaAlterandoVolume := true;
  TelaTranspVol.ShowModal;
  with TelaTranspVol do begin
     if modalresult =mrok then begin
        TelaTranspVol.close;
     end;
  end;
  wEstaAlterandoVolume := false;
   
end;

Open in new window


Thanks
SOLUTION
Avatar of Geert G
Geert G
Flag of Belgium image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
ASKER CERTIFIED SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of hidrau

ASKER

thanks a lot