powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / SELECT в GRID на форме
6 сообщений из 6, страница 1 из 1
SELECT в GRID на форме
    #32688610
Alex Sheff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Решил изучить команду SELECT (если у кого есть описание на русском - скиньте на мейл marshall@inkom.lutsk.ua буду премного благодарен)
а вопрос вот в чем:
на форме есть грид, построен мастером, выставлена ширина колонок, цвет, заголовки колонок, и т.д... когда делаю первый раз SELECT ... INTO tmp_cursor
This.Parent.GridT.RecordSource = "tmp_cursor"
This.Parent.GridT.Column1.ControlSource = "tmp_cursor.kod_t"
This.Parent.GridT.Column2.ControlSource = "tmp_cursor.name"
...
все хорошо,
а вот при последующих селектах сбиваются все настройки грида :(

может я в принципе что-то нетак делаю
...
Рейтинг: 0 / 0
SELECT в GRID на форме
    #32688796
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
велкам http://www.foxclub.ru/sol/index.php?act=view&id=173
...
Рейтинг: 0 / 0
SELECT в GRID на форме
    #32688829
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По поводу Select-SQL

Мартин Грабер "Понимание SQL". Нет описания JOIN, примеры в синтаксисе MS SQL
http://www.sql.ru/docs/sql/u_sql/index.shtml

Основы языка SQL. Примеры в синтаксисе Delphi
http://www.mgopu.ru/PVU/2.1/Delphi/les44.html

По поводу Grid перед перезапросом надо сбрасывать источник записей Grid:

ThisForm.Grid1.RecordSource=""
SELECT ... INTO tmp_cursor
This.Parent.GridT.RecordSource = "tmp_cursor"
This.Parent.GridT.Column1.ControlSource = "tmp_cursor.kod_t"
This.Parent.GridT.Column2.ControlSource = "tmp_cursor.name"
...
...
Рейтинг: 0 / 0
SELECT в GRID на форме
    #32689112
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В 8+ версии все намного проще. Пропишите в свойстве INIT у Вашего Grid
Код: plaintext
this.AutoFit()
А затем при новом запросе Select вставьте следующей строкой
Код: plaintext
thisform.grid1.init()
...
Рейтинг: 0 / 0
SELECT в GRID на форме
    #32689267
Alex Sheff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
всем спасибо большое
...
Рейтинг: 0 / 0
SELECT в GRID на форме
    #32689390
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Таже самая проблема с grid. Он перестраивается, почему не пойму. Подскажите, пожалуйста, может что не так.
with THIS
local nColumnIndex
for m.nColumnIndex = 1 to .ColumnCount
.Columns(m.nColumnIndex).Header1.Comment = .Columns (m.nColumnIndex).Header1.Caption
.Columns(m.nColumnIndex).Comment = .Columns(m.nColumnIndex).ControlSource
endfor
endwith

THIS.RecordSource = ""
TCursor=ThisForm.SelfDataEnviroment.Cntr02LS.getIDLSCursor(ThisForm.SelfDataEnviroment.MainCursor.FieldValues.Id)
THIS.RecordSource=TempCur.Alias

&& восстановить ControlSource каждой колонки
with THIS
local nColumnIndex
for m.nColumnIndex = 1 to .ColumnCount
if !empty(.Columns(m.nColumnIndex).Comment)
.Columns(m.nColumnIndex).Header1.Caption = .Columns(m.nColumnIndex).Header1.Comment
.Columns(m.nColumnIndex).ControlSource = .Columns(m.nColumnIndex).Comment
endif
endfor
endwith
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / SELECT в GRID на форме
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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