Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Распечатка данных из DBGrid, Как сделать это пошагово???? 
:(
    Опции темы
Nosor
Дата 24.4.2006, 17:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 24.4.2006

Репутация: нет
Всего: нет



ОООООчень нужно сделать распечатку данные из этого "грида", проблема в том что в нём отображены данные из других таблиц, а вместо компонента table он связан с querry, нашел готовый код но он какой-то непонятный, напишите плз как это сделать по этапам 
PM MAIL   Вверх
Albinos_x
Дата 24.4.2006, 20:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 1
Всего: 108



что конкретно непонятно? 


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
Vit
Дата 24.4.2006, 20:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 14
Всего: 207



Способы:

1. Сделать репорт. Плюсы - очень красивая печать, минусы - это не самый простой способ

2. Использовать третьесторонние DBGrid которые имеют встроенный метод печати. Минус - трудно регулировать внешний вид

3. Печатать форму - Form1.Print - просто но печатается только то что видно

4. Самому рисовать на канвасе принтера - геморрой...

Я бы рекомендовал изучить работу любой репортинговой системы. 


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Nosor
Дата 25.4.2006, 06:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 24.4.2006

Репутация: нет
Всего: нет



всё по порядку: я в курсе как распечатывать данные из грида если в нём отображена таблица т.е. создать новую форму, закинуть на неё report и table, затем связаваю этот table c table который отображен в гриде. а у меня есть грид но нет table, а вместо него есть querry, и я не могу связать report с моим гридом smile (извините, за небольшую путаницу) 
PM MAIL   Вверх
Tror
Дата 26.4.2006, 14:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 193
Регистрация: 29.4.2005
Где: Кишинёв

Репутация: нет
Всего: 4



ну так и не надо связывать grid с reporto'м.
грид это всего лишь визуальное представление данных из DataSet'a,
а TTable и TQuery и есть ничто иное как DataSet.
т.е. вместо Table можно спокойно использовать Query.
 smile  
--------------------
Не говори всегда что знаешь, но знай всегда что говоришь. /Клавдий/============================================Кто может -- тот делает. Кто не может... тот получает сертификат MCSE ;)
PM MAIL ICQ   Вверх
Nosor
Дата 26.4.2006, 15:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 24.4.2006

Репутация: нет
Всего: нет



Цитата(Tror @ 26.4.2006,  14:17)
ну так и не надо связывать grid с reporto'м.
грид это всего лишь визуальное представление данных из DataSet'a,
а TTable и TQuery и есть ничто иное как DataSet.
т.е. вместо Table можно спокойно использовать Query.
 smile

Я знаю что могу это сделать, но кааааааааак???????? уже крыша едет. table и report я без проблем связываю, а querry и report не могуууууууу smile  smile  
PM MAIL   Вверх
Tror
Дата 26.4.2006, 15:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 193
Регистрация: 29.4.2005
Где: Кишинёв

Репутация: нет
Всего: 4



Nosor, как ты думаешь, если есть 2 авто, один белого цвета, а другой черного,
то ездить они будут по разному??? smile 

может код покажешь. 
--------------------
Не говори всегда что знаешь, но знай всегда что говоришь. /Клавдий/============================================Кто может -- тот делает. Кто не может... тот получает сертификат MCSE ;)
PM MAIL ICQ   Вверх
Nosor
Дата 27.4.2006, 16:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 24.4.2006

Репутация: нет
Всего: нет



unit Unit4;

interface

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

type
  TForm4 = class(TForm)
    DBGrid1: TDBGrid;
    Query1: TQuery;
    DataSource1: TDataSource;
    DBNavigator1: TDBNavigator;
    Table1: TTable;
    DataSource2: TDataSource;
    DBGrid2: TDBGrid;
    DBNavigator2: TDBNavigator;
    DBGrid3: TDBGrid;
    DBNavigator3: TDBNavigator;
    Table2: TTable;
    DataSource3: TDataSource;
    Bevel1: TBevel;
    Bevel2: TBevel;
    Bevel3: TBevel;
    procedure DataSource2DataChange(Sender: TObject; Field: TField);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form4: TForm4;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm4.DataSource2DataChange(Sender: TObject; Field: TField);
begin
     Query1.Active:=false;
     Query1.Active:=true;
end;

end. 
PM MAIL   Вверх
sexton
Дата 27.4.2006, 18:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sexton=Пономарь (eng)
**


Профиль
Группа: Участник
Сообщений: 503
Регистрация: 5.5.2004
Где: Ульяновск

Репутация: нет
Всего: 9



Блин, ну подключай ты в отчетах Query ТОЧНО так же как и Table! 
PM MAIL WWW ICQ   Вверх
Vit
Дата 27.4.2006, 18:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 14
Всего: 207



DataSource1.Dataset:=Query1;
DBGrid1.DataSource:=DataSource1; //или любой другой DB визуальный компонент
Qurey1.open; 


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »


 




[ Время генерации скрипта: 0.0818 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.