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

@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;

Новые блоги и статьи Все статьи Все блоги /
Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .

@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