Проектування АІС для обслуговування та ремонту автомобілів

{ Private declarations }.{ Public declarations }.{$R *. dfm}.Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms.Button1Click (Sender: TObject).For i: =1 to DataModule1.Procedure Button1Click (Sender: TObject).While not DataModule1.Add ('and data_oplatu between'+Label1. Caption+DateToStr (dat1) +Label1.Caption+DateToStr (dat2) +Label1.