Skip to forum content
My Visual Database
A Simple Solution for Creating Databases
You are not logged in. Please login or register.
Active topics Unanswered topics
Search options (Page 4 of 6)
Уважаемый Дмитрий!
У меня версия MVD 3.1. WindowsXP SP3.
Создал проект, работает отлично. Перешел на Windows 7, а там при запуске проекта в скриптах ничего нет. Взглянул на папку Script, там имеются файлы script.dcu и script.pas.
Мне известно, что файл script.dcu это скомпилированная версия script.pas. А внутри файла script.pas ничего нет.
Вес файла script.dcu=382 KB, а вес файла script.pas = 0. Я так понял, что при запуске проекта по каким-то причинам файл script.pas очистился и поэтому в проекте в разделе Скрипт ничего не было. Хорошо что у меня была резервная копия проекта.
Вопрос в следующем.
Как мне работать на Windows 7? Помню что такой вопрос был поднят на этом форуме, но никак не могу найти эту ветку. Помню что надо открыть файл *.vdb текстовым редактором и изменить версию. У меня стоит version=4, minorversion=2. Поправьте и направьте на правильное русло. Спасибо заранее.
У вас вопросы не конкретные, напишите последовательность действий.
Найдите это:
frmApplication.DateTimePicker2.Text := FormatDateTime('dd.mm.yyyy', now);
И замените на
frmApplication.DateTimePicker2.DateTime:= now;
Вы наверное запаковали не тот проект, запакуйте в архив заново и прикрепите
у вас в скриптах ничего нету
glkonst79 wrote:Добрый день Дмитрий!
Поскольку я совсем далек от программирования, посмотрите пожалуйста что я сделал не так
Да и формат даты у меня чч.мм.гггг (а в примере тока на год опирается)
Заранее спасибо.
Опишите что где не получается на вашем примере?
ale2574 wrote:Здравствуйте. У меня на форме есть кнопки от 0 до 9 и memo1. Надо что бы при нажатии на кнопки, числа сохранялись. Пример, - набираю 123, число появляется на memo1, нажимаю сохранить и готово число сохранено в базе. Подскажите пожалуйста хотя бы в какую сторону копать.
Взгляните!
Form1.Edit1.Text := DateToStr(now); выдает дату например - 07.01.2017, а надо чтобы было в секундах, как это реализовать?
beniamin91 wrote:Добрый день уважаемый DriveSoft.
У меня возникли трудности, если можно проясните.
В базе есть отдельные таблицы visits и doctors, они связанны между собой.
Есть TableGrid в котором выводятся визиты к врачам.
Таблица визиты состоит из полей date,state,memo,(связь [doctors])
В выше упомянутом TableGrid выводится date,state, и еще несколько полей из таблицы doctors.
Нужно что бы при клике конкретного визита из TableGrid в Label.Caption поставилось значение поля memo из таблицы visits.
С уважением, Бенямин.
Form1.Label.Caption:= SQLExecute('Select memo from visits where id='''+StrToInt(Form1.TableGrid1.dbItemId)+'''');
спасибо работает
А как задать сегоднящную дату в Edit1?
Я сделал так Form1.Edit1.Text:= SELECT strftime('%s','now');
Но не получился.
Спасибо но уже не надо. Есть другой вопрос.
В таблице имеется выч. поле - (Select strftime('%s', 'now'))
Как я понял она показывает в гриде секунды прошедшие с даты 01.01.1970.
Теперь в таблице имеется дата. Надо чтобы в гриде показала разницу между этой датой и выч. полем в секундах. Спасибо заранее.
у вас на украинском языке, а я не понимаю его, объясните теперь что надо делать.
можете написать мануал? интересная вещь. спасибо заранее.
Уважаемый Дмитрий!
В базе данных имеется следующее:
incomeDate ДАТА
outcomeDate ДАТА
numberTB ТЕКСТ
В них хранятся дата прихода, дата ухода и номер работника. Надо чтобы при сохранении проверялись даты и не было удвоения номера работника.
Например: Работник пришел в 12.12.2016 и ушел 15.12.2016 и его номер 5. Этот же работник скажем опять пришел 17.12.2016 и ушел 20.12.2016 но его номер теперь будет уже другой. Надо чтобы при введении номера 5 если такого есть в 2016 году то выскачило сообшение о том что такой номер есть. Помогите с реализацией.
Роман wrote:Здравствуйте Дмитрий!!!
Будьте так добры подскажите???
var
LISTL,T : String;
begin
c := LIST.Count- 1; //...тут выдаёт ошибку???
for i := 0 to c do
begin
T:=LISTL[i];
...........................................
...........................................
подскажите как правильно записать???
Вы не указали откуда LIST берет данные поэтому выдает ошибку.
огромное спасибо, примеры отличные.
3. На счет 3-го вопроса я так понял, что в свойствах кнопки Action можно оставить пустым, а в скриптах писать ваш пример для пунктов 3-6. Ведь так?
7. На счет 7-го вопроса не понятно в чем разница между 7 и 3.
Уважаемый Дмитрий.
Объясните и дайте примеры использования следующих свойств компонентов пожалуйста:
1. Form1.TableGrid1.dbFilter
2. Form1.TableGrid1.sqlValue
3. Form1.TableGrid1.dbSQL
4. Form1.TableGrid1.dbGeneralTable
5. Form1.TableGrid1.dbListFieldsNames
6. Form1.TableGrid1.dbSQLExecute
7. Form1.TableGrid1.dbGetSqlStatement
8. Form1.TableGrid1.GetRowAtPos()
9. Form1.TableGrid1.AddRow()
10. Form1.TableGrid1.DeleteRow()
Заранее спасибо
try this
INNER JOIN STCL_BOARD ON STCL.ID_STCL_BOARD =STCL_BOARD.ID
И у меня аналогичная проблема, может написать какое у вас вычисляемое поле?
DriveSoft wrote:bemorhona-qt wrote:Кстати за ответы других вопросов спасибо вам, попробую их и отпишусь. Вот и еще седьмой вопрос.
7. MessageDlg('Text', mtinformation, mbOk, 0);
Что значит цифра 0 данном диалоге?
Это для указания раздела контекстной справки, в диалоге можно показать кнопку Help, при нажатии на которую откроется справка в нужном разделе, но в MVD это не реализовано, поэтому не обращайте внимания.
понятно, а можно ли изменить Caption у диалогового окна?
Кстати за ответы других вопросов спасибо вам, попробую их и отпишусь. Вот и еще седьмой вопрос.
7. MessageDlg('Text', mtinformation, mbOk, 0);
Что значит цифра 0 данном диалоге?
Posts found: 76 to 100 of 139