как присвоить каждой ячейке в Gride определенное значение(можно любое) - то есть мне нужно понять как можно обратится к каждой отдельной ячейке чтобы потом в дальнейшем я мог туда присваивать определенные значения.....

P003,
не ну это я понял как таблицу отобразить, мне как бы нужно добавлять некоторые данные из crsTmpClienti, так чтобы они отображались в определенных ячеках в Гриде.............. Или так не зя делать ????????

IgorNG,
ну да как в Excel , проста хотел так сделать , поэтому спрашиваю как это реализовать

IgorNG,
блин как обьяснить....... Ну вообщем есть Grid (4 на 4), тоесть в нем 16 ячеек , первая ячейка находится(в 1 строке и 1 столбце) потом вторая ячека(в 1 строке и 2 столбец ) и тд. ну как в Excel. Мне нужно присвоить каждой ячеке определенное число а некоторые ячеки оставить пустыми. Тоесть как бы мне обратится к ячейке чтоб ей присвоить например значение 5 ? ну как то так

Sergey Sizov,
значит так не получится сделать ? блииин это печально.....

IgorNG,
вот это практически то, ща буду мучится над этим

извините , проста я новичек в Фоксе, и сразу не вьезжаю во все...........

IgorNG,
а как сделать чтобы вместо 1,2,3,4 я подставил значения из временной таблицы (crsTmpClienti)

вообщем сделал вот так -------

SELECT crsTmpClienti
CREATE CURSOR test (test1 C(20), test2 C(10), test3 C(20), test4 C(20))
INSERT INTO test VALUES (crsTmpClienti.familia, "", "", "")
INSERT INTO test VALUES ("",crsTmpClienti.ima, "", "")
INSERT INTO test VALUES ("", "",crsTmpClienti.otchestvo, "")
INSERT INTO test VALUES ("", "", "",crsTmpClienti.ylica)
BROWSE

потом в Gride в св -ве RecordSource ввел test

а данные не отображаются в Gride

все все сделал =)

IgorNG, в ControlSource = Test сделал
да Browse показывает но я его пока из кода убрал
У меня проблема теперь следующая - сейчас когда я запускаю форму на выполнение нажимаю на кнопки все эти операции выполняются но сразу в Gride не отображаются, приходится закрывать и снова открывать форму , чтоб увидеть эти данные в Gride ,
может вот так написать -

thisform.Grid1.ControlSource = Test
thisform.Grid1.refresh

на это он выдает ошибку

вообщем сделал вот так

SELECT Clienti.lic_shet, Clienti.familia, Clienti.ima,;
Clienti.otchestvo, Clienti.nomer_pasporta, Clienti.ylica,;
Clienti.nomer_doma, Clienti.nomer_kvar;
FROM ;
"коммунальные платежи!clienti";
WHERE Clienti.ylica = ( Thisform.Combo1.value ) AND Clienti.nomer_doma = ( Thisform.Text2.value ) AND Clienti.nomer_kvar = ( Thisform.Text3.value ) INTO CURSOR crsTmpClienti

SELECT crsTmpClienti
SELECT Оплата_за_свет.lic_shet, Оплата_за_свет.obiom,;
Оплата_за_свет.oplacheno, Оплата_за_свет.data_poslednei_oplati;
FROM "коммунальные платежи!Оплата_за_свет" Оплата_за_свет;
WHERE Оплата_за_свет.lic_shet = crsTmpClienti.lic_shet INTO CURSOR crsTmpoplatazasvet
SELECT Оплата_за_газ.lic_shet, Оплата_за_газ.obiom,;
Оплата_за_газ.oplacheno, Оплата_за_газ.data_poslednei_oplati;
FROM "коммунальные платежи!Оплата_за_газ" Оплата_за_газ;
WHERE Оплата_за_газ.lic_shet = crsTmpClienti.lic_shet INTO CURSOR crsTmpoplatazagaz

SELECT crsTmpoplatazasvet
SELECT crsTmpoplatazagaz
CREATE cursor test (Лиц_счет F(10),Наименование C(10), Пред_обьем F(10), Текущ_обьем F(10), К_оплате F(10))
INSERT INTO test VALUES (crsTmpoplatazasvet.lic_shet, "свет", crsTmpoplatazasvet.obiom, 1, crsTmpoplatazasvet.oplacheno)
INSERT INTO test VALUES (crsTmpoplatazagaz.lic_shet, "gaz", crsTmpoplatazagaz.obiom, 1, crsTmpoplatazagaz.oplacheno)
DO FORM E:\453453453\oplata.scx
thisform.Release

и после всего этого он мне отображает данные в Gride , НО я потом должен делать вычисления в Gride , сделал вот так -

thisform.Grid1.Column5.ControlSource=[test.Пред_обьем - test.Текущ_обьем]

и все вычисляется, но данные в test не обновляются на те, которые получаются в ходе вычислений
Вопрос почему и как их там обновить на новые ?

то есть во временной таблице test(на основе которой формируется Grid) не обновляются данные, после вычислений в Gride

help me....

в том то и беда, что я не могу сделать вычисления до помещения в Grid, т. к. текущий обьем я должен ввести вручную в Grid.......

SSn888,

а куда мне подставить READWRITE ???

SSn888,

авторНу тогда надо просто продублировать эти вычисления по выходу

REPLACE ALL поле1 WITH (поле2-поле3)


можно поподробней? ,что это мне даст?

авторCREATE cursor test (Лиц_счет F(10),Наименование C(10), Пред_обьем F(10), Текущ_обьем F(10), К_оплате F(10)) READWRITE
попробовал так сделать, он выдает ошибку.....

ладно назрел тогда такой вопрос, если не можем обновить данные в test. То может можно достать данные из Gride и поместить в другой курсор?

SSn888,

автора куда мне подставить READWRITE ???

авторCREATE cursor test (Лиц_счет F(10),Наименование C(10), Пред_обьем F(10), Текущ_обьем F(10), К_оплате F(10)) READWRITE

попробовал так сделать, он выдает ошибку..... - command contains unrecognized phrase/keyword

помогите студенту , мне курсач делать именно на Фоксе надо, а во всех тонкостях не разбираюсь данной среды.....

alextashk,

вообщем тема для курсовой создание программного обеспечения(то есть предполагается создание на Visual FoxPro) на тему оплата коммунальных услуг

все остальное что у меня не получается при создании спрашиваю сдесь

проходящий.,

ладно выжег уже =) ну тогда подскажи как обновить test, после того как я делаю вычисления в полях Gride

проходящий.,

ну а как мне сделать это, если мне надо данные по текущему обьему вводить вручную в поле Gride, проста меня препод так заставляет сделать все засунуть в грид и туда вводить текущий обьем. Завтра буду у нее на лбу выжигать каленым железом =) Ну а если серьезно, то мне предлогали здесь использовать REPLACE ALL поле1 WITH (поле2-поле3) - этим можно изменять данные в test ?

проходящий.,

вообщем сделал так

SELECT test
REPLACE ALL test.К_оплате WITH (thisform.Grid1.Column5.ControlSource=[test.Пред_обьем +test.Текущ_обьем])

он мне ошибку дает - Data type mismatch, как я понимаю это означает несовпадение данных ?.... но вроде типы данных везде одинаковые.

ура я вроде сделал с 100-ой попытки допер =) сделал вот как -

thisform.Grid1.Column5.ControlSource=[test.Пред_обьем +test.Текущ_обьем]
SELECT test
REPLACE ALL test.К_оплате WITH test.Пред_обьем +test.Текущ_обьем
thisform.grid1.Refresh()

ток не знаю как это правильно или нет, но это работает как надо =) еще на шаг продвинулся в перед =)

SSn888,

еще раз извините если, что не так я всего лишь учусь. Препад ни фига не учит, я у него спрашиваю интересуюсь а он мне ток отвечает типа иди ищи в интернете, книгах и тд. (я уже сомневаюсь так скажем в его знаниях) Здесь у вас спрашиваю так сразу появляются какие то мнения, а там глухо как в танке. Но ни че, ни фига платить не буду принципиально. Да я может не все понимаю и не сразу вьезжаю, но ни че я упрямый .......

авторЗа упорное нежелание научиться нормально формулировать вопросы и за использование смеси латиницы и кириллицы.

SSn888 спасибо за замечание, я уже это понял буду исправляться =)

thunder2,

если ты не знаешь в школе такому не учат , и твое высказывание не уместно

я не прошу разжовывать, я ни когда ни к кому так не обращался , проста ситуация такая что мне надо сейчас по ходу разбираться и делать, по этому некоторые вопросы выношу здесь

если тебе трудно отписываться, тогда бы уже не писал бы вообще

еще раз спасибо всем кто давал советы,учту все замечания, пошел трудится дальше в этом направление еще 2 недели до сдачи надеюсь успеть......