ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поставить точку на альтернативной клаве в русской раскл.
9 сообщений из 9, страница 1 из 1
Поставить точку на альтернативной клаве в русской раскл.
    #36335417
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
q1w1e1
Участник
Вот возникла сабжевая потребность..
нашёл в инете сцылку http://www.prog-gate.pp.ru/fido7.ru.visual.foxpro/5687.html
но последнее замечание (...Для удобства работы, лучше создать отдельный класс на основе TextBox с данным кодом, чтобы не дублировать его каждый раз при создании нового объекта.)
как-то заставило задуматься...
Как это сделать...Есть проект, в нём много форм, где есть TextBox, как сделать класс, ввести его в проект, потом всем этим ТеxtBox(ам), указать на этот класс, или мне придётся все ТеxtBox(ы) вводить заново?
...
Рейтинг: 0 / 0
27.11.2009, 12:27
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36335677
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
q1w1e1Как это сделать...Есть проект, в нём много форм, где есть TextBox, как сделать класс, ввести его в проект, потом всем этим ТеxtBox(ам), указать на этот класс, или мне придётся все ТеxtBox(ы) вводить заново?
Если не боишься грязных хакерских штучек - то можно.
Тупо пооткрывать формы в виде табличек, пробежаться по полям Class, Classloc и прописать нужный класс и его расположение в нужных записях. BackUp - обязателен!!!
...
Рейтинг: 0 / 0
27.11.2009, 13:49
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36335707
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
Кстати, Как заставить клавишу с "точкой" всегда вводить точку
...
Рейтинг: 0 / 0
27.11.2009, 14:00
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36335741
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: q1w1e1
> Как это сделать...Есть проект, в нём много форм, где есть TextBox, как сделать класс, ввести его в проект, потом
> всем этим ТеxtBox(ам), указать на этот класс, или мне придётся все ТеxtBox(ы) вводить заново?

Да код простецкий:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Local i As Long, nCount As Long
nCount = Adir(arrF, "c:\projects\client\forms\*.scx")
For i =  1  To nCount
 Use "c:\projects\client\forms\" + arrF(i, 1 ) In  0  Shared
 Update Justfname(arrF(i, 1 )) Set classloc = "", ;
  class = "grid" Where LOWER(ALLTRIM(class)) == "scrollgrid"
 Use In Justfname(arrF(i, 1 ))
Next i
Это замена всех стандартных гридов на всех формах на немного "допилянный" класс грида

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
27.11.2009, 14:11
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36335820
Dag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dag
Участник
Игорь ГорбоносЭто замена всех стандартных гридов на всех формах на немного "допилянный" класс грида
Скорее наоборот, замена немного "допилянных" гридов на всех формах на стандартные.
...
Рейтинг: 0 / 0
27.11.2009, 14:32
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36335832
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Dag
> Скорее наоборот, замена немного "допилянных" гридов на всех формах на стандартные.

Да, сори. правильнее будет: замена немного " не допилянных" гридов на всех формах на стандартные.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
27.11.2009, 14:36
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36340391
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
q1w1e1
Участник
Игорь Горбонос,

Ни фига не понял этот код, тип поля Class в форме это Memo, попробовал
local for LOWER(ALLTRIM(class)) == "scrollgrid", ничего не нашло, визуальный просмотр тоже не видно scrollgrid, и вообще зачем это условие..
Дапустим я открыл эту таблицу SCX-формы, как определить это числовой Textbox или символьный, т.е. всё равно придётся открывать форму и составлять список полей для прописывания класса, но если я даже встал на эту запись Textboxa, зашёл в Memo поле Class, как я его должен прописать...
И как записать мне этот класс в проекте..
...
Рейтинг: 0 / 0
01.12.2009, 10:19
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36341208
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: q1w1e1
> Ни фига не понял этот код, тип поля Class в форме это Memo, попробовал
> local for LOWER(ALLTRIM(class)) == "scrollgrid", ничего не нашло, визуальный просмотр тоже не видно scrollgrid, и
> вообще зачем это условие..

Это у меня так называется мой класс, производный от стандартного Grid, которым заменил все стандартные гриды в проекте.
Хотел сделать что-бы работала прокрутка колёсиком мышки, но при этом перестала работать раскраска цветом и пришлось
откатится на стандартные гриды. Код этого отката я и показал.

> Дапустим я открыл эту таблицу SCX-формы, как определить это числовой Textbox или символьный, т.е. всё равно
> придётся открывать форму и составлять список полей для прописывания класса,

Для определения числовой или текстовый TextBox нужно будет изучить содержимое других полей этой таблицы и усложнить
условие фильтрации дополнительными условиями.

> но если я даже встал на эту запись Textboxa, зашёл в Memo поле Class, как я его должен прописать...

Сделать Update для нужных полей. Я сделал тестовую форму, поместил на неё стандартный грид и созданный мной грид. Открыл
как таблицу, сравнил в чем отличие и на основе этого составил Update.

> И как записать мне этот класс в проекте..

В проекте есть закладка Classes, в которую можно добавить как новый класс, так и существующий. А после добавления
нужного функционала к классу нужно открыть форму на которую будет добавлятся новый объект и перетащить мышкой из
закладки Classes нужный объект.

Как-то так

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
01.12.2009, 14:31
| Ответить | Цитировать | Написать  
Поставить точку на альтернативной клаве в русской раскл.
    #36341515
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GoshaS
Участник
Неплохо было бы менять сразу-же и путь до класса, если он не стандартный :-[
...
Рейтинг: 0 / 0
01.12.2009, 16:31
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поставить точку на альтернативной клаве в русской раскл.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=36335417&tid=1585818]:
 0ms
get settings:
 12ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 39ms
get topic data:
 8ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 345ms
total:  475ms
созд. / загр.: 475ms
x
x
Закрыть


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