Предпросмотр таблицы и отправка на печать

@Warlord · Регистрация: 03.12.2012

Студворк — интернет-сервис помощи студентам

Помогите сделать:1.По щелчке на кнопку Помощь открывается руководство пользователя. (что то не хочет у меня работать(
2.По кнопке Печать происходит вначале Превьюшка таблицы ну а потом можно и отправить на печать
3.Сделать фильтрацию чтоб можно было производить ее.
4.Также сделать поиск по таблице(там вроде у меня две)с выводом в таблице.
Кто то сможет помочь с чем нибудь из этого,буду от души благодарен)

@Алекcей · 20.12.2013, 10:03

в Unit2, удалите или закоментируйте строчку №28, вот так, например:

Delphi
1
//   procedure MyLocate(s:string);

или напишите процедуру MyLocate, поскольку она объявлена, но ее текста нет.

@Warlord · 20.12.2013, 10:30 **[ТС]**

Саму программу сделаете только за плату???

@Алекcей · 20.12.2013, 10:31

а что за программа? что в ней нужно сделать?

@Warlord · 20.12.2013, 10:34 **[ТС]**

Сообщение от Алекcей

а что за программа? что в ней нужно сделать?

моя эта программа,на ней все есть...ну тока еще есть кнопки не сгенерированные,плюс отчет или два вроде ну все на формах есть

@Алекcей · 20.12.2013, 10:37

мне удобнее переписать все самому с нуля чем, разбираться с Вашим кодом, поэтому и спрашиваю что там нужно сделать.

@Warlord · 20.12.2013, 10:39 **[ТС]**

Сообщение от Алекcей

мне удобнее переписать все самому с нуля чем, разбираться с Вашим кодом, поэтому и спрашиваю что там нужно сделать.

так это за плату или как не понял??или можете сделать подарок к новому году и подарите мне подарок в виде пропуска на следующий курс?)

@Алекcей · 20.12.2013, 10:42

я, к сожалению, не Дед Мороз, поэтому сами понимаете...

@Алекcей · 20.12.2013, 10:59

смотрите-ка, Ваша программка "задышала"

@Warlord · 20.12.2013, 11:11 **[ТС]**

Сообщение от Алекcей

смотрите-ка, Ваша программка "задышала"

Тока вот проблема с эдитами ошибка выскакиват ну и батоны(Новая запись и Редактировать) не работают,такая же ошибка..

@Алекcей · 20.12.2013, 11:23

я с этим не разбирался, просто попробовал оживить приложение, т.к. у меня ничего не запускалось. ну а с фильтрацией и добавлением/редактированием - "засада", поскольку там какие-то куски кода и форм.

@Warlord · 20.12.2013, 11:27 **[ТС]**

ну кто сможет мне помочь жду...

@Алекcей · 20.12.2013, 11:29

сделаю, но не бесплатно

@Warlord · 20.12.2013, 12:15 **[ТС]**

Delphi
1
2
3
4
procedure TDataModule9.MyLocate(s:string);
 begin
 TADOZakaz.Locate('Ôàìèëèÿ', s, [loPartialKey]);
 end;

ругается:[Error] Unit9.pas(76): Undeclared identifier: 'TADOZakaz'

Добавлено через 5 минут
Waddonator, незнаете в чем проблемка ADO?

@Алекcей · 20.12.2013, 12:18

проблема не в ADO, нужно вот так:

Delphi
1
ADOZakaz.Locate('Фамилия',s,[loPartialKey]);

компилятор говорит же, что он не находит компонента TADOZakaz.

@Waddonator · 20.12.2013, 12:19

Сообщение от Warlord

Waddonator, незнаете в чем проблемка ADO?

Вместо TADOZakaz напишите ADOZakaz

@Warlord · 20.12.2013, 12:24 **[ТС]**

Сообщение от Waddonator

Вместо TADOZakaz напишите ADOZakaz

ну да на самом деле,спасибо)
но не все так гладко,этот компонент не найден,его надо добавить?как считаете

@Waddonator · 20.12.2013, 12:26

Сообщение от Warlord

этот компонент не найден,его надо добавить?

Это не компонент не объявлен, а класс. Проверьте в разделе uses есть ли DBGrids.

@Алекcей · 20.12.2013, 12:28

нет его добавлять не нужно, просто он без имени, присвойте ему имя и этого AV не будет, лезть нужно в Unit9.

@Warlord · 20.12.2013, 13:23 **[ТС]**

слушайте у меня вот при входе в программу когда нажимаем на Файл и Выход к заставке то форма(заставка собственно)неактивна. тобишь на ней ничего не нажимается

Добавлено через 4 минуты
Waddonator, как можно это осуществить не подскажите?)

@Алекcей · 20.12.2013, 13:29

не знаю у меня все работает. попробуйте в procedure TGlavnF.Button1Click(Sender: TObject); перед последним end добавить

Delphi
1
 GlavnF.Show;

Новые блоги и статьи Все статьи Все блоги /
Из невошедшего на форум (диалог с ИИ-гугла) zorxor 29.07.2026 А вот, что интересно, сказал мне ИИ-гугла: Этот текст — эмоциональный пост пользователя под ником zorxor на интернет-форуме (вероятно, посвященном мистике, непознанному или альтернативной науке). . . .	Был праздник вчера, а я и не знал. kumehtar 28.07.2026 27. 07. 2026г. Intel Core 2 Duo исполнилось 20 лет Новости компьютерного мира и их обсуждение (4) Салют, шампанское, овации! :drink:	Нейтральные знания, чистый код - бла-бла-бла-бла, на самом деле кликбейт и самореклама, плагиат, и вот почему Hrethgir 27.07.2026 То-есть отклонение такой публикации говорит само за себя, и пусть только возьмут на вооружение после отклонения публикации - это будет чистейшим актом плагиата. Отклонял Хабр. Дословно, отклонённая. . .	тв 16 бой ии anaschu 27.07.2026 Великий Перелом ИИ: Как уравнения ОДУ Radau дожали цензурные фильтры Алисы Фиксируем в мемофонде Теории Всего беспрецедентный факт в истории ИИ-зондирования. В затяжном многораундовом. . .
мв 15. непроверенное, возможно, глюк anaschu 27.07.2026 НАУЧНО-АНАЛИТИЧЕСКИЙ ОТЧЕТ. РАЗДЕЛ 1. 1: «НАУКА» (РАСШИРЕННАЯ СТЕХИОМЕТРИЧЕСКАЯ И ГЕНЕТИЧЕСКАЯ ВЕРСИЯ)Тема: Теоретическое обоснование инвариантности 19-мерного тензорного ядра непрерывных ОДУ и. . .	Очистка реквизитов и табличных частей документа при копировании (вариант 2) Maks 26.07.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРаботу", разработанного в КА2. Задача: Заменить алгоритм запрета копирования документов для сотрудников с ролью "Стажер",. . .	Доктрина интенционального знания - Доктрина для портала "Срез". Hrethgir 25.07.2026 Может найдётся кто захочет оценить доктрину. . . Написания правил участия для меня роскошь, требующая лимита времени, поэтому все сообщения не прошедшие модерацию будут видны только участникам портала,. . .	сукцессия 44. Решил подать на припринт в межународные сервисы препринтов. Но нужно одобрение от ученых anaschu 25.07.2026 Английский вариант. Пока кто то не одобрит мою личность, мне не получиться это опубликовать на препринте. Но заявку на публикацию статьи я сегодня подам.

@Warlord 2 / 2 / 1 Регистрация: 03.12.2012 Сообщений: 245
	20.12.2013, 10:30 [ТС]
	Саму программу сделаете только за плату??? 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 10:31
	а что за программа? что в ней нужно сделать? 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 10:37
	мне удобнее переписать все самому с нуля чем, разбираться с Вашим кодом, поэтому и спрашиваю что там нужно сделать. 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 10:42
	я, к сожалению, не Дед Мороз, поэтому сами понимаете... 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 11:23
	я с этим не разбирался, просто попробовал оживить приложение, т.к. у меня ничего не запускалось. ну а с фильтрацией и добавлением/редактированием - "засада", поскольку там какие-то куски кода и форм. 0

@Warlord 2 / 2 / 1 Регистрация: 03.12.2012 Сообщений: 245
	20.12.2013, 11:27 [ТС]
	ну кто сможет мне помочь жду... 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 11:29
	сделаю, но не бесплатно 0

@Алекcей 554 / 484 / 191 Регистрация: 11.12.2013 Сообщений: 2,507
	20.12.2013, 12:28
	нет его добавлять не нужно, просто он без имени, присвойте ему имя и этого AV не будет, лезть нужно в Unit9. 1

@Warlord 2 / 2 / 1 Регистрация: 03.12.2012 Сообщений: 245
	20.12.2013, 13:23 [ТС]
	слушайте у меня вот при входе в программу когда нажимаем на Файл и Выход к заставке то форма(заставка собственно)неактивна. тобишь на ней ничего не нажимается Добавлено через 4 минуты Waddonator, как можно это осуществить не подскажите?) 0