Правила Форума редакция от 22.06.2020 |
|
|
|
|
|
Опции темы | Опции просмотра | Language |
18.11.2008, 21:41 | #1 |
И снова DevExpress
Людь, будьте человеками, киньте ссылку на инсталятор свежих DevExpress под Delphi 7 или Delphi 2008, а то пока разберешься что и как компилировать - ногу об клаву сломаешь. В нете искал - ничего стоящего не нашел, или компоненты по отдельности и старые или компилировать надо. Заранее спасибо за человечность и быстрый ответ.
|
|
Реклама: | Рекомендуем компьютерную фирму КНС LS32D700EAIXCI - билеты на футбол в подарок каждому покупателю | Выгодное предложение от интернет-магазина KNSneva.ru - xeon silver 4215r - КНС Санкт-Петербург - мы дорожим каждым клиентом! | циркониевые коронки под ключ | В КНС всегда быстро, выгодно, удобно: Yealink SIP-T33P купить - билеты на футбол в подарок каждому покупателю | тинькофф интеграция с эльбой |
19.11.2008, 09:35 | #2 |
Re: И снова DevExpress
Ну вы млин даете! http://www.nowa.cc/showpost.php?p=2014564&postcount=533
|
|
Эти 2 пользователя(ей) сказали cпасибо за это полезное сообщение: |
28.11.2008, 11:52 | #3 |
Новичок
Пол: Регистрация: 02.09.2006
Сообщений: 8
Репутация: 0
|
Re: И снова DevExpress
С какой версии DevExpress имеется поддержка RAD2009?
|
01.12.2008, 09:32 | #4 |
Re: И снова DevExpress
|
|
01.12.2008, 16:46 | #5 |
Неактивный пользователь
Регистрация: 14.11.2008
Сообщений: 7
Репутация: 1
|
Re: И снова DevExpress
Подскажите плизз!
Закачиваю csv файлик в cxGrid Колонки создаю сам перед заполнением. Вот строка, в которой данные в колонке должны прижаться вправо: AColumn.Properties.Alignment.Horz := taRightJustify; где ( AColumn: TcxGridColumn; ) ошибок не выдает до тех пор пока дело не дойдет до использования. Ошибка возникает в модуле cxEdit библтотеки DevExpress Как решить эту проблему в cxGrid? Например заголовок колонки: AColumn.HeaderAlignmentHorz := taRightJustify; нормально выравнивается. |
01.12.2008, 22:35 | #6 |
Новичок
Пол: Регистрация: 23.11.2007
Сообщений: 15
Репутация: 2
|
Re: И снова DevExpress
Привет, когда я делаю что-то для заменя внешнего вида cxGrid-а, я делаю так
cxGrid1TableView1.BeginUpdate; ..... /замена внешнии вид какой-то компонент из cxGrid1TableView1 cxGrid1TableView1.EndUpdate; попробуй .... |
02.12.2008, 09:11 | #7 |
Неактивный пользователь
Регистрация: 14.11.2008
Сообщений: 7
Репутация: 1
|
Re: И снова DevExpress
Я так и делаю - BeginUpdate/EndUpdate; - это к обновлению в конечном итоге информации в таблице - это я делаю. Тут так сказать проблем нет Проблема в том что в гриде по умолчанию у колонок выравнивание по левому краю - т.е. все данные прижимаются влево. Я могу изменить только у заголовка колонки выравнивание а вот у ячеек с данными ничего при этом не меняется. Я так понял что нужно изменять параметры именно у ячеек (у каждо) либо у колонки но каким то хитрым способом. Не получилось |
03.12.2008, 20:27 | #8 | |||||||||||||||||||||||
Новичок
Пол: Регистрация: 23.11.2007
Сообщений: 15
Репутация: 2
|
Re: И снова DevExpress
Привет, Решение очень просто. Кололонок выравниваются по стандартам - текст - слево, цифры - справа. Но ты сможеш переменят это в поле Column1.Properties. Эсли ты положиш какой-то тип, то у него эсть настройка Aligment.Horisontal или Aligment.Vertical. То и тебе нужно! |
|||||||||||||||||||||||
04.12.2008, 15:56 | #9 | |||||||||||||||||||||||
Неактивный пользователь
Регистрация: 14.11.2008
Сообщений: 7
Репутация: 1
|
Re: И снова DevExpress
Код:
function CreateColumnCaption( ColumnCount: integer; ColumnWidth: array of integer; ColumnHeaderAlignmentHorz: array of TAlignment; ColumnAlignmentHorz: array of TAlignment; ColumnValueType: array of string; ColumnCaption: array of string; cxGTV: TcxGridTableView ):TcxGridTableView; var i, j, k: Integer; AColumn: TcxGridColumn; begin cxGTV.BeginUpdate; if cxGTV.ColumnCount > 0 then for i := cxGTV.ColumnCount-1 downto 0 do cxGTV.Columns[i].Destroy; try for i := 0 to ColumnCount - 1 do begin AColumn := cxGTV.CreateColumn; AColumn.Caption := ColumnCaption[i]; AColumn.Width := ColumnWidth[i]; AColumn.HeaderAlignmentHorz := ColumnHeaderAlignmentHorz[i]; AColumn.DataBinding.ValueType := ColumnValueType[i]; AColumn.Properties.Alignment.Horz := ColumnAlignmentHorz[i]; - тут ОШИБКА :( end; finally cxGTV.EndUpdate; end; Result := cxGTV; end; Последний раз редактировалось pluton; 04.12.2008 в 16:11.. Причина: для кода юзаем тег code |
|||||||||||||||||||||||
Сказали спасибо: |
04.12.2008, 19:39 | #10 |
Новичок
Пол: Регистрация: 23.11.2007
Сообщений: 15
Репутация: 2
|
Re: И снова DevExpress
Привет,
этот код, может, поможет тебе: Код:
for i := 0 to GridORTView.ColumnCount -1 do begin GridORTView.Columns[i].Width := 70; GridORTView.Columns[i].Options.Editing := False; GridORTView.Columns[i].Options.Filtering := False; GridORTView.Columns[i].Options.FilteringMRUItemsList := False; GridORTView.Columns[i].Options.Focusing := False; GridORTView.Columns[i].Options.Grouping := False; GridORTView.Columns[i].Options.HorzSizing := False; GridORTView.Columns[i].Options.IncSearch := False; GridORTView.Columns[i].Options.Moving := False; GridORTView.Columns[i].Options.Sorting := False; GridORTView.Columns[i].HeaderAlignmentHorz := taCenter; GridORTView.Columns[i].HeaderAlignmentVert := vaBottom; if (i = 2) then begin GridORTView.Columns[i].PropertiesClass := TcxDateEditProperties; with TcxDateEditProperties(GridORTView.Columns[i].Properties) do begin Alignment.Horz := taCenter; Kind := ckDate; end; GridORTView.Columns[i].BestFitMaxWidth := 70; GridORTView.Columns[i].MinWidth := 70; GridORTView.Columns[i].OnGetDisplayText := GridORTViewGetDisplayText; end; if (i = 3) OR (i = 4) then begin GridORTView.Columns[i].PropertiesClass := TcxTimeEditProperties; with TcxTimeEditProperties(GridORTView.Columns[i].Properties) do begin TimeFormat := tfHourMin; end; GridORTView.Columns[i].Properties.Alignment.Horz := taCenter; GridORTView.Columns[i].BestFitMaxWidth := 70; GridORTView.Columns[i].MinWidth := 70; end; if (i = 5) OR (i > 6) then begin GridORTView.Columns[i].PropertiesClass := TcxCurrencyEditProperties; with TcxCurrencyEditProperties(GridORTView.Columns[i].Properties) do begin DisplayFormat := '0.00'; end; GridORTView.Columns[i].Properties.Alignment.Horz := taRightJustify; GridORTView.Columns[i].BestFitMaxWidth := 70; GridORTView.Columns[i].MinWidth := 70; GridORTView.Columns[i].Summary.FooterKind := skSum; end; end; Последний раз редактировалось pluton; 04.12.2008 в 20:21.. Причина: код - в тег code |
Сказали спасибо: |
05.12.2008, 09:13 | #11 | |||||||||||||||||||||||
Неактивный пользователь
Пол: Регистрация: 06.03.2007
Сообщений: 19
Репутация: 11
|
Re: И снова DevExpress
Перестаньте гадать на кофейной гуще :-) Заглятите в исходники...посмотрите реализацию свойства Properties Перед строчкой с ошибкой...нужно (или 1 или 2) 1) AColumn.PropertiesClassName:='XXX';//Или задать имя класса 2) AColumn.PropertiesClass:=TXXXClass;//Или задать сам класс А у ж потом: AColumn.Properties.Alignment.Horz := ColumnAlignmentHorz[i]; |
|||||||||||||||||||||||
Эти 3 пользователя(ей) сказали cпасибо за это полезное сообщение: |
05.12.2008, 10:21 | #12 |
Неактивный пользователь
Регистрация: 14.11.2008
Сообщений: 7
Репутация: 1
|
Re: И снова DevExpress
Всем поучавствовавшим в разборе полетов ОГРОМНОЕ спасибо - вопрос решен!!!
Не хватало именно GridORTView.Columns[i].PropertiesClass := TcxDateEditProperties; т.е. объявления класса! А уж после объявления его можно добираться и до Alignment Еще раз спс! Добавлено через 30 минут Последний раз редактировалось Shadow_Hawk; 05.12.2008 в 10:53.. Причина: Добавлено сообщение |
15.12.2008, 14:55 | #13 |
Неактивный пользователь
Регистрация: 14.11.2008
Сообщений: 7
Репутация: 1
|
Re: И снова DevExpress
Уважаемые знатоки!
Появилась еще 1 насущная проблема Как связать 2 cxGrid`а вместе. Я так понимаю, что встав на строчку в одном гриде - необходимо взять значение какого-либо уникального поля, предположим, IB, а потом настроить ( передать некий параметр ) второй грид так, чтобы совпадали значения в одноименном поле. Как я понял необходимо обрабатывать событие OnSelectionChanged в TableView1 и апдейтить содержимое TableView2 с использованием ФИЛЬТРА. Добавлено через 1 час 16 минут Вопрос закрыт - сам дошел! ВОТ мой шедевр для таких же начинающих. И работает ! procedure TForm1.SetFilterByIB(); begin try TableView3.DataController.Filter.Active := false; TableView3.DataController.Filter.BeginUpdate; TableView3.DataController.Filter.Root.Clear; TableView3.DataController.Filter.Root.AddItem(Tabl eView3.Columns[0], foLike, TableView2.Columns[2].EditValue, TableView2.Columns[2].EditValue); TableView3.DataController.Filter.Active:=true; TableView3.DataController.Filter.EndUpdate; finally end; end; Последний раз редактировалось Shadow_Hawk; 15.12.2008 в 16:12.. Причина: Добавлено сообщение |
17.12.2008, 15:43 | #14 |
Новичок
Пол: Регистрация: 26.11.2007
Сообщений: 27
Репутация: 20
|
Re: И снова DevExpress
Shadow_Hawk, Master Detail связь сделать нельзя что ли сделать
|
21.12.2008, 13:49 | #15 |
Новичок
Пол: Регистрация: 24.08.2008
Сообщений: 7
Репутация: 0
|
Re: И снова DevExpress
не втему, но всетаки а какой грид вообще самы быстрый? (отрисовка итп.)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
DevExpress CodeRush и Refactor! Pro | FallenGameR | Варезник | 6 | 14.05.2011 20:06 |
DevExpress на Windows Vista | yourhost | Компоненты | 12 | 11.04.2011 15:14 |
DevExpress и Extragrid | elnar777 | Компоненты | 5 | 25.11.2009 17:12 |
DevExpress PivotGrid проблема с выводом данных | tevtonec | Компоненты | 1 | 19.10.2008 00:44 |
и снова low ID | izverg | P2P-системы & Soft | 24 | 20.03.2006 22:00 |
|
|