Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Как мне из одного модуля передать в второй переменную? Тоесть, обясняю полностю задачу: НА одной форме выбирается из таблицы какой-то елемент, и чтобы его открыть для редактирования в следующей формае, нужно в модуле редактирования дать запрос с id редактируемого елемента. Жду помощи. Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 00:41 21-06-2005

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Solnake Во втором модуле в uses пишешь первый модуль. Потом там где тебе надо получить id пишешь следующее. id:=ИмяПервойФормы.НавзаниеТаблицы.(здесь пишешь из какого поля тебе надо получить айди); Например id:=frmMain.Table1.FieldByName('MyField').AsInteger; ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:11 21-06-2005

FAngel Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору MICROPOM WinApi - GetDiskFreeSpace Всего записей: 799 | Зарегистр. 04-12-2003 | Отправлено: 08:20 21-06-2005

Bonivur Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Как можно осуществить вывод форматированного текста (жирный шрифт, цвет, размер)? Размер самого текста не маленький, так что нужен встроенный редактор. И главное - без внешних файлов. Чтобы текст встраивался в exe. Существует ли такой компонент. RichView не предлагать - как я понял там надо вручную каждую строку вписывать через AddNL( ... ) а это мне не подходит. Загружать извне тоже не годится. ---------- Что будет стоить тысяча слов когда важна будет крепость руки? (В.Цой) Всего записей: 655 | Зарегистр. 22-06-2003 | Отправлено: 13:43 21-06-2005

EZH Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору ViktorSila Просто посмотри в диспетчере дисков (управление компьютером)   Добавлено: Ой, сорри, не заметил что раздел по программированию... Всего записей: 1738 | Зарегистр. 02-09-2004 | Отправлено: 14:51 21-06-2005

Kustarnik Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Bonivur, попробуй TMS (HTMLControls, ParamControls (Label, StaticText) or RTFLabel )   Всего записей: 395 | Зарегистр. 11-01-2005 | Отправлено: 15:03 21-06-2005

Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору ShIvADeSt Цитата: Во втором модуле в uses пишешь первый модуль. Потом там где тебе надо получить id пишешь следующее. id:=ИмяПервойФормы.НавзаниеТаблицы.(здесь пишешь из какого поля тебе надо получить айди); Например   id:=frmMain.Table1.FieldByName('MyField').AsInteger;   Не работает, я это уже пробовал. Пишет,что не находит такого поля в таблице. В то время, когда обращаюсь вот-также в модуле , где находится таблица: Код: ID:=qAssort.FieldByName('AssortID').AsInteger; Все работает. Не могу понять в чем дело. Вот так работает : Код:   ID:=qAssort.FieldByName('AssortID').AsInteger; with TfrmAdd2.Create(nil) do   try     try        ShowModal;     except       ShowMessage('Error');   end   finally     qACat.Close;     qACat.Open;     qAssort.Close;     qAssort.Open;   end;     А вот так выдает ошибку : Код:   with TfrmAdd2.Create(nil) do   try     try       ID:=qAssort.FieldByName('AssortID').AsInteger;       ShowModal;     except       ShowMessage('Error');   end   finally     qACat.Close;     qACat.Open;     qAssort.Close;     qAssort.Open;   end;       Felan   Такой вариант, я думаю в моему случаю не подходит, по крайней мере я не вижу как приписать это к моей проге (может прост отупой, так обясните)     Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 16:40 21-06-2005

Bonivur Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Kustarnik RTFLabel в TMS подходит на 90 процентов. Одна только проблема - нет скроллинга Как помочь? А HTML компоненты требуют вроде IE 5.5 или выше. Так ли это? ГДе вообще можно скачать хелп для TMS + все демо (не только для AdvGrid)? ---------- Что будет стоить тысяча слов когда важна будет крепость руки? (В.Цой) Всего записей: 655 | Зарегистр. 22-06-2003 | Отправлено: 22:40 21-06-2005

Kustarnik Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Bonivur, HTML компоненты ничего не требуют, только знания mini html от tms     Добавлено: Ссылки на TMS Samples, в т.ч. и на html controls были на форуме "Коммерческие компоненты и утилиты для Delphi/BCB" (ищи там (см. версию для печати )). Всего записей: 395 | Зарегистр. 11-01-2005 | Отправлено: 00:08 22-06-2005

Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Усе парни, розобрался, научили работать с property. Прикольная фича. Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 00:11 22-06-2005

Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Felan Цитата: Твой id редактируемого элемента - есть параметр диалога. Так что все подходит. Понял, спасиба за желание помочь, но уже зделал другим способом. Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 10:50 22-06-2005

deks Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Nicka_Grey   насколько я понимаю, иных реально надежных вариантов кроме цифровой подписи не бывает.. Сам Adobe Acrobat позволяет подписывать файлы. А вот компоненты... Впрочем, можно попытаться защитить файл - берем любой из пакетов для формирования цифровой подписи, и подписываем файл. Если подпись нарушена - в файле кто-то коплася. подпись может ставится и не на сам файл, а "рядом". Всего записей: 857 | Зарегистр. 09-10-2003 | Отправлено: 17:42 22-06-2005

Nicka_Grey Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору deks Насчет цифровой подписи идеи проскакивали, но к сожалению я пока с этим не сталкивался Можно поподробнее об этом, и какие есть компоненты? Всего записей: 1282 | Зарегистр. 04-01-2003 | Отправлено: 17:47 22-06-2005

Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору У меня получилась вот-такая херня: Компоненты ADOTables , и ADODataSet находятна на DataModule, а DBGrid находится на форме. При активации той формы нужно чтобы в таблице обновлялись данные, я делаю вот так :   Код:   With DM do begin   Nakls.Close;   Nakls.Open;   Move.Close;   Move.Open;   Assortment.Close;   Assortment.Open;   dsNakls.Enabled:=false;   dsNakls.Enabled:=true;   dsMove.Enabled:=False;   dsMove.Enabled:=True; end;     Но это не срабатывает. Это работает безотказно тогда, когда все компоненты находятся на самой форме, а не розбросаны по разным модулям. Подскажите как обновить данные в таблице на форме, а то перебрасывать все компоненты на саму ыорму - это куча работы. Или подскажите, ка перебросить именно тот компонент со всеми настройками на форму. Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 18:55 22-06-2005

YurikGL Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Цитата: Solnake Не важно, где расположены датасет, датасорс и грид. Важно их связать. Т.е. в датасорсе указать в качестве датасета - datamodule.dataset, у грида, в качестве датасорса - datamodule.datasource.   Свяжи все это и в design mode скажи датасету active:=true. В таблице праямо в дезигн моде должен отобразиться набор данных.   Добавлено: что-бы прописать  у грида, в качестве датасорса - datamodule.datasource нужно в модуле формы, где лежит грид в юзес добавить датамодуль... или просто в любом месте кода написать datamodule1, нажать ктрл+ф9 и у тебя по нажатию клавиши йес все автоматом добавится, если уже не было добавлено... Всего записей: 308 | Зарегистр. 02-09-2004 | Отправлено: 20:53 22-06-2005

Solnake Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору YurikGL Цитата: Не важно, где расположены датасет, датасорс и грид. Важно их связать.   Т.е. в датасорсе указать в качестве датасета - datamodule.dataset, у грида, в качестве датасорса - datamodule.datasource.     Свяжи все это и в design mode скажи датасету active:=true. В таблице праямо в дезигн моде должен отобразиться набор данных.     Добавлено:   что-бы прописать  у грида, в качестве датасорса - datamodule.datasource нужно в модуле формы, где лежит грид в юзес добавить датамодуль... или просто в любом месте кода написать datamodule1, нажать ктрл+ф9 и у тебя по нажатию клавиши йес все автоматом добавится, если уже не было добавлено... Все это пробовалось , и проверялось. По идее должно работать, но не работает. Вся проблема возникает из-за розделенности компонентов. А тото способ что ты описал - я и так им пользуюсь, но вот в данном случае это работать не хочет и все, это факт. Если не вериш - поставь компоненты, как у меня описано, и попробуй сделать рефреш таблице кнопочкой на форме. Всего записей: 826 | Зарегистр. 16-09-2004 | Отправлено: 21:19 22-06-2005

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi

ShIvADeSt (20-04-2006 01:53): http://forum.ru-board.com/topic.cgi?forum=33&topic=6679#1

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование