Приветствую,


Извиняюсь за задержку с ответом, был в отпуске, вопрос все еще актуален для вас?

5,402

(4 replies, posted in Russian)

Приветствую,


Извиняюсь за задержку с ответом, был в отпуске, вопрос все еще актуален для вас?

memult wrote:

Спасибо.
А не подскажите еще как отключить сортировку по возрастанию/убыванию в шапке таблицы, при нажатии на заголовок каждого столбца?

Извиняюсь за задержку с ответом, был в отпуске.


Можно так

procedure Form1_TableGrid1_OnChange (Sender: string);
begin
    Form1.TableGrid1.Columns[0].Options := Form1.TableGrid1.Columns[0].Options - coCanSort; // для первого столбца
    Form1.TableGrid1.Columns[1].Options := Form1.TableGrid1.Columns[1].Options - coCanSort; // для второго столбца и т.д.
end;

Sorry but we are on Vacation from 29.02.2016 until 15.03.2016


I can recommend you check this example, to be sure that MySQL and PHP works on your server properly:
http://www.w3schools.com/php/php_mysql_select.asp

Unfortunately I can't determine reason without access on your server.

megood70 wrote:

yes its works this code php on server

Your project works with this MySQL database?
Can you add/delete records?

Приветствую,


пример

procedure Form1_Memo1_OnEnter (Sender: string);
begin
    Form1.Memo1.Width := 250;
    Form1.Memo1.Height := 250;
end;

procedure Form1_Memo1_OnExit (Sender: string);
begin
    Form1.Memo1.Width := 185;
    Form1.Memo1.Height := 89;
end;

5,408

(30 replies, posted in Russian)

Raspr
Чтобы было видно и записи за предыдущий день, попробуйте так

events.date >= date('now','-1 day') 


Для удаления попробуйте такой запрос

SQLExecute('DELETE FROM logs WHERE datefield < date("now", "- 60 days")');

CURRENT_DATE() - это синтаксис для MySQL, в запросе выше я привел пример для SQLite, какую СУБД вы используете?

tcoton wrote:

Hi Dmitry, it seems to do what Gilberto_Schiavinatto is looking for. How do you set the value1, value2 and value3 in the report? I cannot figure it out...

Hello,


Using the SQL query:

SELECT
(SELECT tableA.text FROM tableA WHERE tableA.id={ComboBox1}) as Value1,
(SELECT tableB.text FROM tableB WHERE tableB.id={ComboBox2}) as Value2,
(SELECT tableC.text FROM tableC WHERE tableC.id={ComboBox3}) as Value3

In the report designer:

Lorem Ipsum is simply dummy text of the printing and typesetting industry [Report."Value1"]. 

Pay attention to: "[Report."Value1"]"

5,410

(4 replies, posted in General)

Hello,


1. Here you can find some info for beginners about SQL and databases
http://myvisualdatabase.com/forum/viewtopic.php?id=986


2. Yes.


3. Script language is Object Pascal (Delphi), so you can read any book about Delphi

vaskar wrote:

Дмитрий, у вас не получилось посмотреть, что не так?   По моим наблюдениям сбоит в феврале и после февраля. Может високосный год виноват?

Не очень получается у меня решит эту задачу, т.е. не являюсь специалистом по SQL запросам, но попробуйте такой запрос

WITH RECURSIVE dates(date) AS (
  VALUES({edbegdate})
  UNION ALL
  SELECT date(date, '+1 day')
  FROM dates
  WHERE date < {edenddate}
)

SELECT

"date",

TOTAL(
     (
     SELECT TOTAL(rent.rent / (julianday(rent."end") - julianday(rent."begin"))) FROM rent WHERE date("date", '+1 day') >= rent."begin" AND "date" < rent."end"
     AND (CASE WHEN {ComboBox1}=-1 THEN 1=1 ELSE rent.id_car={ComboBox1} END)
     )
     ) as TotalResult

FROM dates

время не очень хорошо учитывается, только дата.
Также можете попросить помощи с запросом на специализированном форуме по SQLite
http://www.sql.ru/forum/sqlite

Please check that php on your PC installed and works.
Create php file with content:

<?php

echo "test";

?>

then try to open it in your browser using localhost address.

5,413

(6 replies, posted in General)

stelios91 wrote:

I have one more important question. When i push a button and open up a new form if i try to click on the form behind it i get a sound and im not able to do so. Is there any way to make it possible but not on all cases. I wanna have multiple forms open and use them together! big_smile Thanks in advance

It's impossible if you use buttons with actions, but you can do it using script if you have programming skills.

5,414

(6 replies, posted in General)

Hello,


Great )

Gilberto_Schiavinatto wrote:

Hi, Dmitry



How and where to register the document template for later use.

any suggestion.................

An example for you:

tcoton
Thanks! )

5,417

(30 replies, posted in Russian)

Приветствую,


С какой целью чек "таблица является словарем"? Что меняется?

Необходимо для правильной работы внутренних алгоритмов программы, словарные таблицы это как правило таблицы с постоянным набором записей, например таблица статусов заказа (Новый, В работе, Закрыт) или перечисление полов (Неопределен, Мужской, Женский)


Как правило ничего страшного не произойдет если вы неверно отметите эти галочки, т.к. нужны они в редких случаях.


Зачем в сортировке в гриде ORDER BY если и так столбец выбрать можно. Как-то "шире" выбирать позволяет?

Позволяет указать произвольную сортировку сразу по нескольких столбцам, например: lastname, status
т.о. отсортирует сперва по фамилии, затем по статусам.


Поддержка целостности при связах означает, что при удаление, допустим, пользователя, удаляться все записи с "его присутствием"?

Да, например есть БД телефонного справочника, с таблицами persons и phones, в таблице phones есть внешний ключ с поддержкой целостности на таблицу persons, т.о. при удалении записи из таблицы persons, будут удалены и все его телефонные номера.


Можно ли в DateTimePicker убрать секунды?

У компонента есть свойство Format, в котором вы можете задать свой формат времени, в данном случае: HH:mm



Переделывал несколько раз, почему-то в форме авторизации по Enter перестал входить. Кликать мышой надо или через Tab. Где испортил?

для кнопки авторизации установите свойство Default = true


Не для админа скрыть нужно две кнопки. Сейчас сделал, уверен, неправильно двумя строками:

Попробуйте так

  if SQLExecute ('SELECT admin FROM users WHERE id = '+IntToStr(idUser)) = '1' then
  begin 
      isAdmin := True
  end else 
  begin
     frmFind.btDir.Visible:=False;
     frmFind.btJour.Visible:=False;
  end;

Не смог сам разобраться, можно ли в фильтре автозаполнения грида сказать "от сегодняшней даты"? По логике должно быть как-то "events.date >= ?", нет?


events.date >= date('now')

Существует ли возможность ведения журнала действий пользователей

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


И самое для меня сложное. В конечном итоге хочется сделать калькулятор стоимости

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

Hello,


Unfortunately I can't understand what exactly you need.

5,419

(4 replies, posted in General)

rjkantor wrote:

Any info on the offset of the two record ids?

Please attach your project with description, where you meet problem.

5,420

(2 replies, posted in Script)

Hello,


I think your not quite understand how database works, TableGrids just shows records from database.


Please describe, what exactly you need to do ?

memult wrote:

А скоро ли планируется это реализовать? (RichEdit)

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

5,422

(3 replies, posted in General)

You have wrong structure of project.


You have foreign key in the table "Zakaz" (id_db) but there is no in the forms any ComboBox or child TableGrid to create this relationship between tables.


Please check out this video lesson:
https://www.youtube.com/watch?v=bG30pqCrw8k


You should to understand how works with foreign keys in database.


Also check out this topic
http://myvisualdatabase.com/forum/viewtopic.php?id=986



Thanks.

Компонент Memo к сожалению не поддерживает такое в принципе, в будущем планируется добавить компонент RichEdit, который позволяет форматировать текст.


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

5,424

(28 replies, posted in Russian)

Вы можете вызвать событие как обычную процедуру.


например у вас есть событие OnChange для DateTimePicker

procedure Form1_DateTimePicker1_OnChange (Sender: string);
begin

end;

после строчки кода, которая меняет значение в DateTimePicker, вызовите событие так:

Form1_DateTimePicker1_OnChange('');

5,425

(1 replies, posted in Russian)

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