Блог по программированию в среде Delphi

Поиск по блогу

Есть идея по созданию интересной программы?

Опиши тут и я по возможности постараюсь это реализовать специально для тебя! Без $ ))

суббота, 13 июля 2013 г.

ADO фильтрация данных с именем столбца содержащим пробелы

Имеем запрос к таблице следующего вида:
SELECT
    ID_Task as 'ID', Text_task as 'Задачи',
    Term_task as 'Выполнить до:'
from Task

Необходимо отфильтровать данные, но если написать  в фильтре
filter:='Выполнить до: LIKE '+ QuotedStr(DateToStr(Now));
это приведет к возникновению исключительной ситуации, и вызову диалогового окна  с описанием, изображенного на рисунке 1.

Аргументы имеют неверный тип, выходят за пределы допустимого диапазона или вступают в конфликт друг с другом
Рисунок 1 - Скрин диалогового окна с описанием исключительной ситуации


Необходимо взять название столбца в квадратные скобки [ ].


После внесения изменений, получится следующее выражение:
filter:='[Выполнить до:] LIKE '+ QuotedStr(DateToStr(Now));

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

вторник, 21 мая 2013 г.

понедельник, 20 мая 2013 г.

MasterData фиксированное количество строк

Имеем
MasterData1

Добавляем еще один MasterData (MasterData2), в диспетчере свойств, устанавливаем свойство Visible в False, на случай если строк в MasterData1 и так будет достаточно.

Получаем
MasterData1
MasterData2
В MasterData2 делаем пустую строку нашего MasterData.
В обработчике  события OnBeforePrint MasterData2 вставляем код:

procedure MasterData2OnBeforePrint(Sender: TfrxComponent);
var
  EmptyCount: integer;    
begin
  EmptyCount := 10-MasterData1.RowCount; //имеется в виду, что будет 10 строк постоянно
  if EmptyCount > 0 then
  begin
    MasterData2.Visible:=True;                                            
    MasterData2.RowCount := EmptyCount;
  end;
end;

Header в FastReport 4 не отображается перед MasterData

Имеем:

Header1
MasterData1


Как вариант положите перед этим Header1 еще один MasterData2 в котором будут данные всегда и сделайте его невидимым. Header1 теперь будет виден у вас в независимости от того есть ли данные в MasterData1.

Результат:

Header1
MasterData2
MasterData1

Error Class TfrxCheckboxView not found



Бросьте в проект компонент frxCheckBoxObject или подключите файл frxChBox.pas к проекту в ручную.

четверг, 16 мая 2013 г.

IBExpert приятные моменты))

Неприятное сообщение в  IBExpert:
This operation is not defined for system tables. unsuccessful metadata update. cannot delete

Данное сообщение возникло в процессе попытки удаления поля, и было весьма неприятно и не понятно с чем оно связано. Из внешних ключей удалил, но поле активно сопротивлялось моим действиям. Оказалось, что IBExpert проверяет использование полей не только в связях с другими таблицами, но так же идет проверка в триггерах и процедурах.
Закомментировал процедуру, где использовалось удаляемое поле и все прекрасно удалилось.

Спасибо разработчикам IBExpert за их прекрасный инструмент!

среда, 19 сентября 2012 г.

Настройка импульсного или тонового набора на телефоне LG GT-7320

Сам много времени искал мануал и нашел печатный вариант, вот от сканировал для людей у которых возможно возникнет подобная проблема.
Лист из инструкции

понедельник, 10 сентября 2012 г.

Java SE Downloads глюк


Java SE Downloads работает под администратором под учетной записью пользователя ноль)).
Следует просто удалить все что связано с Java SE Downloads, все обновления через установку и удаление программ. После удаления необходим выполнить перезагрузку ПК и потом установить Java SE Downloads необходимой версии.

понедельник, 9 июля 2012 г.

Удаление истории статусов из блога mblogi.qip

После того как случайно наткнулся на историю статусов квипа решил по удалять их, но дело это оказалось весьма муторным в связи с тормозами сайта. Стало лень, а лень-это двигатель прогресса написал вот такую утилиту для этого дела. Программа удаляет все сообщения из блога  mblogi.qip собственно я и не знал, что у меня там блог ведется)) и решил почистить инет от говна))

Исходный код программы представлен ниже: