Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / В колонке грида вместо цифр отображать буквы / 7 сообщений из 7, страница 1 из 1
20.02.2008, 12:30
    #35143966
Vitalь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В колонке грида вместо цифр отображать буквы
В таблице.поле sert.ti c(1).

В гриде нужно вместо цифр, что бы отображались определенные буквы

sert.ti = '1', в гриде д.б. М
sert.ti = '2', в гриде д.б. З
sert.ti = '3', в гриде д.б. Т
...
Рейтинг: 0 / 0
20.02.2008, 13:07
    #35144154
В колонке грида вместо цифр отображать буквы
VitalьВ таблице.поле sert.ti c(1).

В гриде нужно вместо цифр, что бы отображались определенные буквы

sert.ti = '1', в гриде д.б. М
sert.ti = '2', в гриде д.б. З
sert.ti = '3', в гриде д.б. Т
CHRTRAN() и/или SYS(15) ?
...
Рейтинг: 0 / 0
20.02.2008, 13:16
    #35144205
Galyamov Rinat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В колонке грида вместо цифр отображать буквы
> В таблице.поле sert.ti c(1).
>
> В гриде нужно вместо цифр, что бы отображались определенные
> буквы
>
> sert.ti = '1', в гриде д.б. М
> sert.ti = '2', в гриде д.б. З
> sert.ti = '3', в гриде д.б. Т
>

ThisForm.Grid1.Column1.ControlSource='IIF(sert.ti="1", "М", IIF(sert.ti="2",
"З", IIF(sert.ti="3", "Т", "НЕИЗВЕСТНО")) )'


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
20.02.2008, 13:37
    #35144305
В колонке грида вместо цифр отображать буквы
Galyamov Rinat
> В таблице.поле sert.ti c(1).
>
> В гриде нужно вместо цифр, что бы отображались определенные
> буквы
>
> sert.ti = '1', в гриде д.б. М
> sert.ti = '2', в гриде д.б. З
> sert.ti = '3', в гриде д.б. Т
>

ThisForm.Grid1.Column1.ControlSource='IIF(sert.ti="1", "М", IIF(sert.ti="2",
"З", IIF(sert.ti="3", "Т", "НЕИЗВЕСТНО")) )'


Posted via ActualForum NNTP Server 1.4
Так ведь поле с(1), там не только цифры, но и буквы могут быть. Да и цифры, я так понимаю, могут быть от 0 до 9...
Тогда надо сделать так:
Код: plaintext
1.
2.
3.
4.
#define chifr="0123456789"
#define bukv ="ABCDEFGHIJ"
...
ThisForm.Grid1.Column1.ControlSource="chrtran(sert.ti,chifr,bukv)"
...
Рейтинг: 0 / 0
20.02.2008, 13:39
    #35144320
В колонке грида вместо цифр отображать буквы
Станислав С...кий Galyamov Rinat
> В таблице.поле sert.ti c(1).
>
> В гриде нужно вместо цифр, что бы отображались определенные
> буквы
>
> sert.ti = '1', в гриде д.б. М
> sert.ti = '2', в гриде д.б. З
> sert.ti = '3', в гриде д.б. Т
>

ThisForm.Grid1.Column1.ControlSource='IIF(sert.ti="1", "М", IIF(sert.ti="2",
"З", IIF(sert.ti="3", "Т", "НЕИЗВЕСТНО")) )'


Posted via ActualForum NNTP Server 1.4
Так ведь поле с(1), там не только цифры, но и буквы могут быть. Да и цифры, я так понимаю, могут быть от 0 до 9...
Тогда надо сделать так:
Код: plaintext
1.
2.
3.
4.
#define chifr="0123456789"
#define bukv ="ABCDEFGHIJ"
...
ThisForm.Grid1.Column1.ControlSource="chrtran(sert.ti,chifr,bukv)"

сорри, в define занка = быть не должно:
Код: plaintext
1.
2.
3.
4.
#define chifr "0123456789"
#define bukv "ABCDEFGHIJ"
...
ThisForm.Grid1.Column1.ControlSource="chrtran(sert.ti,chifr,bukv)"
...
Рейтинг: 0 / 0
20.02.2008, 14:54
    #35144675
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В колонке грида вместо цифр отображать буквы
Лучше сделай отдельный справочник (таблицу) - перекодировщик. Цифра будет выступать идентификатором записи, а буква - значением.
...
Рейтинг: 0 / 0
20.02.2008, 14:58
    #35144697
Vitalь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В колонке грида вместо цифр отображать буквы
> ThisForm.Grid1.Column1.ControlSource='IIF(sert.ti="1", "М", IIF(sert.ti="2",
> "З", IIF(sert.ti="3", "Т", "НЕИЗВЕСТНО")) )'

Этот вариант подошел, всем Спасибо.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / В колонке грида вместо цифр отображать буквы / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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