» Использование DevExpress (часть 4)

установил 14.2.2 от Feandy, скины работают

X11
Спасибо. Нашел причину. В SkinController стояло NativeStyle=True. Стояло там с незапамятных времен. Сейчас перестало работать )))) Диво дивное.

Заметил проблемку. В таблице есть поле типа CurrencyEdit. В формате поля прописано: ,0.00;-,0.00.
Так вот, если в поле значение допустим 56,525, то согласно формата выводит 56,52!!! Но это не правильное округление, должно быть 56,53...как побороть данную странность ума не приложу (

Возможно там 56,5251
из-за последней единицы 5 округляется до 4, а 4 до 3

тут проблема не в девках, КМК

russko

Цитата:

Заметил проблемку. В таблице есть поле типа CurrencyEdit. В формате поля прописано: ,0.00;-,0.00.
Так вот, если в поле значение допустим 56,525, то согласно формата выводит 56,52!!! Но это не правильное округление, должно быть 56,53...как побороть данную странность ума не приложу (

При 5 на конце результат округления не определен

russko
В таблице, где есть колонка с деньгами, данные в этой колонке не должны содержать больше 2-х знаков после запятой. Если это не соблюдать, то при различных манипуляциях с этими данными Вас ждет очень много неприятных моментов, чего деньги очень не любят.

Dev 14 VCL

Проблемка такая, TcxDBLookupComboBox , в нём примерно 50 позиций, делаю новую запись в базу, выбираю в TcxDBLookupComboBox например 40ю позицию, сохраняю, создаю новую запись, нажимаю popup - в TcxDBLookupComboBox и на экране с 35й по 45й позиции, а мне нужно чтобы снова с 1й позиции было на экране, проматывать вверх - вниз не удобно, каждый раз начиная поиск с рандомной позиции.

промотай программно, в чем проблема?

X11 так вот проблемка в том, что я не знаю как промотать программно этот popup, какая функция отвечает за "верхнюю часть" списка. Даже при переоткрытии программы этот lokkup воспроизводит последнюю позицию на экране, хотя в поле данных то нет, null там.

изучи DataController и его методы, там должно быть что-то вроде GoFirst, GoLast

Добавлено:
я с трудом представляю всё это и даже не уверен, правильно ли я тебя понял

Жалко картинки нельзя постить.

Подробнее:
есть TcxDBLookupComboBox, в данный момент у него пустое значение,
- я на него нажимаю
- Вываливается список, в котором полоса прокрутки стоит в самом низу, так что я вижу только 10 последних записей.
А мне нужно, чтобы полоса прокрутки стояла в самом верху, и я мог видеть самые первые записи.



LookRaion.DataBinding.DataSource.DataSet.First; - вот это не помогло.
DataController у TcxDBLookupComboBox нету.

Цитата:

Жалко картинки нельзя постить.

если ты даже ссылку на картинку не умеешь делать....



Цитата:

DataController у TcxDBLookupComboBox нету.

откуда такая информация?
А справку скачать и поштудировать? А примеры?

я утверждаю, что есть DataController
https://www.google.com/search?q=TcxDBLookupComboBox+DataController&ie=utf-8&oe=utf-8
http://www.sql.ru/blogs/x11/1350

X11, большое спасибо, увидел что он есть у компонента Grid
LookRaion.Properties.Grid.DataController.GotoFirst;
так работает

D2010, DevExpress 2014.1.4
Использую TcxDBVerticalGrid + TIBDataSet + FBEmbedded (возможен и local-server режим).
Есть таблица, есть поля типа Date (FB).
На машине, где пишу (виртуалка, Win7 x86) - дата при редактировании запросто стирается (становится пустой).
На разных остальных - ну никак не хочет. Ни с эдитом по умолчанию, ни с настроенным явно. Пришлось стирать поле по допкнопке едита, запросом с рефрешем записи.
Все настройки системы для формата даты - по умолчанию. Пробовал на одной и той же базе, FB "одинаковый".
Жесть и мистика...
Никто не сталкивался ?

Стандартная ситуация документ и его содержимое.
Хочу сделать возможность показывать содержимое документа, но не всего, а первых, допустим 5 строк. Если строк больше, то ниже кнопка "Открыть", которая открывает документ уже в новом окне со всеми подробностями.
В по ссылке примерная картинка. что я хочу получить, на примере группы-товары
https://yadi.sk/i/9L4RebT-eLiif

И еще попутно вопрос - можно ли изменить вид кнопок раскрытия/закрытия Detail грида (+/-) на что-то своё?

Добавлено:
вдогонку - суть вопроса - можно ли сделать кнопку, как залить 5 записей я знаю cxGrid

dred2k

Цитата:

Жесть и мистика... Никто не сталкивался ?

Какой компонент TcxDBDateEdit?

jonikDk

Цитата:

Какой компонент TcxDBDateEdit?

Действительно, не уточнил.
Все это с инплейсами вертикального db-грида - что с явно указанным из репозитория редакторов (TcxDateEditProperties), что с дефолтным, если ничего не настраивать в row (ну, он точно такой же, надо заметить).

Подскажите плиз в cxCheckCombobox возможно ли указать цвет текста или фона для каждого пункта которые пользователь выбрал и раскрасить в различные цвета сформированную строку из значений через ";" .

Kmich
Используйте cxExtLookupComboBox.

парни, помогите плиз.

установил девок 2014.2.2 из копилки, русификатор из комплекта. Гружу его как обычно через ресурс стрим в локализатор, но все остается на не нашем могучем. На домашней машине поставил 2014.1.6, все тоже самое и работает. Что не так и как сделать так, чтобы бьло на нашем могучем.

[more=пример]
Procedure TMyDataModule.DataModuleCreate(Sender: TObject);
Var
ResourceStream: TResourceStream;
Begin
ResourceStream := TResourceStream.Create(HInstance, 'de_rus', RT_RCDATA);
Try
cxLocalizer1.LanguageIndex := 1049;
cxLocalizer1.LoadFromStream(ResourceStream);
cxLocalizer1.Active := True;
Finally
MyFreeAndNil(ResourceStream);
End;
End;
[/more]

А из копилки - это откуда? можно ссылку в личку?

там же написано, что локализация от версии 2014.1.6, что ж непонятного?

X11

Цитата:

там же написано, что локализация от версии 2014.1.6, что ж непонятного?

В паке с 2014.2.2 лежит не работоспособная версия rus.ini или ты сказал про отдельный запрос из копилки с русификатором с 2014.1.6?
Про второе я и так знаю, и жду отдельный русификатор под 2014.2.2. Но все же хотелось бы понять, почему локалайзер не подхватывает rus.ini из пака правильно.
дебажил что получается, вроде все ресурсовые константы меняет, но при этом все равно все на буржуйском

Цитата:

В паке с 2014.2.2 лежит не работоспособная версия rus.ini

а ты открыл этот файл? какая там версия?

Подскажите, что за прикол с cxGrid 2014.2.2
есть много левелов, вроде все правильно и как всегда реализовано, бывает в дизайнере, бывает в реале выдает ошибку Control "" has no parent window - что не так ?

Цитата:

Подскажите, что за прикол с cxGrid 2014.2.2  
есть много левелов, вроде все правильно и как всегда реализовано, бывает в дизайнере, бывает в реале выдает ошибку Control "" has no parent window - что не так ?

Юзаются ли методы BeginUpdate / EndUpdate?

У меня тоже такое было при переключении. Но если в design time, то при чём здесь BeginUpdate/EndUpdate?

За давностью уже не помню точно, но кажется мне, что похожая ситуация была вызвана тем, что во время работы над проектом я неоднократно создавал и удалял гриды и левелы. Если при удалении левела забыть прикрепленные к нему гриды, они могут остаться висеть, отображаясь только на закладке "Views" дизайнера грида, не прикрепленные ни к чему, и иногда вызывать всякие непредсказуемые эффекты.

Shepot
Ну вроде не прикрепленные ни к чему гриды (хотя правильней наверное вьюхи, т.к. грид - это гораздо большее в концепции девок) это нормальная ситуация. Можно описать в дизайне несколько вьюх, а в рантайме потом цеплять их к одному и тому же левелу, создавая различное представление для пользователя (к примеру TableView и CardView).
В дизайне у девок со "всякими непредсказуемыми эффектами" встречались больше с LayoutControl, но и то только на ранних версиях оных.
Может автор вопроса опишет чутка больше как это все проявляется в дизайне?

Да тяжело описать, не помню на каком этапе начались приколы.
Было 5 левелов и 5 вьюх, создал вьюху, потом левел, в левеле выбрал вьюху и получил ошибку в дизайнере. Проверил - вроде все нормально - запустил проект - уже ошибка в рантайме. В дизайнере у одного левела отлетела вьюха - перепревязал левелы с вьювами - корректирую что-то - опять бессистемно вываливается ошибка как в дизайнере так и в рантайме

Добавлено:
Только что просто в дизайнере клацал по левелам и получил ошибку

Добавлено:
если поможет вот детали ошибки

[505C61DC]{vcl210.bpl } Vcl.Controls.TWinControl.CreateWnd (Line 9357, "Vcl.Controls.pas" + 13) + $3B
[1C9BEF8A]{cxLibraryRS21.bpl} Cxcontrols.TcxControl.CreateWnd + $22
[505C6766]{vcl210.bpl } Vcl.Controls.TWinControl.CreateHandle (Line 9538, "Vcl.Controls.pas" + 3) + $4
[505CA5E4]{vcl210.bpl } Vcl.Controls.TWinControl.HandleNeeded (Line 12083, "Vcl.Controls.pas" + 4) + $4
[505CA5DB]{vcl210.bpl } Vcl.Controls.TWinControl.HandleNeeded (Line 12082, "Vcl.Controls.pas" + 3) + $7
[505CA5F1]{vcl210.bpl } Vcl.Controls.TWinControl.GetHandle (Line 12089, "Vcl.Controls.pas" + 1) + $2
[1F18E173]{cxGridRS21.bpl} Cxgridcustomtableview.TcxGridFindPanelMRUEdit.Show + $33
[1F1A7232]{cxGridRS21.bpl} Cxgridcustomtableview.TcxGridFindPanelEditViewInfo.ShowEdit + $32
[1F1A827F]{cxGridRS21.bpl} Cxgridcustomtableview.TcxGridFindPanelViewInfo.CalculateVisible + $1B
[1F1A6E91]{cxGridRS21.bpl} Cxgridcustomtableview.TcxCustomGridPartViewInfo.MainCalculate + $15
[1F230A4D]{cxGridRS21.bpl} Cxgridtableview.TcxGridTableViewInfo.CalculateParts + $15
[1F23074D]{cxGridRS21.bpl} Cxgridtableview.TcxGridTableViewInfo.Calculate + $25
[1F1CB4B0]{cxGridRS21.bpl} Cxgridcustomview.TcxCustomGridViewInfo.AdjustClientBounds + $14
[1F1C8A98]{cxGridRS21.bpl} Cxgridcustomview.TcxGridSite.GetClientBounds + $3C
[1F1CBAC4]{cxGridRS21.bpl} Cxgridcustomview.TcxCustomGridViewInfo.MainCalculate + $64
[1F1AFC33]{cxGridRS21.bpl} Cxgriddetailssite.TcxCustomGridDetailsSiteViewInfo.Calculate + $67
[1F1B5BD7]{cxGridRS21.bpl} Cxgrid.TcxGridViewInfo.Calculate + $33
[1F1B5C61]{cxGridRS21.bpl} Cxgrid.TcxGridViewInfo.MainCalculate + $2D
[1F1B4EEF]{cxGridRS21.bpl} Cxgrid.TcxGridLayoutChange.Execute + $6F
[5005F87D]{rtl210.bpl } System.@AfterConstruction (Line 16999, "System.pas" + 2) + $5
[1F1B7809]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.DoChange + $35
[1F1B7D7B]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.Changed + $2F
[1F1B7E74]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.LayoutChanged + $20
[1F1B5095]{cxGridRS21.bpl} Cxgrid.TcxGridSizeChange.Execute + $A9
[1F1B7809]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.DoChange + $35
[1F1B7D7B]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.Changed + $2F
[1F1CEBCE]{cxGridRS21.bpl} Cxgridcustomview.TcxCustomGridView.Changed + $A6
[1F1CEED5]{cxGridRS21.bpl} Cxgridcustomview.TcxCustomGridView.SizeChanged + $35
[1F1B5015]{cxGridRS21.bpl} Cxgrid.TcxGridSizeChange.Execute + $29
[1F1B7809]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.DoChange + $35
[1F1B7D7B]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.Changed + $2F
[1F1B7EBC]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.SizeChanged + $24
[1F1B634D]{cxGridRS21.bpl} Cxgrid.TcxCustomGrid.SetActiveLevel + $41
[1F1D0C69]{cxGridRS21.bpl} Cxgridlevel.TcxGridLevel.SetActive + $25
[1F1D162A]{cxGridRS21.bpl} Cxgridlevel.TcxGridLevel.MakeVisible + $12
[1EDFF14B]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureNavigator.NotifyEditors + $FB
[1EDFF1A2]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureNavigator.SelectionChanged + $4E
[1EDFC698]{dclcxGridRS21.bpl} Cxgridstructurenavigator.FillRegisteredViewsMenu + $464
[211426C3]{designide210.bpl} ComponentDesigner.DesignNotificationSelectionChanged (Line 8748, "ComponentDesigner.pas" + 5) + $A
[2113DCD4]{designide210.bpl} ComponentDesigner.TComponentDesigner.SetSelection (Line 6937, "ComponentDesigner.pas" + 20) + $5
[2113E266]{designide210.bpl} ComponentDesigner.TComponentDesigner.UpdateSelections (Line 7005, "ComponentDesigner.pas" + 19) + $C
[211392AC]{designide210.bpl} ComponentDesigner.TComponentRoot.SelectionsChanged (Line 5381, "ComponentDesigner.pas" + 36) + $8
[2113C373]{designide210.bpl} ComponentDesigner.TSelections.SelectionChanged (Line 6481, "ComponentDesigner.pas" + 1) + $E
[2110628A]{designide210.bpl} Designer.TSelectionListenerHelper.SelectionChanged (Line 2331, "Designer.pas" + 2) + $28
[21106152]{designide210.bpl} Designer.TSimpleSelections.Modified (Line 2273, "Designer.pas" + 3) + $C
[21105FD3]{designide210.bpl} Designer.TSimpleSelections.EndSelections (Line 2228, "Designer.pas" + 2) + $0
[211361C0]{designide210.bpl} ComponentDesigner.TComponentRoot.SetSelections (Line 4427, "ComponentDesigner.pas" + 9) + $E
[16DB6C0F]{dclcxLibraryRS21.bpl} Cxdesignwindows.TcxDesignWindow.SetSelectionList + $67
[16DB6DEF]{dclcxLibraryRS21.bpl} Cxdesignwindows.TcxDesignFormEditor.SelectComponents + $F
[1EDF936A]{dclcxGridRS21.bpl} Cxgrideditor.TcxGridEditor.GridStructureControlSelectionChanged + $62
[1EDFDA75]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureControl.SelectionChanged + $15
[1EDFD833]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureControl.AddToSelection + $8B
[1EDFDA3B]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureControl.SelectComponent + $F
[1EDFD66F]{dclcxGridRS21.bpl} Cxgridstructurenavigator.TcxGridStructureControl.MouseDown + $7B
[505C3270]{vcl210.bpl } Vcl.Controls.TControl.DoMouseDown (Line 7371, "Vcl.Controls.pas" + 7) + $2B
[505C32BF]{vcl210.bpl } Vcl.Controls.TControl.WMLButtonDown (Line 7382, "Vcl.Controls.pas" + 7) + $E
[505C2C15]{vcl210.bpl } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
(00039EF6){CnWizards_DXE7.dll} [0E6AAEF6]
[505C6F5D]{vcl210.bpl } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9814, "Vcl.Controls.pas" + 9) + $2A
[505C76E2]{vcl210.bpl } Vcl.Controls.TWinControl.WndProc (Line 10038, "Vcl.Controls.pas" + 153) + $6
[5005F87D]{rtl210.bpl } System.@AfterConstruction (Line 16999, "System.pas" + 2) + $5
[5005F0E0]{rtl210.bpl } System.TObject.Create (Line 15706, "System.pas" + 1) + $4
[1C9BF22F]{cxLibraryRS21.bpl} Cxcontrols.TcxControl.WndProc + $13B
[1C956145]{cxLibraryRS21.bpl} Dxhooks. + $0
[505C6D1C]{vcl210.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9750, "Vcl.Controls.pas" + 3) + $6
[5016E218]{rtl210.bpl } System.Classes.StdWndProc (Line 16600, "System.Classes.pas" + 8) + $0
[0E7805C6]{CnWizards_DXE7.dll} Unknown function at INITWIZARD0001 + $6EE1A
[507176C9]{vcl210.bpl } Vcl.Forms.TApplication.CancelHint (Line 11181, "Vcl.Forms.pas" + 6) + $D
[5071635B]{vcl210.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10352, "Vcl.Forms.pas" + 23) + $1
[5071639E]{vcl210.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10382, "Vcl.Forms.pas" + 1) + $4
[507166D1]{vcl210.bpl } Vcl.Forms.TApplication.Run (Line 10520, "Vcl.Forms.pas" + 26) + $3


Добавлено:
Не знаю почему - прикол был из-за FindPanel - стояла на всех левелах - убрал все норм.