unRep модулінде implementation секциясына төменде қара шрифтпен берілген жолды қосыныз:
implementation
uses unMain;
{$R *.DFM}
Инспектор объектісінде QuickReport1 формасы үшін енгізу жолын шертіңіз, ол DataSet қасиетіне қажет. Түсірілетін тізімде fmMain.ADOQuery1 мағынасын тандаңыз.
Енді fmMain формасына есеп беру үшін жаңа батырманы орналастырамыз, ол төмендегі суретте көрсетілген:
8-сурет – Миллионнан асқан тұрғындарды фильтрлеу
Name қасиетіне BtnRep батырманы орналастырып, Hint және ShowHint қасиеттері арқылы көмекті орналастырамыз.
Енді BtnRep батырмасын шерткеннен кейін экранда есеп берудің формасы шыққандай әрекет ету қажет. Ол үшін BtnRep батырмасы үшін төменде көрсетілген OnClick оқиғаны өндеушіні құрыңыз:
procedure TfmMain.BtnRepClick(Sender: TObject);
begin
Достарыңызбен бөлісу: |
