On-line: Oskar_AAA, гостей 3. Всего: 4 [подробнее..]
АвторСообщение



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 26.12.06 15:12. Заголовок: TSBrowse


В TSBrowse при изменении высоты строки несовсем верно работает scrollbar
Кроме того TSBrowse не работает с CDX
Кто-нить боролся с этим ?

Спасибо: 0 
Цитата Ответить
Ответов - 6 [только новые]





Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 27.12.06 10:01. Заголовок: Re:


fil пишет:

 цитата:
Кроме того TSBrowse не работает с CDX
Кто-нить боролся с этим ?


Работает он со всем, что используется.
Так что бороться надо с чем-то другим :))) Ты проверь , а сдх у тебя именно в ЭТОЙ програмульке работает?

Спасибо: 0 
Цитата Ответить



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 28.12.06 09:20. Заголовок: Re:


Если не использовать Six, Comix.., то TSBrowse просит функцию ORDKEYNO() коей нет в Clipper.lib 5.2
она есть в 5.3 - что, нужно поставить Clipper.lib 5.3 ?

Спасибо: 0 
Цитата Ответить



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 28.12.06 12:38. Заголовок: Re:


fil пишет:

 цитата:
что, нужно поставить Clipper.lib 5.3 ?


Знаешь , по хорошему уже пора в холдильник водочку ставить :)) Новый Год на носу :))
FW у меня работал со всеми версиями клиппера. Сначало Six.Из за глючности перешел на Comix,
Тоже не очень вариант :) Такчто лушше ставь хХарбор :)))

Спасибо: 0 
Цитата Ответить



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 28.12.06 19:26. Заголовок: Re:


Ты либо по теме пиши либо водочку в холодильник ставь, котлеты отдельно мухи тож..

Спасибо: 0 
Цитата Ответить



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 29.12.06 11:08. Заголовок: Re:


fil пишет:

 цитата:
котлеты отдельно мухи тож..


Как Вы со мной ... сурово. Ну ладно , Новый Год.
Смотрим бровс:
13.- "TSBrowse" supports several RDD'S: DBFCDX, COMIX, ADS, SIX, DBFNTX,
as well as objects like oDbf, oCtx, oTree and Arrays.
(other RDD's can be added as soon as I get the definition of some database functions that they handle)

Теперь можно поинтересоваться в исходниках :) Обратите внимание, когда идет обращение к ORDKEYNO()

If cRDDName == "COMIX"
::cDriver := "COMIX"
::bTagOrder := &( "{|uTag|OrdSetFocus(uTag)}" )
cType := Type( "cmKeyNo()" )
If ( ::lClipMore := ( cType == "C" .or. cType == "UI" ) )
::bKeyNo := &( "{|cTag|cmKeyNo(cTag) }" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag| cmKeyCount( cTag ) }" ) )
::bGoToPos := &( "{|n| cmKeyGoTo( n ) }" )
Else
::bKeyNo := &( "{|cTag|cmxKeyNo(cTag)}" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag| cmxKeyCount( cTag ) }" ) )
::bGoToPos := &( "{|n| cmxKeyGoTo( n ) }" )
EndIf
Elseif cRDDName $ "DBFCDX_DBFCDX"
::cDriver := "CDX"
::bKeyNo := &( "{|uTag|OrdKeyNo(uTag)}" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag|OrdKeyCount(cTag)}" ) )
::bGoToPos := &( "{|n|OrdKeyGoTo(n) }" )
::bTagOrder := &( "{|uTag|OrdSetFocus(uTag)}" )
Elseif "XAX" $ cRDDName
::cDriver := "ADS"
::bKeyNo := &( "{||AX_KeyNo()}" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag| AX_KeyCount( cTag ) }" ) )
::bTagOrder := &( "{|uTag|OrdSetFocus(uTag)}" )
Elseif "ADS" $ cRDDName
::cDriver := "ADS"
::bKeyNo := &( "{||ADSKeyNo()}" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag| ADSKeyCount( cTag,, 1 ) }" ) )
::bTagOrder := &( "{|uTag|OrdSetFocus(uTag)}" )
Elseif cRDDName $ "DBFNSX_SIXCDX_SIXNSX_SIXMDX"
::cDriver := "NSX"
::bKeyNo := &( "{||sx_KeyNo()}" )
::bLogicLen := If( ::lFilterMode,;
{||(::cAlias)->(Self:RecCount(::uValue1))}, ;
&( "{|cTag| Sx_KeyCount(cTag)}" ) )
::bGoToPos := &( "{|n| sx_KeyGoTo( n ) }" )
cType := Type( "sx_SetTagO()" )

If cType == "C" .or. cType == "UI"
::bTagOrder := &( "{|cTag| sx_SetTagOrder( cTag ) }" )
Else
::bTagOrder := &( "{|cTag| OrdSetFocus(cTag) }" )
EndIf

Else // DBFNTX considered default RDD
::cDriver := "NTX"
Ну и так далее...

Если бы был текст Вашей пр-мы может и можно было бы что подсказать. А так общий вопрос-общий ответ.
И еще. Сегодня переходить на слиппер 5.3 , на мой взгляд, смысла нет .Еще раз извините повторюсь - лучше хХарбор .





Спасибо: 0 
Цитата Ответить
постоянный участник


Пост N: 266
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 29.12.06 14:51. Заголовок: Re:


ММК пишет:

 цитата:
И еще. Сегодня переходить на слиппер 5.3 , на мой взгляд, смысла нет


У каждого время течет по разному!

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 253
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет