Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема / 4 сообщений из 4, страница 1 из 1
09.06.2005, 10:34:51
    #33108695
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема
Есть проблема с использованием тэгов для колонок TDBGrid.
Tag - имеет тип Object и никак не могу найти как провреить строка ли там хранится.
Всякие isNull, isEmpty не помогут.
'А если напишу:
Код: plaintext
TDBGrid1.Columns(i).Tag = rsG("Tag")     'без Cstr( )
'то ввобще не текст, а DataField в тэге хранится
В хелпе написано, что можно еще и Columns().DefaultValue использовать (с оговорками), а про Tag - почти ничего!

Вопрос:
Как узнать Columns(i).Tag - это строка или нет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.06.2005, 10:44:55
    #33108731
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема
авторTag - имеет тип Object
Был бы он Object, строки в нем не хранились бы. Вообще-то он имеет тип Variant.

авторКак узнать Columns(i).Tag - это строка или нет?
IsObject, TypeName
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.06.2005, 10:48:49
    #33108745
nibbles
nibbles
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема
WorobjoffЕсть проблема с использованием тэгов для колонок TDBGrid.
Tag - имеет тип Object и никак не могу найти как провреить строка ли там хранится.
Всякие isNull, isEmpty не помогут.
'А если напишу:
Код: plaintext
TDBGrid1.Columns(i).Tag = rsG("Tag")     'без Cstr( )
'то ввобще не текст, а DataField в тэге хранится
В хелпе написано, что можно еще и Columns().DefaultValue использовать (с оговорками), а про Tag - почти ничего!

Вопрос:
Как узнать Columns(i).Tag - это строка или нет?
нажать на F2
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.06.2005, 11:38:33
    #33108940
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема
Antonariy
IsObject, TypeName
Про IsObject - то я совсем забыл!
Все, теперь заработало!
Код: plaintext
1.
2.
3.
4.
If IsObject(c.Tag) Then
   rsG("Tag") = ""
Else
   rsG("Tag") = c.Tag
End If
Надо было сразу здесь на форуме спросить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / If TDBGrid1.Columns(i).Tag = "xxx" Then ' проблема / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 328ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2167657]:
 0ms
get settings:
 6ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 43ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 26ms
get tp. blocked users:
 1ms
others: 232ms
total:  328ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]