51

(4 replies, posted in Russian)

забыл указать что в конце строик у меня стоит ;
time.Edit1.Text:= 'Hello';

52

(4 replies, posted in Russian)

не могу сообразить почему ругается на тип.

Добавил скрипт.
procedure time_Button2_OnClick (Sender: string; Action: string);
begin
time.Edit1.Text:= 'Hello'
end;

тип значения для Edit1 в таблице - текст.


в другой части скрипта все нормально
procedure kash_Button3_OnClick (Sender: string; ACol, ARow: Integer);
begin
kash.edSubject.Text := '4000';
end;

тип значения для edSubject в таблице - вещественное число.

53

(1 replies, posted in Russian)

Добрый день. В принципе я могу помочь с отчетом. присылайте проект на ces@rciugra.ru.
К проекту приложите доковскую выходную форму

54

(5 replies, posted in Russian)

благодарю. не знал.

55

(5 replies, posted in Russian)

Привязал к кнопке button2 - SQL-запрос.
Кнопку спрятал за таблицу где отражаются дни рождения.
На форме есть объект DateTimePicker.

Запрос.
select
klient.family
,klient.name
,strftime('%d.%m',klient.birth)as birth
from klient
where strftime('%m',klient.birth)= strftime('%m',{DateTimePicker1})
order by birth

Дополнительно в SQL-запрос
определил названия граф (Фамилия, Имя, День рождения)
выбрал компонент таблицы - на текущей форме birth.
Главная таблица данных - klient
Результат запроса выложил в таблицу birth.

На форму повесил скрипт
procedure Main_OnShow (Sender: string; ACol, ARow: Integer; Action: string);
begin
Main.button2.click;
end;

на DateTimePicker повесил скрипт
procedure Main_DateTimePicker1_OnChange (Sender: string; ACol, ARow: Integer);
begin
Main.button2.click;
end;

56

(6 replies, posted in Russian)

Я кажется догадываюсь почему все форумчане отзываются с восторгом об этом инструменте.
Дело не в самой проге - думаю что аналогов достаточно.
Дело в том что прога развивается и растет прямо на наших глазах и большинство форумчан (включая меня) скорее всего лузеры в управлении БД, в SQL и в паскале.
Но за те 4-6 месяцев администрация форума нас пошагово этому всему непринужденно учила  с использованеим именно наших хотелок.
Я себе на работе сделал удобную вещь для системы контроля, а жене тоже по её хотелкам в фитнес клуб.

Большое спасибо. Респект Вам и уважуха.

57

(4 replies, posted in Russian)

проверил - не работает

58

(6 replies, posted in Russian)

тоже не совсем понял что с проектом ТЕСТ.
скачал но не понял что для чего нужно и для чего комбы на главной форме

59

(4 replies, posted in Russian)

Спасибо попробую.
Есть несколько таблиц.
1. Главная - Организация.
2. Вторичная  (со ссылкой на организацию)- Проект.
3. Третьего порядка - 3 таблицы (Кредитный договор, Договора на Господдержка, История проекта). Эти таблицы имеют ссылки на Организацию и Проект.

4. Четвертого порядка  (со ссылкой на таблицу - Господдержка) - 1 таблица "Платежи по господдержке".

Есть еще несколько вспомогательных типа статусы, банки и т.д.

Главная таблица  на главной форме - Проекты (с фильтрами по организации ис статусу)
Выбирая проект - перехожу не в его редактирование а в усеченный просмотр где все основные параметры (Организация и название проекта выведены в режиме чтения и в форме Edit). Если в отношении Организации - можно поставить Комбобокс то для самого называния Проекта этого не получается - только Edit
Далее форма Просмотра содержит 4 вкладки дополниетльные где можно добавлять данные для таблиц третьего и четвертого уровней. И каждая из этих таблиц содержит ссылку на Организхацию и Проект.
Добавляя например запись в таблицу "история" мне необходимо выбирать Комбобоксами Организацию и Проект, вносить дату записи и текст Истории (всего 4 параметра). Хотелось бы чтобы Комбобоксы устанавливались автоматом в зависимости от Проекта который я выбрал.
Вот и хочу сделать выборку Комбобокса из Эдита.
Несколько сумбурно - тут смотреть надо.

60

(4 replies, posted in Russian)

По тематикам прошелся и увидел способ передать опредделенные данные из выпадающего списка ComboBox в текстовое поле Edit


Form1.Edit1.Text := SQLExecute('SELECT Поле FROM Таблица WHERE id=' + IntToStr(Form1.ComboBox1.dbItemID) );

А как сделать наоборот?
Выдернуть из нередактируемого текстового поля (Edit1), определить его индентификатор из нужной таблицы и подставить этот ID в ComboBox?

61

(9 replies, posted in Russian)

Можете и мне прислать чтобы не отвлекать админа от более насущных задач. я как раз отчетами щас занимаюсь - заодно и Ваш могбы посмотреть.
Только еще и шаблон отчета пришлите в ворде как Вы хотели бы чтобы он вышел на печать
ces@rciugra.ru
smile

62

(11 replies, posted in Russian)

А чисто теоретически ведь можно заполенние новых полей при изменении струткуры базы путем простого SQL запроса с использованием функции INSERT? В смысле чтобы не использовать еще дополнительную прогу.

63

(12 replies, posted in Russian)

DriveSoft wrote:

Чучкин Евгений
вам необходимо правильно соединить таблицы, подробней почитать об этом можно здесь
http://www.k-press.ru/cs/2009/3/join/join.asp


скопируйте пожалуйста ваш SQL запрос сюда, попробую исправить.

SELECT
organ.*
,Proj.name as name_proj
,service.*
,position.*
FROM position
left join service on service.id=position.id_service
left join Proj on Proj.id=position.id_Proj
left join organ on organ.id=position.id_organ
WHERE organ.id = '{ComboBox1}' and proj.id = '{ComboBox2}'

64

(4 replies, posted in Russian)

savage wrote:

Утро доброе.
Закончил  сегодня небольшую прогу (спасибо DriveSoft за помощь).
Прога - простенький учет книг в отделе (есть у нас собственная библиотека, спасибо шефам).
Если не сложно - можно проверить на предмет оптимальности решений?

Из того, что не смог:
1.  так и не смог победить регистр в поле "Читатель" грида "История чтения книги" на основной форме
2. при экспорте в MS Excel отдельные поля очень мелкий шрифт. Спасает растягивание границ столбца, но это уже, конечно, не автоматизация.


с уважением,

Savage

PS Спасибо Автору за хороший софт!

1. В файле settings.ini который в папке с Вашей базой
в режиме редактирования в конце после
[DisableUpperCase]
добавляете
ТаблицаюСтрока=

примерно так
organ.name=
Proj.name=

2. Лучше использовать отчетность - там лучше намного чем выгрузка из грида в эксель

Сама прога требует оптимизации.
Неудачные решения с дополнительными штуками на главном поле типа "да/нет"

65

(8 replies, posted in Russian)

Dreada wrote:

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

Спасибо за такую простую и полезную программу, я очень доволен что наконец-то нашел достаточно простой инструмент для работы с бд!
Сейчас потихоньку делаю первые шаги, и у меня возникло следующее затруднение:

Есть таблица-справочник с одним полем name типа ТЕКСТ.
Есть грид для её просмотра и форма с полем ввода для редактирования.
Само по себе все работает но есть такой нюанс - если ввести текст с несколькими заглавными буквами, например "Кольцо С Букашкой", то после сохранения оно приобретает вид "Кольцо с букашкой", что выглядит красиво, но не применимо для фамилий, например. Я пробовал  в скрипте выставить для инпута свойство CharCase (единственное что нашел), но не помогло.

Имеется также вопрос можно ли вручную добавлять данные в выпадающий список (из скрипта а не из бд), и можно ли менять привязку кнопочек к таблицам из скрипта? У меня просто планируется тьма таблиц-справочников, и хотелось бы сделать единый интерфейс для работы с ними, а то для каждого делать окошки редактирования (хотя даже имена полей одни и те-же) как-то не комильфо.

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

Спасибо!

В файле settings.ini который в папке с Вашей базой
в режиме редактирования в конце после
[DisableUpperCase]
добавляете
ТаблицаюСтрока=

примерно так
organ.name=
Proj.name=

66

(3 replies, posted in Russian)

Diwert wrote:

Добрый день!

Хотел бы для начала поблагодарить за чудесный продукт. Вы делаете действительно полезную, удобную и качественную вещь.

А теперь к вопрос:

Имеем одно поле в таблице БД с типом ДАТА. Соответственно к нему привязан DataTimePicker.
Есть 2 вида отчетов: по компоненту таблицы (из раскрывающегося списка) и по прямому SQL-запросу использующему 2 DataTimePicker-а для выбора диапазона от и до.

В итоге имеем 2 разных отображения в отчетах:
1. В первом случае дата отображается как dd.mm.yyyy
2. Во втором случае к yyyy-mm-dd добавляется ещё и hh.mm.ss.msmsms(миллисекунды вроде).

Во втором случае пытался изменить Format поля в FastReport на тип ДАТА и разными отображениями даты - никого эффекта.

Как можно привести формат второго случая к первому?

Тоже самое касается boolean - в первом случае там "Да" или "Нет", во втором случае "1"  или "0"

Спасибо!


когда формируете SQL запрос выбираете не просто Таблица.Строка а прелобразуете его типа так

select
,strftime('%d.%m.%Y',Таблица.Строка) as Имя

67

(12 replies, posted in Russian)

Добрый день.
Окажите нубу помощь кто может. Дайте совет по формированию отчета с использованием SQL запроса.
Есть 4 таблицы:
1. Организация
2. Проекты
3. Договоры
4. Платежи по договорам

Каждая из последующих является как бы наследницей предыдущей.

Соответственно в отчете я хочу выбрать данные о проеке (табл2) опредленной организации (табл1) с 2-я таблицами (о действующих договорах и платежам по каждому договору).
Проблема в следующем. Если я делаю select данных from Таблица 4 то при отсутствии платежа выбор данных вобще не производиться (а мне надо чтобы шапка отчета все равно содержала данные из тблицы 1 и таблицы 2). Если есть хоть 1 платеж - то все нормально.
Если же я делаю запрос select из Таблицы 2 то шапка всегда выводится но при наличии нескольких платежей (таблица 4) данные о количестве договоров (из Таблицы 3)  дублируются по количеству записей из таблицы 4 (а мне надо чтобы в отчете отражался список Договоров.

Пример отчета:
Организация
- все реквизиты
Проект
- все параметры проекта
Таблица Договоров по данному проекту
- с параметрами
Таблица платежей
- с параметрами привязки к договору.

Если не понятно объяснил - ответьте плиз.

68

(12 replies, posted in Russian)

Добрый день.
Столкнулся со следующей проблемой.
При формировании отчета из нескольких таблиц в одной из граф отчета (скажем наименование организации из  базовой таблицы) некоторые строки не заполняются именно по одной графе. все остальные вторичные графы заполняются а первая нет. Причем это характерно только для от дельных строк. мистика какая то.



Все извините за беспокойство. Накосячил в запросе.

69

(237 replies, posted in Russian)

Добрый день!
Может где то уже и реализовано но не смог найти на форуме.
Все числа не имеют разделителя разряда и отражаются слитно. При больших числах очень неудобно. Пример - 428354287,15 (не сразу понятен размер суммы) а при быстром просмотре надо видеть хотя бы разрядность (сотни или десятки миллионов/тысяч).
Кроме того при выгрузке в Excel - формат ячеек является текстовым и не позволяет проводить дальнейшие необходимые математические операции.

Спасибо за внимание!

70

(33 replies, posted in Russian)

Добрый день.
Есть проблемка. не могу понять ошибку.
Есть таблица proj с полями id_organ (тип - связь), name (тип - текст), date_reg (тип - дата)

Есть форма с элементами ComboBox1, EDIT1, DateTimePicker
При обычном сохранении данные формы заносятся в таблицу proj без проблем.

Попытался использовать при сохранении режим (SQL-запрос) в теле которого написал следующее

INSERT INTO proj (id_organ, name, date_reg)
VALUES (‘{ComboBox1}’, ‘{EDIT2}’, ‘{DateTimePicker1}’).

Пишет следующее - не определен маркер '{'
unrecognized token :'{'