Hello.
If you open form using script, you should update TableGrid manually using this method:
Form1.TableGrid1.dbUpdate;
Check it out:
WrkTab.TableGrid1.dbUpdate;
WrkTab.ShowModal;
My Visual Database → Posts by DriveSoft
Hello.
If you open form using script, you should update TableGrid manually using this method:
Form1.TableGrid1.dbUpdate;
Check it out:
WrkTab.TableGrid1.dbUpdate;
WrkTab.ShowModal;
Check it out
procedure Form2_Button2_OnClick (Sender: string; var Cancel: boolean);
begin
if Form2.Button1.dbGeneralTableId = -1 then
begin
Cancel := true;
MessageDlg('Only saved records can be printed.', mtInformation,mbOK,0);
end;
end;
Уважаемый Дмитрий!
Хотел задать также и второй вопрос.
Как я уже сказал у меня грид заполняется посредством SQL-запроса. В вашем примере (http://myvisualdatabase.com/forum/misc. … download=1) по кнопке поиск в разделе ''Формирование результата'' заголовки грида указывается Last \r\nName, а у меня так как грид заполняется посредством SQL-запроса, и там нету раздела ''Формирование результата'' а заголовки колнок грида указываются в запросе, например ''(Select x from y) as Катхо''. Т.е. заголовки указываются непосредственно в запросе, а вашем примере заголовки указываются в разделе Формирование результата. Надеюсь смог объяснить. Как быть?
Грид заполняется с помощью кнопки с действием "SQL запрос"? Если да, то там есть поле для заголовков "Введите заголовки через запятую"
В первом запросе мне показывает то что надо, в моем примере эта цифра. Во втором скрипте надо чтобы эта цифра делилась на 31, увы не получается.
Приложите пожалуйста проект с тестовыми данными.
Please can you help me with this error
Thank you
Please attach your project and describe steps to reproduce this error.
Unfortunately something wrong with your database structure.
There is no any relationship between SheduleCourse and CreateCourse
Здравствуйте.
К сожалению не смогу вам помочь, так как вы используете пиратскую версию программы.
Hello.
SQLExecute('INSERT INTO Tablename(FieldName1, FieldName2) VALUES("'+variable1+'", "'+variable2+'")');
Здравствуйте.
Пример
procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
s: string;
begin
s := SaveFileFromDataBase('tablename', 'fieldname', Form1.TableGrid1.dbItemID); // save file to disk and get filename in system temp folder
OpenFile(s); // open file
end;
procedure Form1_GridEmployees_OnChange (Sender: string);
var
iRow ,c: integer;
q, iCol: integer;
begin
c := Form1.GridEmployees.RowCount - 1;
q := Form1.GridEmployees.Columns.Count-1;
for iCol := 0 to c do
for iRow := 0 to q do
begin
if iCol mod 2 = 0 then Form1.GridEmployees.Cell[iCol,iRow].Color := clBtnFace;
end;
end;
Проект с примером:
Да, это возможно только через скрипт.
Закомментированые строки позволяют переносить строки и в заголовке.
Hello.
Print button also save record, because use data from database, not from form.
You can prevent it, example:
procedure Form2_Button2_OnClick (Sender: string; var Cancel: boolean);
begin
if Form2.Button1.dbGeneralTableId = -1 then Cancel := true;
end;
Посмотрите пожалуйста данный пример
http://myvisualdatabase.com/forum/misc. … download=1
Вам необходим денежный формат?
Используйте поле с типом "ДЕНЬГИ" (вкладка Таблицы базы данных), также при создании/редактировании данного поля раскройте дополнительные настройки "Additional" и установите галочку "Thousands separator". Таким образом данное поле будет иметь необходимый формат в компонентах TextBox и в TableGrid
Если данный формат вам необходим только в компоненте TextBox, установите его свойства:
Currency = True
Accuracy = 2
ThousandSep. = True
kovalenko
Пожалуйста приложите ваш проект.
Please check it out
https://www.dropbox.com/s/d63fcpgtvx56b … d.zip?dl=0
I have added two calculated field to solve this problem.
Sir
I get the Same what solution
but in grid some data not showing
plz check file i sent to you in email
thanks
I have got your project, but I need too much time to understand it and found errors of project..
Data is not showing because there is no data in the fields.
Здравствуйте.
Сделал для вас пример, для компонента TableGrid задействована опция Additional > Options > goMultiSelect, что позволяет выбирать несколько записей в гриде удерживая клавишу Ctrl
В таком виде к сожалению не смогу помочь, это займет слишком много времени.
при запуске программы в версии 3.3. возникает такая ошибка:
Приложите пожалуйста ваш проект.
No need apostrophe there.
My Visual Database → Posts by DriveSoft
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi