Code: Select all
Inc(Count);
ea.Names.Add('CHANGE' + IntToStr(Count) + '=ev' +
Table + ';' + q.SQL.GetText);

How do I do the same with TUniAlerter? Please.
Code: Select all
Inc(Count);
ea.Names.Add('CHANGE' + IntToStr(Count) + '=ev' +
Table + ';' + q.SQL.GetText);
Code: Select all
ea.Names.Clear;
ea.Names.Add('QUEUE=?');
ea.Names.Add('SERVICE=?');
Code: Select all
ea.OnAlert := eaAlert;
ea.Register;