» Вопросы по Delphi (версии 2009, 2010 Weaver, 2011 Fulcrum)

Direct Oracle Access

JAPWork

Цитата:

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

Да, только регионами и спасаюсь. Но насчет логично - не согласен. ИМХО, не надо парсить весь код, пока я не выйду из тела процедуры, то бишь, пока курсор редактирования не выйдет.

relictus


Цитата:

ИМХО, не надо парсить весь код, пока я не выйду из тела процедуры, то бишь, пока курсор редактирования не выйдет.

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

psa1974

Кстати у тебя апдейт 3 стоит?

snike555

Цитата:

Кстати у тебя апдейт 3 стоит?

Нет. Интересно, а у spasius стоит апдейт 3 (у него как и у меня проблема не наблюдается)?

Что я думаю:
Свойство Column в гриде - имеет тип TColumns и наследуется от TCollection. Для этого свойства вызывается стандартный редактор свойства (у меня, по крайней мере) и для каждого столбца отображает опубликованные свойства класса TColumn, который унаследован от TCollectionItem. Таким образом поскольку сво-во FieldName является строковым и для него я не нашел специального редактора свойства (у меня, по крайней мере), то и поведение дизайнера стандартно и руководствуется при установке значения свойству TColumns[i].FieldName собственно методом TColumn.SetFieldName в модуле DBGrids.pas. Сам метод у меня имеет такой вид:

Код: procedure TColumn.SetFieldName(const Value: WideString);
var
AField: TField;
Grid: TCustomDBGrid;
begin
AField := nil;
Grid := GetGrid;
if Assigned(Grid) and Assigned(Grid.DataLink.DataSet) and
not (csLoading in Grid.ComponentState) and (Length(Value) > 0) then
AField := Grid.DataLink.DataSet.FindField(Value); { no exceptions }
FFieldName := Value;
SetField(AField);
Changed(False);
end;

psa1974
У меня ещё и гриды все Ehlibовские

snike555

Цитата:

У меня ещё и гриды все Ehlibовские

Ага, потихоньку выплывают детали... То, о чем я и говорил: если взглянуть на процедуру Register в модуле EhLibReg.pas, нельзя не заметить, строку:

Код: RegisterPropertyEditor(TypeInfo(string), TColumnEh, 'FieldName', TDBGridEhFieldProperty);

Хм, сейчас проверил и тот и тот грид и DOA и TTable, замечано что если у DBGrid и у DBGridEh заполнен DataSource ну и вся цепочка до сессии, то ошибка вылазиет, если DataSource у грида пуст, то проверки нет.

psa1974
snike555
тест запускал на машине без Обновлений вообще. Из установленых компонентов девки и юнидак.
Думаю гвоздь в стронних редакторах свойств. Ehlib какой версии?

5.0.13 Но боюсь не в нем дело

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

snike555
у меня все компаноиды связаны между собой, т.е. у DBGrid заполнен DataSource и никаких ошибок. Непонятно, что у тебя там творится... Сейчас специально проинсталлил Ehlib, проверил связку TTable+TDataSource+TDBGridEh (связи установлены)... Все ну просто идеально, все пишется, ни на что не ругается и при активном НД и при неактивном. Явно у тебя какие-то компаноиды стоят глючные... Не знаю. Я иссяк, идей больше нет.

а с риббонами тоже все нормально?
начинаю коситься на делфю

snike555
Аналогично - пишет "Only Ribbon Groups can be inserted into a Ribbon Page." Я где-то когда-то слышал, что тут с добавлениями компонентов на рибон есть косяк типа "фича", которая тянется с самого начала, как только в Дельфи риббоны появились. Но деталей не знаю ибо не пользовался еще рибонами... Может кто подскажет?

Добавлено:
snike555
Думаю с самой Дельфи у тебя все в порядке, а вот с окружением (библиотеки компонент) что-то не то... Мы ж тут не знаем, что ты еще там у себя проинсталлил И потом, у меня нету этого ДОА...

С риббонами как-то через АктивМенеджер крива-коса вроде можно работать, но у меня красиво с ним не получается. А риббон очень хочется, просьба раскрыть тайну.

snike555
Гляньте демку, которая в папке Demos. Там показано как кинуть на риббон тривью и и еще чтото.

Цитата:

Гляньте демку, которая в папке Demos. Там показано как кинуть на риббон тривью и и еще чтото.

Всё собирался это сделать

у меня такая вот мелочь вроде, но не приятно
при установки новых package не видны их закладки в старо-стильном варианте
до тех пор пока не отроешь проект другой, или новый создашь

anpsoft
аналогично

или вот еще
ставил pakage сторонний через установщик
точно не помню но вроде Virtual Treeview
он прописал пути в environment секцию

в итоги при компиляции не находит ничего
а если добавить как обычно - сам потом убирает автоматом

пока не убрал ручками прямо с реестра пути к сорцам, и не прописал потом как обычно - не помогло

была написана на старой версии студии (не помню уже на какой) маленькая утилитка:


Код: for i := 30 to 300 do
memo1.Lines.add(inttostr(i)+'. '+chr(i));

Цитата:

а тут должно быть АБВГ...видать в студии что-то изменилось...подскажите как сделать, что бы символы корректно выводились.

Начиная с 2009 студии по умолчанию используется Unicode

а как быть? мне надо вывести ASCII таблицу русских символов

Пиши вывести от символа такого-то до символа такого-то, в рекомендациях было все цифры перевести в значки (символы).

можно же как-то отключить юникод?

Цитата:

можно же как-то отключить юникод?

К сожалению в текущих версиях делфи нет.

Это баг или я что не так делаю?
Кинул ImageList на форму, добавил в него 32-битный png, связал с PageControl'ом и выбрал для одного таба (стиль tsButtons) эту иконку:


Вопрос: почему в дизайнере все ОК, а в запущенной проге вокруг иконки - черный квадрат? Как пофиксить?

тогда есть ли команда выводить символы не из юникодной таблицы ASCII?
то есть я пользую "chr(i)". может есть какая-нибудь команда аналогичная, что бы можно было получить не юникодную таблицу?

moverast

Код: for i := 30 to 300 do
memo1.Lines.add(inttostr(i)+'. '+ AnsiChar(i));

relictus


Цитата:

Вопрос: почему в дизайнере все ОК, а в запущенной проге вокруг иконки - черный квадрат? Как пофиксить?

используй BMP он фон сам прозрачным сделает

relictus
в свойствах проекта стоит галка "Enable runtime themes"?