3,526

(2 replies, posted in Script)

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;

3,527

(4 replies, posted in General)

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;

3,528

(38 replies, posted in Russian)

bemorhona-qt wrote:

Уважаемый Дмитрий!
Хотел задать также и второй вопрос.
Как я уже сказал у меня грид заполняется посредством SQL-запроса. В вашем примере (http://myvisualdatabase.com/forum/misc. … download=1) по кнопке поиск в разделе ''Формирование результата'' заголовки грида  указывается Last \r\nName, а у меня так как грид заполняется посредством SQL-запроса, и там нету раздела ''Формирование результата'' а заголовки колнок грида указываются в запросе, например ''(Select x from y) as Катхо''. Т.е. заголовки указываются непосредственно в запросе, а вашем примере заголовки указываются в разделе Формирование результата. Надеюсь смог объяснить. Как быть?

Грид заполняется с помощью кнопки с действием "SQL запрос"? Если да, то там есть поле для заголовков "Введите заголовки через запятую"

3,529

(38 replies, posted in Russian)

В первом запросе мне показывает то что надо, в моем примере эта цифра. Во втором скрипте надо чтобы эта цифра делилась на 31, увы не получается.

Приложите пожалуйста проект с тестовыми данными.

3,530

(11 replies, posted in General)

gamalier_ramirez wrote:

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

Здравствуйте.


К сожалению не смогу вам помочь, так как вы используете пиратскую версию программы.

3,533

(1 replies, posted in Script)

Hello.

SQLExecute('INSERT INTO Tablename(FieldName1, FieldName2) VALUES("'+variable1+'", "'+variable2+'")');

3,534

(1 replies, posted in Russian)

Здравствуйте.


Пример

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;

Здравствуйте.


В данной теме есть пример
http://myvisualdatabase.com/forum/viewtopic.php?id=383

3,536

(2 replies, posted in General)

Hello.


An example for you
http://myvisualdatabase.com/forum/misc. … download=1

3,537

(2 replies, posted in Russian)

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;

Проект с примером:

Да, это возможно только через скрипт.


Закомментированые строки позволяют переносить строки и в заголовке.

3,539

(4 replies, posted in General)

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

3,541

(1 replies, posted in Russian)

Вам необходим денежный формат?


Используйте поле с типом "ДЕНЬГИ" (вкладка Таблицы базы данных), также при создании/редактировании данного поля раскройте дополнительные настройки "Additional" и установите галочку "Thousands separator". Таким образом данное поле будет иметь необходимый формат в компонентах TextBox и в TableGrid


Если данный формат вам необходим только в компоненте TextBox, установите его свойства:

Currency = True
Accuracy = 2
ThousandSep. = True

kovalenko
Пожалуйста приложите ваш проект.

3,543

(9 replies, posted in General)

Please check it out
https://www.dropbox.com/s/d63fcpgtvx56b … d.zip?dl=0


I have added two calculated field to solve this problem.

3,544

(6 replies, posted in General)

nitin.ingale08 wrote:

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,547

(3 replies, posted in Russian)

http://myvisualdatabase.com/forum/viewtopic.php?id=1062

delphinsl wrote:

при запуске программы в версии 3.3. возникает такая ошибка:

Приложите пожалуйста ваш проект.

3,549

(1 replies, posted in General)

It's not possible.

3,550

(3 replies, posted in General)

No need apostrophe there.