Форум: "Базы";
Текущий архив: 2003.06.12;
Скачать: [xml.tar.bz2];
ВнизРабота с БД Найти похожие ветки
← →
AlexAvz (2003-05-22 15:41) [0]Уважаемые мастера, помогите разрешить проблему.
У меня программа учета движения товаров где отображается приход и расход товаров,
наличие товара на складе. Естественно при приходе или расходе товара создаются накладные,
так вот, проблема состоит в том что мне нужно как-то отобразить что накладная проведена,
т.е. вывисти в поле таблицы какойто значок типа "галочки", отображать какие то буквы или
знаки припенания не серьезно. Подскажите как правильно вывести нужный мне символ
(Таблица PARADOX)
Заранее спасибо
← →
Соловьев (2003-05-22 15:44) [1]
> проблема состоит в том что мне нужно как-то отобразить что
> накладная проведена,
> т.е. вывисти в поле таблицы какойто значок типа "галочки",
> отображать какие то буквы или
> знаки припенания не серьезно.
в таблице хранить false или true, а при отображении в DBGrid.OnDrawColumnCell рисовать что душа пожелает.
← →
AlexAvz (2003-05-22 16:47) [2]Уважаемый Соловьев не могли вы бы привести пример кода, а то
у меня сильно мало информации и нечго не получается
Спасибо
← →
Stas (2003-05-22 16:48) [3]Есть Dbgrideh там и рисовать ничего ненадо сам GRid определяет.
← →
AlexAvz (2003-05-22 16:53) [4]Приведите пожалуйста пример кода Плиссссссс!!!!!!!!!!!
← →
dtm (2003-05-22 16:54) [5]Я когда-то заводил ещё одну таблицу со статусом документов - проведён/не проведён. В момент проведения проводок менял ID документа с непроведённого на проведённый.
Можно просто в специально созданном для этого поле выставлять 0 или 1 (аналог булевых значений), и использовать EhLib - для отображения чек-бокса в нём напротив проведённых документов.
← →
dtm (2003-05-22 17:00) [6]> AlexAvz
> Приведите пожалуйста пример кода Плиссссссс!!!!!!!!!!!
Если использовать DbGridЕh, то в свойстве TColumn (которая отображает поле со статусом проведён/не проведён) в свойстве KeyList сначала заносишь значение поля, для которого чек-бокс болжен быть помечен, во второй строке - значение поля, для которого чек-бокс должен оставаться пустым. Потом свойство CheckBoxes выставляешь в True - должно работать.
Можно просто окрашивать разным цветом строки таблицы:
procedure TFrmMain.DBGridDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if ibQ.FieldByName("PRINT").AsInteger = 0 then
DBGrid.Canvas.Brush.Color := clSkyBlue;
if ibQ.FieldByName("PRINT").AsInteger = 1 then
DBGrid.Canvas.Brush.Color := clMoneyGreen;
DBGrid.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
Здесь если документ отпечатан, он отображается зелёным, иначе - светло-синим.
← →
Anatoly Podgoretsky (2003-05-22 17:02) [7]Правилный симво Х или х
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.06.12;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.01 c