بمب منطقی
چهارشنبه 05 اسفند 1383, 23:42 عصر
من با دستورات زیر سعی دارم یک رکورد رو به QuickReport بشناسونم تا فیلدهای اونو چاپ کنه. ولی عوض اینکه رکورد مشخص شده رو بر فرض Preview کنه رکورد اول رو Preview میکنه(در QR.Preview):
من روی فرم QR یک QRBand دارم از نوع TItle و یک SubDetail هم دارم که روش بر فرض 4-5 تا QRDBtext دارم که اونا رو هم با بعضی فیلدهای جدولم ست کردم. DataSet هم QRRep و هم QRSubDetail برابر ADOTable .
حالا اگه میشه منو تو تکه کد زیر راهنمایی کنید:
procedure TForm1.Button1Click(Sender: TObject);
begin
Quickreport2.Dataset.open;
QuickReport2.DataSet.Locate('Melk_ID;Block_ID;Mant aghe_ID',vararrayof(['123','123','123']),
[loPartialKey]);
Quickreport2.Preview;
end;
با تشکر فراوان :flower: :flower:
من روی فرم QR یک QRBand دارم از نوع TItle و یک SubDetail هم دارم که روش بر فرض 4-5 تا QRDBtext دارم که اونا رو هم با بعضی فیلدهای جدولم ست کردم. DataSet هم QRRep و هم QRSubDetail برابر ADOTable .
حالا اگه میشه منو تو تکه کد زیر راهنمایی کنید:
procedure TForm1.Button1Click(Sender: TObject);
begin
Quickreport2.Dataset.open;
QuickReport2.DataSet.Locate('Melk_ID;Block_ID;Mant aghe_ID',vararrayof(['123','123','123']),
[loPartialKey]);
Quickreport2.Preview;
end;
با تشکر فراوان :flower: :flower: