powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / ComboBox фильтр без повторений
90 сообщений из 90, показаны все 4 страниц
ComboBox фильтр без повторений
    #35999000
День добрый!
Как только разобрался в предыдущем топике с путями! Сразу встал другой вопрос!
Есть форма, на которой присутствует combobox и grid. Таблица Кадры. Необходимо использовать combobox по полю "Отдел", оно не ключевое и содержит повторения! Необходимо, что бы в ComboBox можно было выбрать отдел например ЦЗИ, и что бы при этом в grid вывелись только работники отдела ЦЗИ. При этом таблица только одна "Кадры" Ни связей ни чего такого НЕТ.
Как это реализовать!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999013
К. АлександрДень добрый!
Как только разобрался в предыдущем топике с путями! Сразу встал другой вопрос!
Есть форма, на которой присутствует combobox и grid. Таблица Кадры. Необходимо использовать combobox по полю "Отдел", оно не ключевое и содержит повторения! Необходимо, что бы в ComboBox можно было выбрать отдел например ЦЗИ, и что бы при этом в grid вывелись только работники отдела ЦЗИ. При этом таблица только одна "Кадры" Ни связей ни чего такого НЕТ.
Как это реализовать!?Выбрать для комбо только уникальные значения.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999104
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александр,
ну а как бы вы это на Дельфи сделали?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999233
по лукупу комбобоксу
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999248
проходящий.
Спасибо! Новость!
А как это сделать!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999256
К. Александрпо лукупу комбобоксуНе пойдет.
Что является источником данных для комбо? Как он заполняется? Код покажи.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999271
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александрпо лукупу комбобоксу

Вы что, никогда в Дельфи не заполняли комбобокс при помощи запроса?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999281
F отстань и запросом можно и лукупом можно! И кто говорит нельзя, пусть у знающих спросит! Если в фоксе нет нормальной визуализации данного процесса, то куда SQL запрос скинуть?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999311
К. АлександрЕсли в фоксе нет нормальной визуализации данного процесса,Какого процесса? Почему этот процесс должен быть визуализирован? Критерии нормальности? то куда SQL запрос скинуть?Туда, куда надо! Вы наконец-то начтете делом заниматься и изучать продукт или только будете ныть из-за несхожести дельфы и фокса? Они и не дожны быть сходны, это совершенно разные вещи и многое в них делается по-разному. Это трудно понять?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999358
Ни кто кроме вас проходящий. не говорит об обязательной схожести фокса и делфей! Понятно что подходы другие!
ОПЯТЬ ТУПЯТ в топике!
Вопрос поставлен нужен только ответ! Не можешь ответить! Вообще не нужно соваться сюда! И разглагольствовать!
Вопрос тот же!
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999394
К. АлександрНи кто кроме вас проходящий. не говорит об обязательной схожести фокса и делфей! Понятно что подходы другие!
ОПЯТЬ ТУПЯТ в топике!
Вопрос поставлен нужен только ответ! Не можешь ответить! Вообще не нужно соваться сюда! И разглагольствовать!
Вопрос тот же!
Сударь!
Во-первых, не Вам решать кому и куда соваться, что, где и как делать и не Вам давать указания по этому поводу.
Во-вторых, если Вам нужна помощь в решении Ваших проблем очень невежливо грубить тем, кто пытается разобраться в Ваших проблемах не видя ни Вашего кода, ни внятного описания всех относящихся к делу обстоятельств. Понятность Вам Ваших же описаний не стОит ломаного гроша, понятно должно быть тем, кто пытается Вам помочь.
В-третьих, тупите и разглагольствуете здесь пока только Вы и тупите настолько, что не можете даже ответить на простые уточняющие вопросы. Цитирую вопрос:
Что является источником данных для комбо? Как он заполняется? Код покажи.Где ответ?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999418
проходящий. А в первом посте не написано!? Таблица "Кадры" Комбо заполняется из поля "Отдел", ключиком является как всегда табельный номер. Необходимовывести данные таблицы в grid для редактирования + возможность применения фильтров по отделу, по служебному статусу по полу и тд и тп., через комбобокс
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999430
К. Александрпроходящий. А в первом посте не написано!?Нет, не написано. Там нет кода.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999462
GermanGM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александр, поле "Отдел" заполняется из какого-то справочника? Если так, что этот справочник и надо сделать источником данных для комбо. Быстрей будет, чем SELECT DISTINCT из Кадров при каждом выводе формы на экран
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999578
GermanGM
Нет справочников! Эта форма нужна для редактирования данных перед отправкой списка работников на печать!
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999586
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
К. АлександрДень добрый!
Как только разобрался в предыдущем топике с путями! Сразу встал другой вопрос!
Есть форма, на которой присутствует combobox и grid. Таблица Кадры. Необходимо использовать combobox по полю "Отдел", оно не ключевое и содержит повторения! Необходимо, что бы в ComboBox можно было выбрать отдел например ЦЗИ, и что бы при этом в grid вывелись только работники отдела ЦЗИ. При этом таблица только одна "Кадры" Ни связей ни чего такого НЕТ.
Как это реализовать!?Реализовать можно по-разному. По каким условиям будем выбирать вариант?
Судя по отсутствию хоть строчки просимого у Вас кода, в наличии у Вас есть только форма с положенными на нее гридом с таблицей под ним и комбо? Возможно, какие-то свойства заполнили, так? И кода у Вас просто нет?
Таблица большая?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999608
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторКак это реализовать!?

реализация с гридом и комбиком
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999687
прошелмимо
)
После ознакомления с твоей бирюлькой, я понял что в фоксе я вообще ничего незнаю, и копаю я не туда...
что-то я не то делаю... )
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999694
GermanGM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александр, т.е. поле "Отдел" содержит в себе само наименование отдела? Судя по тому, что Вы употребили термин "таблица", Кадры - это собственно и есть список учетных карточек (а не временный курсор-выборку) работников, и какая-нибудь МарьИванна заполняет его "вручную" - пишет "ЦЗИ" и др. в обычное текстовое поле, так что ли?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999764
К. Александрпрошелмимо
)
После ознакомления с твоей бирюлькой, я понял что в фоксе я вообще ничего незнаю, и копаю я не туда...
что-то я не то делаю... )Именно на это Вам намекали все Ваших два топика. :) Надеюсь, теперь работа пойдет продуктивнее? На вопросы мои, Sergey Sizov. и GermanGM ответите?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999838
GermanGM
Эта таблица "Кадры", формируется и заполняется при помощи запроса из нескольких таблиц! Она итоговая для правки и печати отчетов
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999849
Sergey Sizov
После небольшого исходника от проходящий., считай что у меня ничего нет... надо с нуля...
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999854
проходящий. почему ты использовал для создания формы и объектов не Documents\Forms, а Class Libraries ???
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999931
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
К. АлександрSergey Sizov
После небольшого исходника от проходящий., считай что у меня ничего нет... надо с нуля...Не страшно. Только не путайте проходящего и прошелмимо, это разные люди. И еще прошелмимо ярый сторонник ООП и потому его код основан исключительно на классах и простые формы он не признает. Если с ООП у Вас не совсем хорошо, то его код можно смотреть, изучать, но вот бездумно кидаться его применять не стОит. Повторю и предложение проходящего о переходе на Foxclub . Там есть и я, и проходящий, и прошелмимо, и много других и процесс обучения там будет идти быстрее. А учится, как я понимаю, теперь придется основательно? :)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #35999949
GermanGM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александр, не вполне конечно полный ответ на мой вопрос... Ну да ладно. Можно несколько коряво выкрутиться и в этом случае. Например так. В Init формы: (наименования полей и таблиц условны)

select distinct Отдел from Кадры into cursor Отд order by Отдел
в RowSource Combo указываете "Отд.Отдел"
Код: plaintext
1.
RowSourceType -  2  (Alias)
Style -  2  (DropDown List)

При выборе значения в Combo указатель в курсоре-списке Отд будет перемещаться на соответствующую запись. И далее в событии Valid - установка фильтра в Кадры:

Код: plaintext
1.
2.
3.
4.
5.
if alias()<>[Кадры]
 select Кадры
endif
SET FILTER TO Отдел==Отд.Отдел
go top
thisform.grid1.refresh
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000049
GermanGM
Подожди я информацию мереваривать не успеваю!
Щас всё устаканиться и дальше начну задавать вопросы :)

Sergey Sizov.
Вот прошелмимо меня то и поверг в шок )
Я незнал о данных возможностях фокса ) я к нему как к акцессу относился )
А тут ТАКОЕ... :)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000072
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
К. АлександрSergey Sizov.
Вот прошелмимо меня то и поверг в шок )
Я незнал о данных возможностях фокса ) я к нему как к акцессу относился )Вынужден опять попенять Вам на Ваши первые высказывания на этом форуме. :)
А тут ТАКОЕ... :)А на фоксклубе могут еще и не такое показать.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000102
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторА на фоксклубе могут еще и не такое показать.

да уж, м дот форева.

через 5 лет только появляются топики с обсуждением
преим-в КАД.....

в 3-х топиках обсудили преим-ва ООП без .... кулинара ....
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000118
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторне стОит

попей виагру...
не делайте еще одного бездумного процедурника.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000134
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
прошелмимоавторне стОит

попей виагру...
не делайте еще одного бездумного процедурника.Саша!
Во-первых, я специально одну буковку в слове выделил, не заметил? :)
Во-вторых, ты много видел с моей стороны агитации за процедурный подход?
В-третьих, кидание в крайности никогда не было признаком благодетели, не так ли? :)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000138
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторЯ незнал о данных возможностях фокса

я Вам не показал и 1/мил.(сто тыс миллионной) доли

в фокспро Вы можете создавать абстрактные механизмы,
как раз это и особенность фокспро, что это
делается оч.просто в нем,
и за счет этой созданной абстракции (фантазии нет предела -
это может быть что-то небольшое, а может быть фреймворк ...)
Вы получаете выигрыш при разработке, снижаете трудозатраты ....
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000145
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторВ-третьих, кидание в крайности никогда не было признаком благодетели, не так ли?

никто не кидается - есть опыт - все прокушано и прока..., как говорит мудрый Зобр,
а Ваш кулинар без наличия этого опыта ....,
поэтому ....
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000150
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторВ-третьих, кидание в крайности никогда не было признаком благодетели, не так ли

есть опыт эксплуатации промсистем на 50т.польз.,
поэтому чушь на фоксклабе ....

еще раз есть опыт, и поэтому есть
желание рекомендовать и предавать этот опыт,
а не слушать какие-то возражения с ......, ладно .....
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000160
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
прошелмимоавторВ-третьих, кидание в крайности никогда не было признаком благодетели, не так ли?

никто не кидается - есть опыт - все прокушано и прока..., как говорит мудрый Зобр,
а Ваш кулинар без наличия этого опыта ....,
поэтому ....Саш, сделай одолжение, объясни нормальным языком о каком Зобре, о каком Нашем кулинаре и почему он наш, о каком "этом" опыте идет речь? И каким боком это все к обсуждаемемому вопросу относится? Только без твоих обид на непонимание и т.д., ок?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000172
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не стОит
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000178
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторТолько без твоих обид на непонимание и т.д.,
автор
И каким боком это все к обсуждаемемому вопросу относится?

херовым боком,
конкуренция блин

пишите ду форм, а я попробую переубедить и показать,
и снизить трудозатраты, возможно неким образом повлиять
на то, чтобы не появлялись перлы аля ндфл .....
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000198
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
прошелмимоавторТолько без твоих обид на непонимание и т.д.,
автор
И каким боком это все к обсуждаемемому вопросу относится?

херовым боком,
конкуренция блин

пишите ду форм, а я попробую переубедить и показать,
и снизить трудозатраты, возможно неким образом повлиять
на то, чтобы не появлялись перлы аля ндфл .....Саш, ты меня ни к с кем не спутал? Я стобой по этому поводу когда-нибудь спорил? Как, впрочем, и по любому другому? Да убеждай сколько хочешь, но при чем тут я и фоксклуб? Только потому, что там тебя кто-то не понял? Скорее даже не твои мысли, а способ их изложения и методы убеждения. Вон, смотри какой эффект от твоих кодов. А вот от твоих слов у некоторых приступы непонимания. И думаешь они в этом виноваты? Короче, давай завязывать оффтоп.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000202
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторКороче, давай завязывать оффтоп.

иди-ты на фоксклаб...
я ведь первый не трогал.
и пей виагру, чтобы стояло ....

я так не со зла - нехер трогать - побью
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000217
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если человеку один раз на форму натащить комбу и он забудет про фокс?
Мб ему и не надо писать мегаприложение на сотню форм? Зачем тогда вообще создавать классы, если будет одна форма с одним комбиком и никакого продолжения не будет?
ps
Создать отдельную тему: "А 'прошелмимо' против!!!". :-)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000226
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автори никакого продолжения не будет?

гы, продолжение бывает всегда.
Могу доказать, что крокодил больше зеленый, чем длинный.(С)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000434
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрДень добрый!
Как только разобрался в предыдущем топике с путями! Сразу встал другой вопрос!
Есть форма, на которой присутствует combobox и grid. Таблица Кадры. Необходимо использовать combobox по полю "Отдел", оно не ключевое и содержит повторения! Необходимо, что бы в ComboBox можно было выбрать отдел например ЦЗИ, и что бы при этом в grid вывелись только работники отдела ЦЗИ. При этом таблица только одна "Кадры" Ни связей ни чего такого НЕТ.
Как это реализовать!?

Если решать проблему "в лоб", то смотри вложение. Хотя постановка задачи довольно кривоватая

PS:

С моей точки зрения данное описание задачи вполне понятное. Просто наложилось впечатление от "мутной" постановки задачи в предыдущем топике с путями. Вот никто и не захотел разбираться.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000469
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторSet Filter To Otdel = &lcValue

Владимир, это не есть кул. не учите гадостям.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36000666
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
прошелмимоавторSet Filter To Otdel = &lcValue
Владимир, это не есть кул. не учите гадостям.
В данном случае - это неизбежная гадость.

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

Т.е. все мы знаем "как надо", но не всегда это можно сделать...
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36002125
ВладимирМ,

Жалуется на SetFocus() и в комбо выводит только 1 отдел
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36002133
Где я мог накосячить? )
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36002385
В общем с комбо и гридом я не разобрался...
По всюду одни навороты.... а есть что по поще!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36002659
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александр,
предлагаю собрать все в кучку и выложить тут на обозрение. Мы не видим того, что у Вас есть и происходит, Вы нам рассказать толком не можете.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36002713
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрВладимирМ,

Жалуется на SetFocus() и в комбо выводит только 1 отдел
Это вы запускали мой пример или пытались сделать на основании своих таблиц "как в примере"?

Если запускали свой, то,

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

2. В ComboBox отображается результат запроса Select-SQL. Этот запрос записан в свойcтве Combo.RowSource. Но этот запрос можно выполнить и в командном окне. Выполните и посмотрите, сколько записей он возвращает. Посмотрите исходную таблицу. Настройку SET DELETED.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004806
ВладимирМ,
А где этот запрос увидеть?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004810
Sergey Sizov,
Что выкладывать то? Есть на форме комбо и грид с инфой, нужно что бы комбо работал как фильтр. ВСЁ! Сколько проблем из за какой то мелочи... нельзя было параметр filter как в делфях сделать...(
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004859
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрSergey Sizov,
Что выкладывать то? Есть на форме комбо и грид с инфой, нужно что бы комбо работал как фильтр. ВСЁ!Ну так и выложи это все. Сколько проблем из за какой то мелочи...Ну рахз это мелочь, то что же мешает самому с мелочью разобраться? нельзя было параметр filter как в делфях сделать...(Параметр чего? И что такое параметр filter в дельфях все фокспрошники обязаны знать? И когда, наконец-то, прекратятся сравнения с дельфей? Сколько раз надо сказать, что это совершенно разные вещи и подходить к ним надо по-разному?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004887
Пытаюсь присвоить через thisform.grid1.recordsource в место вывода в ДБ грид выводит в отдельно открывающуюся таблицу ( что делать?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004900
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрПытаюсь присвоить через thisform.grid1.recordsource в место вывода в ДБ грид выводит в отдельно открывающуюся таблицу ( что делать?Переведи! (С) А еще лучше покажи код.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004936
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 К. Александр

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

изв., из-за манеры, в которой Вы задаете ... и констатируете ...,
невозможно Вам помочь и дать ответ.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36004996
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрВладимирМ,
А где этот запрос увидеть?
ВладимирМЭтот запрос записан в свойcтве Combo.RowSource
- Открываете форму на редактирование.
- Правой клавишей мыши по объекту ComboBox
- В открывшемся выпадающем меню выбрать пункт Properties
- В открывшемся окне Prioperties перейти на закладку Data и встать на строку RowSource
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005332
А что именно излагать? Есть таблица zpl в ней поля notdel, prof, fio, sym, sym1, sym2. Необходимо при помощи комбобокса выбирать отдел, после чего работники отдела должны появляться в гриде! Всё!
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005403
К. АлександрА что именно излагать? Есть таблица zpl в ней поля notdel, prof, fio, sym, sym1, sym2. Необходимо при помощи комбобокса выбирать отдел, после чего работники отдела должны появляться в гриде! Всё!Александр! Мы когда-нибудь увидим Ваши попытки что-то сделать или это жуткая тайна? Вы когда-нибудь поймете, что по Вашим описаниям мы можем сделать свое, но никак не поправить Ваше? Свое, как Вы можете увидеть на примере, предложенном прошелмимо, может очень сильно отличаться от Вашего. И как на основании нашего Вы собираетесь править Ваше?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005514
проходящий.,

Мне не надо решать данную задачу! Мне нужен принцип покоторому в этом долбанном фоксе всё решаеться...!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005533
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl"
Это я ввёл в клик для кнопки! И вместо того что бы данные выводились в гриде, они выводятся в отдельно открывающейся таблице! Кто её просил открывать?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005548
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. Александрthisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl"
Это я ввёл в клик для кнопки! И вместо того что бы данные выводились в гриде, они выводятся в отдельно открывающейся таблице! Кто её просил открывать?
Код: plaintext
1.
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl into cursor cTmp"
И будет вам счастье :-)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005552
GoshaS,

А в чём суть?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005559
GoshaS,

into cursor cTmp - что это за вещь такая?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005567
К. Александрпроходящий.,

Мне не надо решать данную задачу! Мне нужен принцип покоторому в этом долбанном фоксе всё решаеться...!?А нету какого-то одного принципа для решения этой задачи! Это не дельфа с тупым киданием компонентами. Тут думать надо. И кто тут долбаный еще надо посмотреть.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005569
К. Александрthisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl"
Это я ввёл в клик для кнопки! И вместо того что бы данные выводились в гриде, они выводятся в отдельно открывающейся таблице! Кто её просил открывать?Это не отдельная таблица, а выборка, полученная в результате обработки запроса. Так как не указал куда вывести выводится на экран. Что непонятно?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005574
К. АлександрGoshaS,

into cursor cTmp - что это за вещь такая?А это вот как раз конкретное указание куда вывести результат запроса, в данном случае - в курсор с именем cTmp. Курсор - временная таблица.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005576
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
INTO Destination

Указывает, где следует сохранить результаты запроса. Если предложение INTO опущено, результаты запроса отображаются в окне просмотра . Вы также можете использовать предложение TO, позволяющее направлять результаты запроса на принтер или в файл.
В качестве Destination можно использовать одно из следующих предложений:

· ARRAY ArrayName, сохраняющее результаты запроса в массиве переменных памяти. Если в запросе выбирается 0 записей, этот массив не создается.
· CURSOR CursorName, сохраняющее результаты запроса в курсоре. Если вы задали имя открытой таблицы и установили значение SET SAFETY равным OFF, Visual FoxPro сгенерирует сообщение об ошибке. После того как SELECT выполнится, временный курсор останется открытым и активным, но будет доступен только для чтения. Когда вы закроете этот временный курсор, он будет удален. Курсоры могут создаваться в виде временных файлов на диске, заданном SORTWORK.

· DBF TableName | TABLE TableName, сохраняющее результаты запроса в таблице. Если вы задали уже открытую таблицу, когда действует SET SAFETY OFF, Visual FoxPro без предупреждения запишет результаты поверх содержимого таблицы. Если вы не задали расширение имени, Visual FoxPro присвоит таблице расширение .DBF. Таблица останется открытой и активной после того, как SELECT выполнится.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005578
проходящий.,

Я указал что вывести в таблицу! А курсор зачем? Этот сорс же для грида!
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005595
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Рассматривай это, как бонус фокса.
В дельфе, тебе для сортировки дынных в гриде по другим солбцам -необходимо каждый раз тянуть данные с сервака меняя параметры запроса, тут этого не требуется ;-)
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005601
local fil1 as character
fil1 = ALLTRIM(thisform.combo1.Value)
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl WHERE notdel='"+fil1+"' into cursor cTmp"
Всё работает! Событие комбо valid
Всем спасибо что несмогли по нормальному объяснить!
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005604
GoshaS,

Понял! После заполнения курсора данными, как их от туда запросить, к примеру повторно!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005628
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl WHERE notdel='"+fil1+"' into cursor cTmp"

Код: plaintext
Понял! После заполнения курсора данными, как их от туда запросить, к примеру повторно!?

я Вам давал пример с курсорадаптером,
почему Вы не стали изучать этот пример?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005629
К. Александрпроходящий.,

Я указал что вывести в таблицу!ГДЕ? В запросе "SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl" нет никаких указаний про таблицы. Или ты их тут видишь? Ткни пальцем.
А курсор зачем?Затем, что фокс таки база СУБД и заточен для работы с таблиуами/курсорами, удобнее ему так. Этот сорс же для грида!А грид только с таблицами и курсорами работает. Он ведь не дельфовый, он фоксовый. Это не ДБ грид. Это грид. И если продолжишь к нему относиться по-дельфовому, как к дбгриду, то готовься к бегу по граблям.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005704
GoshaS,

как теперь при помощи нажатий на кнопки удалить добавить сохранить записи?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005781
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторкак теперь при помощи нажатий на кнопки удалить добавить сохранить записи?

прям и не знаю, что ответить ...
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005787
.&&
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
.&&
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
lcParametr="123"
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl WHERE notdel=lcParametr into cursor cTmp"
*чтобы произвести повторную выгрузку с другими параметрами
thisform.grid1.RecordSource =""
lcParametr="234"
thisform.grid1.RecordSource ="SELECT notdel, tnom, fio, prof, ndir, sym, sym1, sym2 FROM zpl WHERE notdel=lcParametr into cursor cTmp"
thisform.grid1.refresh()
*если просто сортировку менять, тогда курсору можно создать индекс. 
select cTmp
INDEX ON notdel TAG notdel
*создали индекс
SET ORDER TO 	notdel desc 
*отсортировали в обратном порядке (выбрали данный индекс управляющим)
thisform.grid1.refresh()
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005829
GoshaS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Помечает записи на удаление.
Синтаксис:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
* 1  вариант
DELETE 
	[Scope] [FOR lExpression1] [WHILE lExpression2]
	[IN nWorkArea | cTableAlias]
	[NOOPTIMIZE]
* 2  вариант
DELETE FROM [DatabaseName!]TableName
	[WHERE FilterCondition1
*+ справка по SET DELETED ON | OFF
Добавлять:
Код: plaintext
1.
2.
3.
4.
* 1  вариант, пустая строка
append blank
* 2  вариант прямо со значениями
insert into [DatabaseName!]TableName (s1,s2,s3) values ('abc','def','jhi')
Если таблица подвязана к элементу управления, то все изменения, которые вы в нем внесли, уже отражены в таблице, если она не буфферизирована, тогда больше ничего делать и не надо.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36005960
glamis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GermanGM,


RowSourceType - 3 (SQL)
RowSource - "Sele отдел from кадры into cursor _x1 dist"
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007034
GoshaS,

Ага, теперь, куда мне первый вариант пихать и второй?
И как узнать подвязана таблица или нет если я обращаюсь через recordsource: SQL. ?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007078
У меня форма на ней комбобокс в методе valid:

local fil1 as character
fil1 = ALLTRIM(thisform.combo1.Value)
SELECT zpl
SET FILTER TO notdel = fil1
GO top
thisForm.refresh ()
thisform.grid1.RecordSource ="SELECT notdel, prof, fio, sym1, sym2, sym FROM zpl WHERE notdel='"+fil1+"' into cursor cTmp"
thisform.text1.Text = * что дальше?


Грид в котором выводиться результат запроса.
И текстовое поле Text1.
Как сделать что бы в результате вывода информации в грид, вывести сумму полей sym в текстовое поле!?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007137
И ещё! В фоксе recordsource работает не на объект, а на всю форму?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007171
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну наконец-то... :)
К. АлександрУ меня форма на ней комбобокс в методе valid:

local fil1 as character Запоминаем это объявление.
fil1 = ALLTRIM(thisform.combo1.Value)
SELECT zpl
SET FILTER TO notdel = fil1 А вот и первые грабли.
Настройка (обращаем внимание -найстройка, а не команда!) глобальная, а вот переменная в ней используется локальная, в результате чего сразу при выходе из метода переменная будет уничтожена и фокс начнет ругаться на отсутствие переменной. Еще раз напоминаю, set filter - настроечная команда, которая сданными ничего не делает. В том числе и не отбирает, не выделяет и т.д.

GO top
thisForm.refresh ()
thisform.grid1.RecordSource ="SELECT notdel, prof, fio, sym1, sym2, sym FROM zpl WHERE notdel='"+fil1+"' into cursor cTmp"
thisform.text1.Text = * что дальше?
Прежде, чем делать что-то дальше, надо сделать нужное суммирование. Предлагаю
Код: plaintext
select sum(sym) from zpl where notdel=fil1 into array arTmp
И тогда вместо "* что дальше" можно будет вписать "arTmp"
Грид в котором выводиться результат запроса.
И текстовое поле Text1.
Как сделать что бы в результате вывода информации в грид, вывести сумму полей sym в текстовое поле!?Результатом вывода информации в грид является только вывод информации в грид.
И заодно про следующий вопрос про RecordSource - нет, не на форму. У формы нет такого свойства и она отображением данных не занимается.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007295
Sergey Sizov,

select sum(sym) from zpl where notdel=fil1 into array arTmp
thisform.text1.Text = arTmp


ОК! тады жалуется text read only
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007305
Да и у меня при появлении ошыбки в программе, её нельзя остановить. Приходится вырубать весь фокс и заново заходить.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007310
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрSergey Sizov,

select sum(sym) from zpl where notdel=fil1 into array arTmp
thisform.text1.Text = arTmp


ОК! тады жалуется text read onlyПросмотрел. Надо не text, а value.
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36007410
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрДа и у меня при появлении ошыбки в программе, её нельзя остановить. Приходится вырубать весь фокс и заново заходить.Прочитать хелп по set escape
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36008191
Все равно что то не то делаю ( не могу перемещаться по записям (
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36008223
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрВсе равно что то не то делаю ( не могу перемещаться по записям (А какие были попытки?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36008235
Sergey Sizov,

ОК всё! Могу! )
Теперь при открытии отчета, он открывается не на весь экран:
REPORT FORM repz TO PRINTER PROMPT PREVIEW

Как на весь экран открыть?
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36008295
Sergey Sizov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К. АлександрSergey Sizov,

ОК всё! Могу! )
Теперь при открытии отчета, он открывается не на весь экран:
REPORT FORM repz TO PRINTER PROMPT PREVIEW

Как на весь экран открыть?На forum.foxclub. за минуту находится:
Вопрос: Имеется ли возможность автоматически максимизировать окно предварительного просмотра отчёта?
Ответ: Попробуйте:

Код: plaintext
1.
2.
3.
4.
  
  #DEFINE WND_PRVREP "Report"  
  IF WEXIST(WND_PRVREP)  
      ZOOM WINDOW (WND_PRVREP) MAX  
  ENDIF
где-нибудь в событии MyReport.DataEnvironment.Init().
...
Рейтинг: 0 / 0
ComboBox фильтр без повторений
    #36008528
Sergey Sizov,
СПС )
...
Рейтинг: 0 / 0
90 сообщений из 90, показаны все 4 страниц
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / ComboBox фильтр без повторений
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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