Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.04.2010, 11:19   #1
Gsingle
Пользователь
 
Регистрация: 31.03.2010
Сообщений: 19
Восклицание в чем ошибка?..

Код:
unit Komanda;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Mask, DBCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls;

type
  TForm1 = class(TForm)
    Table1: TTable;
    DataSource1: TDataSource;
    Table2: TTable;
    DataSource2: TDataSource;
    Label1: TLabel;
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    DBEdit3: TDBEdit;
    DBNavigator1: TDBNavigator;
    DBGrid1: TDBGrid;
    Label3: TLabel;
    Label2: TLabel;
    DBNavigator2: TDBNavigator;
    Table1IdIgroki: TAutoIncField;
    Table1Family: TStringField;
    Table1Name: TStringField;
    Table1SecFamily: TStringField;
    Table1Komanda: TStringField;
    Table2IdIgroki2: TAutoIncField;
    Table2IdIgroki: TIntegerField;
    Table2Datapriema: TDateField;
    Table2Shayba: TFloatField;
    Table2Peredacha: TFloatField;
    Table2Strtime: TFloatField;
    Table2KolvoMatch: TFloatField;
    DBRadioGroup1: TDBRadioGroup;
    DBEdit5: TDBEdit;
    Label4: TLabel;
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
  uses MyUnitReport;
procedure TForm1.Button2Click(Sender: TObject);
begin
Close;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.QuickRep1.Preview;
end;

end.
дальше сделал отчет...


Код:
unit otchet1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, QuickRpt, QRCtrls, ExtCtrls;

type
  TForm2 = class(TForm)
    QuickRep1: TQuickRep;
    QRLabel1: TQRLabel;
    QRBand2: TQRBand;
    QRBand1: TQRBand;
    QRDBText1: TQRDBText;
    QRDBText2: TQRDBText;
    QRDBText3: TQRDBText;
    QRDBText4: TQRDBText;
    QRSubDetail1: TQRSubDetail;
    QRDBText5: TQRDBText;
    QRDBText6: TQRDBText;
    QRDBText7: TQRDBText;
    QRBand3: TQRBand;
    QRSysData1: TQRSysData;
    QRSysData2: TQRSysData;
    QRShape1: TQRShape;
    QRBand4: TQRBand;
    QRSysData3: TQRSysData;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;
    
implementation

{$R *.dfm}
uses Komanda; //здесь ошибка..просит komanda.dcu..хотя она у мя есть.
end.

Последний раз редактировалось Stilet; 21.04.2010 в 11:25.
Gsingle вне форума Ответить с цитированием
Старый 21.04.2010, 11:26   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Перекомпилируй весь проект. В меню Project-Build All
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 21.04.2010, 13:40   #3
Gsingle
Пользователь
 
Регистрация: 31.03.2010
Сообщений: 19
Восклицание

Цитата:
Сообщение от Stilet Посмотреть сообщение
Перекомпилируй весь проект. В меню Project-Build All
спасибо помогло...вопрос еще один появился...экран белый...ниче не отображается(когда otchet)...а unit самой команды не выполняется....как думаешь из за чего?

Последний раз редактировалось Gsingle; 21.04.2010 в 13:45.
Gsingle вне форума Ответить с цитированием
Старый 21.04.2010, 14:19   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Белый это фон QReporta. Значит ты на него ниче не накидал.
Цитата:
а unit самой команды не выполняется
Чиго Чиго Чиго???
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 21.04.2010, 21:58   #5
Gsingle
Пользователь
 
Регистрация: 31.03.2010
Сообщений: 19
По умолчанию

как ничего не накидал?...вот же накидал...
Изображения
Тип файла: jpg накидка.jpg (186.4 Кб, 139 просмотров)
Gsingle вне форума Ответить с цитированием
Старый 11.03.2011, 20:11   #6
caen21rus
Пользователь
 
Регистрация: 27.05.2009
Сообщений: 27
По умолчанию

[DCC Fatal Error] Unit4.pas(8): F1026 File not found: 'QRCtrls.dcu'


ошибочка выходит, что делать и из-за чего?)
caen21rus вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
В чем ошибка? hitman12 Паскаль, Turbo Pascal, PascalABC.NET 13 04.11.2009 12:38
В чем ошибка... Эдвин Галстук Паскаль, Turbo Pascal, PascalABC.NET 3 25.10.2009 20:01
В чем ошибка? jahongir007 Помощь студентам 4 12.06.2009 10:25
В чем ошибка? AleNa666 Паскаль, Turbo Pascal, PascalABC.NET 2 28.04.2009 14:28
В чем ошибка ? Droid Общие вопросы Delphi 13 03.05.2008 18:17