PDA

View Full Version : سوال: اموزش گزارش گیری rave report



hentjanson
پنج شنبه 26 اردیبهشت 1387, 14:41 عصر
سلام چطور میشه از برنامه گزارش گرفت من تازه کارم می خوام وقتی روی یک رکورد کلیک کردم و دکمه گزارش رو زدم گزارش و اطلاعات همون رکورد بیاد نه تمام رکورد های جدول میشه کمکم کنید

gp.ehsan
دوشنبه 21 بهمن 1387, 07:15 صبح
باید یک پارامتر sn برای stored proc2 تعریف کرده و با کلیک بر روی رکورد آن را مقدار دهی کنیم .
محتویات storedproc 2 :
@sn int
select * from table1
where sn=@sn

محتویات storedproc 1 :
select * from table1

RvDataSetConnection را هم باید با storedproc2 مقدار دهی کنیم.
سپس در tools/rave disigner یک فایل rave بسازیم و آدرس آنرا به rvproject1 بدهیم .



unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, ADODB, RpCon, RpConDS, RpDefine, RpRave,
StdCtrls;
type
TForm1 = class(TForm)
RvProject1: TRvProject;
RvDataSetConnection1: TRvDataSetConnection;
ADOConnection1: TADOConnection;
raveaksha: TADOStoredProc;
spaksha: TADOStoredProc;
raveakshaAksName: TWideStringField;
raveakshaAksImage: TBlobField;
spakshasn: TLargeintField;
spakshaaksname: TWideStringField;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Button1: TButton;
procedure DBGrid1CellClick(Column: TColumn);
procedure FormActivate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
adostoredproc1.Close;
adostoredproc1.Parameters.ParamByName('@sn').Value :=adostoredproc2sn.Value;
adostoredproc1.ExecProc;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
adostoredproc2.close; {برای نشان دادن اطلاعات sp}
adostoredproc2.Open;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
adostoredproc1.Close;
adostoredproc1.Open;
RvProject1.Open;
RvProject1.Execute;
end;
end.

data.enginer
چهارشنبه 23 بهمن 1387, 21:23 عصر
اگة ميشه با يك مثال كار كردن با fastreport رو آموزش بديد

Batman
چهارشنبه 23 بهمن 1387, 22:48 عصر
اگة ميشه با يك مثال كار كردن با fastreport رو آموزش بديد
دوست عزیز میتونید از demo های خود fr استفاده کنید.
موفق باشید.

DelphiFriend
چهارشنبه 07 اسفند 1387, 12:27 عصر
یه راه راحت تر هست. میتونید با دستورات فیلتر اون سطر مورد نظر رو در جدول فیلتر کنید بعد با یه گزارش گیری که ساختید همون سطر رو چاپ کنید. مثلا اگه شما یه جدول با 20 سطر دارید اگه گزارش گیری رو بزنید همه 20 سطر چاپ میشند ولی اگه 1 یا چند سطرش با دستورات فیلتر ، فیلتر بشند فقط همون سطر ها چاپ میشند.
موفق باشید.