Advertisement
Guest User

Untitled

a guest
Jan 14th, 2020
112
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.34 KB | None | 0 0
  1.    Form1.Query4.SQL.Add('select narush.name_narush, protocol.summ_shtraf');
  2.    Form1.Query4.SQL.Add('from narushitel, narush, protocol');
  3.    Form1.Query4.SQL.Add('where protocol.n_narushitel = Narushitel.n_Narushitel and protocol.kod_narush=narush.kod_narush and narushitel.fio = :N');
  4.    Form1.Query4.ParamByName('N').Value:=Form5.Edit1.Text;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement