![]() |
|
مولد التقارير fastrepot لا يتعرف على dataset - نسخة قابلة للطباعة +- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum) +-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3) +--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15) +--- الموضوع : مولد التقارير fastrepot لا يتعرف على dataset (/showthread.php?tid=3594) |
مولد التقارير fastrepot لا يتعرف على dataset - daho28 - 13-11-2011 السلام عليكم المشكل في مولد التقارير fastrepot لا يتعرف على dataset علما أن النسخة 4 الدلفي 7 قاعدة البيانات absolute هل يمكن أن أجد حلا؟ مشكروين. مولد التقارير fastrepot لا يتعرف على dataset - Lam.Abdeldjalil - 14-11-2011 وعليكم السلام و رحمة الله تابع الرابط ربما يفيدك كود : http://www.componentace.com/reports-fast-report-delphi.htm
unit Main;
interface
{$I CompVer.inc}
uses
{$IFDEF D6H}
Variants,
{$ENDIF}
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, DBCtrls, Grids, DBGrids, DB, ABSMain,
frxClass, frxDBSet;
const DataBaseFileName: String = '..\..\Data\Demos.abs';
type
TForm1 = class(TForm)
dbDemos: TABSDatabase;
ABSTable1: TABSTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
DBNavigator1: TDBNavigator;
Button1: TButton;
frxDBDataset1: TfrxDBDataset;
GroupBox1: TGroupBox;
Label1: TLabel;
frxReport1: TfrxReport;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
dbDemos.DatabaseFileName := ExtractFilePath(Application.ExeName) + DataBaseFileName;
ABSTable1.Open;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
frxReport1.ShowReport;
end;
end. |