Текущий архив: 2009.12.27;
Скачать: CL | DM;
Вниз
ADOTable позиция Найти похожие ветки
← →
Andrewtitoff © (2009-11-10 14:03) [0]Как в реальном времени отображать позицию ADOTable и кол -во записей?
т.е. я понимаю что это
ADOTable.RecNo и ADOTable.RecordCount, только как лучше всего всего их отобрахать в Статусбаре?, можно ли не прибегать к таймеру?
← →
И Павел (2009-11-10 14:05) [1]Можно в OnIdle прописать, но таймер с задержкой в секунду, например, не так уж грузит систему...
← →
Andrewtitoff © (2009-11-10 14:06) [2]Куда это можно засунуть что бы срабатывало и при фильтрации и при перемещении на другую запись, при удалении/добавлении записи, в общем в любом случае при изменении любого из этих параметров?
← →
Сергей М. © (2009-11-10 14:07) [3]
> я понимаю что это
> ADOTable.RecNo и ADOTable.RecordCount
Ты по-прежнему писатель ?)
Note: The number of rows indicated might be less than the total number of rows in a table. This can happen when the rows retrieved as a recordset for a dataset component are a conditional subset of the table.
И, поскольку ты вознамерился фильтровать таблицу, грабли тебя ждут обязательно)
← →
Andrewtitoff © (2009-11-10 14:08) [4]
> И Павел (10.11.09 14:05) [1]
> Можно в OnIdle прописать, но таймер с задержкой в секунду,
> например, не так уж грузит систему...
Не, таймер - это как то не гуманно, я имею ввиду может что то типа ADOTable.AfterRefresh
← →
И Павел (2009-11-10 14:09) [5]Напишите обработчик OnIdle. Его событие наступает когда программа обработает все сообщения системы - то есть именно тогда, когда вам и нужно. Нажали кнопку вниз - указатель таблицы сместился вниз, после этого программа стала свободна и ей посылается Idle.
Delphi нет под рукой - погуглите по OnIdle+Delphi - разобраться не сложно.
← →
Andrewtitoff © (2009-11-10 14:12) [6]
> Сергей М. © (10.11.09 14:07) [3]
> > я понимаю что это> ADOTable.RecNo и ADOTable.RecordCountТы
> по-прежнему писатель ?)
ну а куда без этого? =))))
Note: The number of rows indicated
> might be less than the total number of rows in a table.
> This can happen when the rows retrieved as a recordset for
> a dataset component are a conditional subset of the table.
> И, поскольку ты вознамерился фильтровать таблицу, грабли
> тебя ждут обязательно)
А что тогда делать?, мне без фильтрации никак... =((((
Чего-то я не доконца понял смысл, а транслейт выдал так:
Отметьте: число обозначенных рядов могло бы быть меньше чем общее количество рядов в столе. Это может случиться, когда ряды, восстановленные как recordset для компонента набора данных, являются условным подмножеством стола.
← →
Сергей М. © (2009-11-10 14:12) [7]
> Andrewtitoff
Кстати, в вашей шарашкиной конторе одновременный (со стороны более чем одного пользователя) доступ к этой убогой базе возможен ?
← →
Сергей М. © (2009-11-10 14:14) [8]
> что тогда делать?
Читать, читать и читать .. Потом много думать .. И только потом писАть)
← →
Andrewtitoff © (2009-11-10 14:14) [9]
> Сергей М. © (10.11.09 14:12) [7]
> > AndrewtitoffКстати, в вашей шарашкиной конторе одновременный
> (со стороны более чем одного пользователя) доступ к этой
> убогой базе возможен ?
Да, естественно!, правда она тормозить начинает, но бывает человек 5 одновременно сидят, больше обычно не требуется...
← →
Сергей М. © (2009-11-10 14:15) [10]
> мне без фильтрации никак
Коран что ли запрещает ?)
← →
И Павел (2009-11-10 14:15) [11]
> The number of rows indicated might be less than the total
> number of rows in a table
Такой вопрос я недавно поднимал. Вроде бы пришли к тому - что это встречается в редких случаях, если не оставлять, например, настройки курсора по умолчанию. Только топик найти не могу... Может удалили...
← →
Сергей М. © (2009-11-10 14:16) [12]
> естественно
И все пытаются внести изменения в эту таблицу ?
← →
Andrewtitoff © (2009-11-10 14:17) [13]
> Сергей М. © (10.11.09 14:14) [8]
> > что тогда делать?Читать, читать и читать .. Потом много
> думать .. И только потом писАть)
Ну это то понятно, только я вам вчера обьяснял всю ситуацию...
Неужели так сложно подсказать?, я думаю вы наверняка знаете какой нибудь хороший способ!, может у ADOTable есть куда запихнуть обработку одновременно этих двух событий?
← →
Сергей М. © (2009-11-10 14:18) [14]
> Andrewtitoff © (10.11.09 14:17) [13]
Тебе же shiknik (C) сказал - выбрось к лешему ADOTable !
← →
Andrewtitoff © (2009-11-10 14:18) [15]
> Сергей М. © (10.11.09 14:16) [12]
> > естественноИ все пытаются внести изменения в эту таблицу
> ?
Ну, бывает, не все правда, но теоретически 3 человека одновременно могут, больше нет, у остальных доступ только чтение
← →
Dennis I. Komarov © (2009-11-10 14:21) [16]
> Неужели так сложно подсказать?
Подсказываю: не нужно "бабушкам" видеть эти параметры...
З.Ы. и выбрось T...Table
← →
Andrewtitoff © (2009-11-10 14:22) [17]
> Сергей М. © (10.11.09 14:15) [10]
> > мне без фильтрации никакКоран что ли запрещает ?)
Нет, просто нужно в реальном времене при том же поиске по адресу отображать результаты выборки
> И Павел (10.11.09 14:15) [11]
> > The number of rows indicated might be less than the total
> > number of rows in a tableТакой вопрос я недавно поднимал.
> Вроде бы пришли к тому - что это встречается в редких случаях,
> если не оставлять, например, настройки курсора по умолчанию.
> Только топик найти не могу... Может удалили...
Да вы по руммки сначала обьясните что это значит... =)))
> Сергей М. © (10.11.09 14:18) [14]
> > Andrewtitoff © (10.11.09 14:17) [13]Тебе же shiknik
> (C) сказал - выбрось к лешему ADOTable !
А чем вместо него пользоваться?, и чем он плох?, ну кроме скорости - это понятно, но в принципе терпимо в моем случае
← →
Сергей М. © (2009-11-10 14:23) [18]
> Ну, бывает
И как же ты собрался "в реальном времени" показывать кол-во записей, если в то самое "реальное время" любой из "избранных" на другой машине может удалить или добавить записи ?
← →
Andrewtitoff © (2009-11-10 14:23) [19]
> Dennis I. Komarov © (10.11.09 14:21) [16]
> > Неужели так сложно подсказать?Подсказываю: не нужно "бабушкам"
> видеть эти параметры...З.Ы. и выбрось T...Table
Как раз нужно!...
А что вместо него использовать? и в чем разница?
← →
Сергей М. © (2009-11-10 14:24) [20]
> чем вместо него пользоваться?
Сказано же было - ADOQuery или ADODataSet
← →
Andrewtitoff © (2009-11-10 14:27) [21]
> Сергей М. © (10.11.09 14:23) [18]
> > Ну, бываетИ как же ты собрался "в реальном времени" показывать
> кол-во записей, если в то самое "реальное время" любой из
> "избранных" на другой машине может удалить или добавить
> записи ?
Хм тож верно, ну тогда хотя бы условно в реальном, т.е. суть в том что после выборки открывается карточка лифта, и там должно отображаться что мол запись такая то , всего записей т.е. допустим выбрал человек адрес какой то - а там 4 лифта, соответственно таблица отфильтровалась и открылась карточка где написанно лифт № 1 из 4-х....
← →
Andrewtitoff © (2009-11-10 14:28) [22]
> Сергей М. © (10.11.09 14:24) [20]
> > чем вместо него пользоваться?Сказано же было - ADOQuery
> или ADODataSet
А чем они лучше?, какие у них плюсы и различия?
← →
Dennis I. Komarov © (2009-11-10 14:32) [23]
> А чем они лучше?, какие у них плюсы и различия?
Это долгая песня... По форуму побегай...
← →
Sergey13 © (2009-11-10 14:33) [24]> [21] Andrewtitoff © (10.11.09 14:27)
> открылась карточка где написанно лифт № 1 из 4-х....
Не уверен про аксес (вроде он у тебя), но в общем случае у другой бабушки лифтом №1 может оказаться совсем другой лифт, нежели у первой бабушки.
← →
Andrewtitoff © (2009-11-10 14:35) [25]
> Dennis I. Komarov © (10.11.09 14:32) [23]
> > А чем они лучше?, какие у них плюсы и различия?Это долгая
> песня... По форуму побегай...
Ну млин, говорите
>Сказано же было - ADOQuery или ADODataSet
А что из них использовать?
> Sergey13 © (10.11.09 14:33) [24]
> > [21] Andrewtitoff © (10.11.09 14:27)> открылась карточка
> где написанно лифт № 1 из 4-х....Не уверен про аксес (вроде
> он у тебя), но в общем случае у другой бабушки лифтом №1
> может оказаться совсем другой лифт, нежели у первой бабушки.
>
Так это и не нужно как раз нужно что бы каждая бабушка видела то - что она выбрала....
← →
Andrewtitoff © (2009-11-10 14:36) [26]Тем более удаляет или добавляет записи только один человек двое других меняют только какие либо неключевые поля....
← →
Dennis I. Komarov © (2009-11-10 14:40) [27]
> А что из них использовать?
Я DS юзаю... А там смотри сам... Да, основы SQL уже выучил?
> Тем более удаляет или добавляет записи только один человек
> двое других меняют только какие либо неключевые поля....
>
Неужели реализованы ограничения прав? :)
← →
Сергей М. © (2009-11-10 14:41) [28]
> Andrewtitoff © (10.11.09 14:28) [22]
http://www.sql.ru/subscribe/2005/285.shtml
Хотя для чего это тебе ? Ты же не читатель)
← →
Andrewtitoff © (2009-11-10 14:45) [29]
> Dennis I. Komarov © (10.11.09 14:40) [27]
> > А что из них использовать?Я DS юзаю... А там смотри сам.
> .. Да, основы SQL уже выучил?> Тем более удаляет или добавляет
> записи только один человек > двое других меняют только какие
> либо неключевые поля....> Неужели реализованы ограничения
> прав? :)
Нет, просто просто ключевое поле можно править только в режиме таблицы добовлять запись тоже, а они в таблицу вообще не лезут, а удальять теоретически можно, но они этого просто не делают потому что им этого ненужно и ничего кроме выговора и взыскания им за это не светит...
← →
Sergey13 © (2009-11-10 14:54) [30]> [25] Andrewtitoff © (10.11.09 14:35)
> как раз нужно что бы каждая бабушка видела то - что она выбрала....
А что она выбрала? Какую-то запись, которая сегодня вылезла первой?
Наверное техника туда будет посылать - люди там застряли. Вот техник рад будет, пока все лифты обойдет. 8-)
← →
Andrewtitoff © (2009-11-10 14:57) [31]
> Sergey13 © (10.11.09 14:54) [30]
> > [25] Andrewtitoff © (10.11.09 14:35)> как раз нужно
> что бы каждая бабушка видела то - что она выбрала....А что
> она выбрала? Какую-то запись, которая сегодня вылезла первой?
> Наверное техника туда будет посылать - люди там застряли.
> Вот техник рад будет, пока все лифты обойдет. 8-)
А это тут при чем?, вы вообще про что?
← →
Dennis I. Komarov © (2009-11-10 14:58) [32]
> Нет, просто просто ключевое поле можно править только в
> режиме таблицы добовлять запись тоже,
Это что за режим такой, что его силы могут сподобится править поле, кое носит нарицаение "ключевое"?
> а удальять теоретически можно, но они этого просто не делают
> потому что им этого ненужно и ничего кроме выговора и взыскания
> им за это не светит...
А по батону клацнуть случайно они не могут, да?
← →
Andrewtitoff © (2009-11-10 15:03) [33]
> Сергей М. © (10.11.09 14:41) [28]
> > Andrewtitoff © (10.11.09 14:28) [22]http://www.sql.ru/subscribe/2005/285.
> shtmlХотя для чего это тебе ? Ты же не читатель)
Просмотрел, но ответа на свой вопрос не нашел... =(((
← →
Andrewtitoff © (2009-11-10 15:08) [34]
> Dennis I. Komarov © (10.11.09 14:58) [32]
> > Нет, просто просто ключевое поле можно править только
> в > режиме таблицы добовлять запись тоже,Это что за режим
> такой, что его силы могут сподобится править поле, кое носит
> нарицаение "ключевое"?
В смысле?, ну просто таблицу открываеть и правишь любую запись в том чиле и в ключевом поле...
> а удальять теоретически можно, но
> они этого просто не делают > потому что им этого ненужно
> и ничего кроме выговора и взыскания > им за это не светит.
> ..А по батону клацнуть случайно они не могут, да?
Могут конечно, если в режиме редактирования, там специальная кнопочка появляется на форме... =)))
← →
Сергей М. © (2009-11-10 15:11) [35]
> ответа на свой вопрос не нашел
Это чудовищно.
← →
Sergey13 © (2009-11-10 15:13) [36]> [31] Andrewtitoff © (10.11.09 14:57)
> А это тут при чем?,
При том, что завтра лифтом №1 может быть любой другой лифт из указанных четырех.
Нужна ли вообще бабке эта информация (да еще в "реальном времени" 8-), есди (как мне кажется) по одному адресу вряд ли будет больше десятка лифтов, т.е. все и так видно на экране.
Впрочем не мое это дело. Делай как хочешь.
ЗЫ: Не интересный топик какой то.
← →
Dennis I. Komarov © (2009-11-10 15:13) [37]
> В смысле?, ну просто таблицу открываеть и правишь любую
> запись в том чиле и в ключевом поле...
И никак иначе сие действо совершить низя?
> Могут конечно, если в режиме редактирования, там специальная
> кнопочка появляется на форме... =)))
Режим Edit никаким образом не влияет на возможность удалять, добавлять записи...
З.Ы.
Свои частности оставте бедным "бабушкам". После такого шедевра они будут рады переучиться на все что угодно :)
← →
Andrewtitoff © (2009-11-10 15:16) [38]
> Sergey13 © (10.11.09 15:13) [36]
> > [31] Andrewtitoff © (10.11.09 14:57)> А это тут при
> чем?, При том, что завтра лифтом №1 может быть любой другой
> лифт из указанных четырех.Нужна ли вообще бабке эта информация
> (да еще в "реальном времени" 8-), есди (как мне кажется)
> по одному адресу вряд ли будет больше десятка лифтов, т.
> е. все и так видно на экране.Впрочем не мое это дело. Делай
> как хочешь.ЗЫ: Не интересный топик какой то.
Мля, да Вы все не правильно поняли... =)))
Там форма которая отображает в удобном виде все поля записи, но только одной и когда они перещелкиваются между выбранными записями нужно отображать сколько всего записей отфильтровано и какую они сейчас смотрят....
← →
Andrewtitoff © (2009-11-10 15:20) [39]
> Dennis I. Komarov © (10.11.09 15:13) [37]
> > В смысле?, ну просто таблицу открываеть и правишь любую
> > запись в том чиле и в ключевом поле...И никак иначе сие
> действо совершить низя?
Нет, там Edit который показывает содержимое этого поля readonly....
> Могут конечно, если в режиме редактирования,
> там специальная > кнопочка появляется на форме... =)))Режим
> Edit никаким образом не влияет на возможность удалять, добавлять
> записи...З.Ы.Свои частности оставте бедным "бабушкам". После
> такого шедевра они будут рады переучиться на все что угодно
> :)
Да я не про режим Edit..., они же не в таблице лазиют - а там специальные удобные формочки сделаны..., так вот эти формочки когда открываешь - тебя спрашивают для просмотра или редактировпания ты их открываешь и появляются соответствующие наборы инструментов и возможностей на форме...
← →
Sergey13 © (2009-11-10 15:24) [40]> [38] Andrewtitoff © (10.11.09 15:16)
> Мля, да Вы все не правильно поняли... =)))
Да все я понял. Есть одна таблица, которая закатана в грид и фильтруется до полного удовлетворения. После этого по кнопке появляется твоя чудесная форма для редактирования. Только какая разница бабушке какую именно (в случайном порядке) запись она видит? Ведь она может, насколько я понял, и не фильтровать вовсе, а просто редактировать все подряд лифты.
← →
Dennis I. Komarov © (2009-11-10 15:24) [41]Т.е. это мне телепатор должен подсказать, что такое режим редактирования...
← →
Anatoly Podgoretsky © (2009-11-10 15:37) [42]> Andrewtitoff (10.11.2009 15:03:33) [33]
Обидно слышать.
← →
andrewtitoff © (2009-11-10 19:48) [43]
> Sergey13 © (10.11.09 15:24) [40]
> > [38] Andrewtitoff © (10.11.09 15:16)> Мля, да Вы все
> не правильно поняли... =)))Да все я понял. Есть одна таблица,
> которая закатана в грид и фильтруется до полного удовлетворения.
> После этого по кнопке появляется твоя чудесная форма для
> редактирования. Только какая разница бабушке какую именно
> (в случайном порядке) запись она видит? Ведь она может,
> насколько я понял, и не фильтровать вовсе, а просто редактировать
> все подряд лифты.
Да вот и не все вы поняли..., грид там действительно есть, но это не значит что бабушка его обязательно видит, грид только для избранных, а бабушка просто выбирает в меню "поиск", выбирает нужные ей параметры и появляется "чудесная форма", но форма отображает только одну запись, а в статус баре должно писаться что мол по вашим, бабушка критериям отобрано х-записей, а сейчас вы просматриваете из них запись № у....
> Dennis I. Komarov © (10.11.09 15:24) [41]
> Т.е. это мне телепатор должен подсказать, что такое режим
> редактирования...
Ну в общем то да, извиняюсь, немного не верно изложил информацию.., но теперь то я думаб вам все ясно стало?!, и вы мне поможете найти ответ на мой вопрос? ;)
> Anatoly Podgoretsky © (10.11.09 15:37) [42]
> > Andrewtitoff (10.11.2009 15:03:33) [33]Обидно слышать.
>
А что обидно?, может я и дурак, но вот Вы посмотрите тему сабджа и ткните пальцем в строчку в приведенном выше материале где написано решение моей проблемы и тогда поговорим, а просто оскорбления ни мне пользы не принесут - не Вам уважения не прибавят....
← →
Сергей М. © (2009-11-10 19:50) [44]
> Вы посмотрите тему сабджа
Там что-то из Камасутры)
← →
sniknik © (2009-11-10 20:14) [45]> где написано решение моей проблемы
твоя проблема в том что ты занимаешься не своим делом. что делать я тебе говорил. извини, но не буду искать где, чтобы ткнуть конкретно в строчку.
> А что обидно?
неправильное цитирование, в оригинале(?) Игорь Шевченко говорил "больно слышать".
(и действительно, смотришь на твои мучения, и душа болит... не настолько чтобы взять, и за тебя сделать, а по другому вряд ли получится. объяснять тебе труда больше займет чем самому... и потом, ты чтото говорил о самообразовании(/интересе к этому делу)... :о))
← →
andrewtitoff © (2009-11-10 20:42) [46]
> Сергей М. © (10.11.09 19:50) [44]
> > Вы посмотрите тему сабджаТам что-то из Камасутры)
Это все Ваши эротические фантазии... =))))
> sniknik © (10.11.09 20:14) [45]
> > где написано решение моей проблемы твоя проблема в том
> что ты занимаешься не своим делом. что делать я тебе говорил.
> извини, но не буду искать где, чтобы ткнуть конкретно в
> строчку.> А что обидно?неправильное цитирование, в оригинале(?
> ) Игорь Шевченко говорил "больно слышать".(и действительно,
> смотришь на твои мучения, и душа болит... не настолько
> чтобы взять, и за тебя сделать, а по другому вряд ли получится.
> объяснять тебе труда больше займет чем самому... и потом,
> ты чтото говорил о самообразовании(/интересе к этому делу).
> .. :о))
А вы простите, что, родились со всеми своими знаниями, или вам все таки кто по подсказывал?, за меня делать не нужно, вы подскажите, а если нужно и обЪясноте, времени это естественно больше займет - но за то у вас будет на одного человека меньше - кто будет обращаться к вам с подобным вопросом... =)))
← →
Германн © (2009-11-10 20:51) [47]
> за то у вас будет на одного человека меньше - кто будет
> обращаться к вам с подобным вопросом...
Имя вам - легион (((
← →
Сергей М. © (2009-11-10 20:53) [48]
> andrewtitoff © (10.11.09 20:42) [46]
Почему мои-то ?)
Про "позицию ADOTable" кто нафантазировал ?)
← →
andrewtitoff © (2009-11-10 21:02) [49]
> Германн © (10.11.09 20:51) [47]
> > за то у вас будет на одного человека меньше - кто будет
> > обращаться к вам с подобным вопросом...Имя вам - легион
> (((
Ну что поделаешь..., Вы тоже в чем то не очень то и разбираетесь...
> Сергей М. © (10.11.09 20:53) [48]
> > andrewtitoff © (10.11.09 20:42) [46]Почему мои-то ?)Про
> "позицию ADOTable" кто нафантазировал ?)
Ну тему то конечно придумал я, отрицать не буду, но вот ее эротический смысл в полной мере раскрыли именно Вы.... =))))
← →
sniknik © (2009-11-10 23:37) [50]> А вы простите, что, родились со всеми своими знаниями, или вам все таки кто по подсказывал?
не родился с ними конечно, но как то все сам, мало кто мне подсказывал. так выходило, и интернета не было когда азам учился, и когда взялся фоксовую систему дорабатывать в единственном числе хоть как-то знакомых с фоксом оказался, и когда на Delphi-ADO пришел оно только начиналось... ни одной русскоязычной доки/знакомого с ним человека рядом не было... т.что в основном сам.
а вообще, ты не смотри на других, проблема то у тебя, а не у других (чё за привычка, на других кивать?), и я тебе сказал так не по по тому что ты спрашиваешь, а потому, что не слушаешь, не читаешь, не учишься. "невменяемый" в общем, что не советуй все мимо ушей, считаешь неправильными советами, бредом... (знаний нет, но определить что правильно, что нет берешься. парадокс).
> за меня делать не нужно, вы подскажите
сколько веток назад я тебе "подсказал" бросить ADOTable? и? почему до сих вопрос по нему? и не надо говорить "не сказали почему его бросать", это не уговоры/сравнительный анализ с другими компонентами, это совет, т.е. тебе его дали, а дальше ты сам должен выяснить следовать ему или нет, поискать информацию, почитать и сделать вывод (и озвучить, типа "да вот поменял", или "я не согласен с этим вот по такой причине ...").
а совет о последовательном/наглядном заполнении "боксов"? ты его просто не понял (!). из чего я сделал вывод что у тебя нет "базы", а без базовых знаний советы не помогут, только навредят (т.к. их истолковывают неверно). тут уже не совет, обучение, ликбез нужен. а это долго, и бессмысленно т.к. ты не учишься быть программистом, ты хочешь на наших советах "сляпать" программку, и забыть все как страшный сон... (мнение составлено по твоим ответам)
> но за то у вас будет на одного человека меньше - кто будет обращаться к вам с подобным вопросом... =)))
сомневаюсь. на добрых "ездят". прокати одного, набежит сотня желающих.
> Ну что поделаешь..., Вы тоже в чем то не очень то и разбираетесь...
логично, черт побери. я тоже не разбираюсь во многом. например в ремонте автомобилей, но я в ремонт и не лезу!
вот потому и говорю - займись своим делом. либо бросай его и начинай серьезно заниматься программированием, книжки там читай, примеры делай, и т.д. но только не отмазывайся тем, что за основную работу тебе все одно заплатят даже за не сделанную...
"это уж совсем не доказательство". © Крош
http://rutube.ru/tracks/1494430.html?v=e2f55f5079b9c65be0077c6b0e3e2bdb&bmstart=26
← →
andrewtitoff © (2009-11-11 00:44) [51]
> sniknik © (10.11.09 23:37) [50]
> > А вы простите, что, родились со всеми своими знаниями,
> или вам все таки кто по подсказывал?не родился с ними конечно,
> но как то все сам, мало кто мне подсказывал. так выходило,
> и интернета не было когда азам учился, и когда взялся фоксовую
> систему дорабатывать в единственном числе хоть как-то знакомых
> с фоксом оказался, и когда на Delphi-ADO пришел оно только
> начиналось... ни одной русскоязычной доки/знакомого с ним
> человека рядом не было... т.что в основном сам.
Ну неповезло вам в чем то, согласен, вам когда то паскаль изучал - когда интернета небыло, да и с книгами проблемы были, правда слава богу подсказать было кому, ну так зачем теперь жадничать - мол я сам изучал и другие пускай сами мучаются, неужели так сложно подсказать?
> а вообще, ты не смотри на других, проблема то у тебя, а
> не у других (чё за привычка, на других кивать?), и я тебе
> сказал так не по по тому что ты спрашиваешь, а потому, что
> не слушаешь, не читаешь, не учишься. "невменяемый" в общем,
> что не советуй все мимо ушей, считаешь неправильными советами,
> бредом... (знаний нет, но определить что правильно, что
> нет берешься. парадокс).
Да я и не спорю что проблема у меня - поэтому то я и здесь, а на счет бреда - не соглашусь т.к. вы даете советы не разобравшись полностью в ситуации, а потом обижаетесь что я их отвергаю...
> > за меня делать не нужно, вы подскажитесколько веток назад
> я тебе "подсказал" бросить ADOTable? и? почему до сих вопрос
> по нему? и не надо говорить "не сказали почему его бросать",
> это не уговоры/сравнительный анализ с другими компонентами,
> это совет, т.е. тебе его дали, а дальше ты сам должен выяснить
> следовать ему или нет, поискать информацию, почитать и сделать
> вывод (и озвучить, типа "да вот поменял", или "я не согласен
> с этим вот по такой причине ..."). а совет о последовательном/наглядном
> заполнении "боксов"? ты его просто не понял (!). из чего
> я сделал вывод что у тебя нет "базы", а без базовых знаний
> советы не помогут, только навредят (т.к. их истолковывают
> неверно). тут уже не совет, обучение, ликбез нужен. а это
> долго, и бессмысленно т.к. ты не учишься быть программистом,
> ты хочешь на наших советах "сляпать" программку, и забыть
> все как страшный сон... (мнение составлено по твоим ответам)
Тейбл я использую только для отображения, а запросы делаю через квери...
Совет я ваш прекрасно понял, но я вам уже несколько раз обьяснял что мне это неподходит в том виде - в котором вы предлагали....
По поводу обучения - нужно либо тупо отвечать на мои вопросы либо обьяснять нормально что к чему и почему, а не гнуть пальцы что я все делаю не так...
> > Ну что поделаешь..., Вы тоже в чем то не очень то и разбираетесь.
> ..логично, черт побери. я тоже не разбираюсь во многом.
> например в ремонте автомобилей, но я в ремонт и не лезу!
> вот потому и говорю - займись своим делом. либо бросай его
> и начинай серьезно заниматься программированием, книжки
> там читай, примеры делай, и т.д. но только не отмазывайся
> тем, что за основную работу тебе все одно заплатят даже
> за не сделанную... "это уж совсем не доказательство". ©
> Крошhttp://rutube.ru/tracks/1494430.html?v=e2f55f5079b9c65be0077c6b0e3e2bdb&bmstart=26
Ну и зря, видимо вы совсем не любознательный..., я тоже 2 года назад даже не знал где в автомобиле какие педали, но полтора года назад решил что мне необходима машина и отучился на права, а этим летом я уже своими руками произвел кап. ремонт двигателя и машина замечательно ездит, и замедьте для этого никаких книг по устройству ДВС я не читал, а обошелся базовыми знаниями полученными в процессе обучения (школа, техникум, университет, причем с автомобилями ничего связанно небыло), руководству по ремонту автомобиля и ХОРОШЕГО СОВЕТЧИКА, который по телефону меня консультировал...
← →
andrewtitoff © (2009-11-11 00:52) [52]
> http://rutube.ru/tracks/1494430.html?v=e2f55f5079b9c65be0077c6b0e3e2bdb&bmstart=26
И замедьте даже смешарики нашли в итоге свой край земли... =)))))))))))
← →
Германн © (2009-11-11 00:55) [53]
> andrewtitoff © (11.11.09 00:44) [51]
> По поводу обучения - нужно либо тупо отвечать на мои вопросы
> либо обьяснять нормально что к чему и почему, а не гнуть
> пальцы что я все делаю не так...
"Тупые" ответы ты игнорируешь, спрашиваешь почему. Но объяснить тебе "почему" нереально. Слишком длинная лекция порой получится. Тезис "ты делаешь всё не так" - это не гнутые пальцы, это факт. Но объяснение этого - это тоже не хилая лекция.
Так что я вижу только три варианта:
1. Ты платишь кому-то за программу.
2. Ты начинаешь учиться (читать учебники, причем от корки до корки).
3. Ты плюёшь на всё это и живёшь своей жизнью забыв про эту программу. А заодно и про любые другие программы.
← →
andrewtitoff © (2009-11-11 01:07) [54]
> Германн © (11.11.09 00:55) [53]
> > andrewtitoff © (11.11.09 00:44) [51]> По поводу обучения
> - нужно либо тупо отвечать на мои вопросы > либо обьяснять
> нормально что к чему и почему, а не гнуть > пальцы что я
> все делаю не так..."Тупые" ответы ты игнорируешь, спрашиваешь
> почему. Но объяснить тебе "почему" нереально. Слишком длинная
> лекция порой получится. Тезис "ты делаешь всё не так" -
> это не гнутые пальцы, это факт. Но объяснение этого - это
> тоже не хилая лекция.Так что я вижу только три варианта:
> 1. Ты платишь кому-то за программу. 2. Ты начинаешь учиться
> (читать учебники, причем от корки до корки). 3. Ты плюёшь
> на всё это и живёшь своей жизнью забыв про эту программу.
> А заодно и про любые другие программы.
Опять вы за свое... =))))
Я уже говорил что года полтора говорили тоже самое - но проект я свой завершил и все нормально работает и этот завершу с вашей помощью или без нее, так что свои варианты по поводу бросить и нанять оставьте для себя.....
По поводу обьяснять - согласен, это дело не легкое и утомительное, сам в свое время замещал в техникуме преподавателя информатики когда изучали ДОС, чесно скажу после пары практических занятий я "писал кипятком" и крыл всех трехэтажным матом.... =)))))
Ну тогда если вам по каким либо причинам нехочется объяснять - Вы можете вместо того что бы умничать - тупо ответить на поставленный вопрос?
Например по данной теме: плюньте что адотейбл нехорошая вещь - это моя проблема и мне с ней мучаться просто скажите что то вроде : в адотейбл есть такое-то свойство, обработчик куда можно мою процедуру вывода этих двух значений и все будет ок...
← →
Германн © (2009-11-11 01:21) [55]
> andrewtitoff © (11.11.09 01:07) [54]
> По поводу обьяснять - согласен, это дело не легкое и утомительное,
> сам в свое время замещал в техникуме преподавателя информатики
> когда изучали ДОС, чесно скажу после пары практических занятий
> я "писал кипятком" и крыл всех трехэтажным матом.... =)))))
Ты когда замещал преподавателя работал в режиме "лекции/семинара" или в режиме диалога?
> Ну тогда если вам по каким либо причинам нехочется объяснять
> - Вы можете вместо того что бы умничать - тупо ответить
> на поставленный вопрос?
Вот теперь я понял, что "тупо ответить на поставленный вопрос" == дать код. Но далеко не всегда можно дать код на "неправильный" вопрос.
> Например по данной теме: плюньте что адотейбл нехорошая
> вещь - это моя проблема и мне с ней мучаться просто скажите
> что то вроде : в адотейбл есть такое-то свойство, обработчик
> куда можно мою процедуру вывода этих двух значений и все
> будет ок...
>
А это уже совсем непонятно. Какие два значения?
RecNo & RecordCount?
← →
Sergey13 © (2009-11-11 08:36) [56]> [43] andrewtitoff © (10.11.09 19:48)
> грид только для избранных
За что ты так людей не любишь? 8-)
Вот бы тебе в гугле такое сделать. Ввел строку поиска, а тебя сразу на первую ссылку, и "далее со всеми остановками".
← →
Сергей М. © (2009-11-11 09:18) [57]
> просто скажите что то вроде : в адотейбл есть такое-то свойство,
> обработчик куда можно мою процедуру вывода этих двух значений
> и все будет ок
OnAfterScroll
И попробуй только после всего этого захныкать, что не все или не ок)
← →
Andrewtitoff © (2009-11-11 10:02) [58]
> Германн © (11.11.09 01:21) [55]
> > andrewtitoff © (11.11.09 01:07) [54]> По поводу обьяснять
> - согласен, это дело не легкое и утомительное,> сам в свое
> время замещал в техникуме преподавателя информатики > когда
> изучали ДОС, чесно скажу после пары практических занятий
> > я "писал кипятком" и крыл всех трехэтажным матом.... =)))))Ты
> когда замещал преподавателя работал в режиме "лекции/семинара"
> или в режиме диалога?
И то и другое, но бесился естественно в режиме диалога, там было пол урока теория, а вторая половина - практика...
> > Ну тогда если вам по каким либо причинам нехочется объяснять
> > - Вы можете вместо того что бы умничать - тупо ответить
> > на поставленный вопрос?Вот теперь я понял, что "тупо ответить
> на поставленный вопрос" == дать код. Но далеко не всегда
> можно дать код на "неправильный" вопрос.
Ну не совсем в явном виде код - но близко к тому
> > Например по данной теме: плюньте что адотейбл нехорошая
> > вещь - это моя проблема и мне с ней мучаться просто скажите
> > что то вроде : в адотейбл есть такое-то свойство, обработчик
> > куда можно мою процедуру вывода этих двух значений и все
> > будет ок...> А это уже совсем непонятно. Какие два значения?
> RecNo & RecordCount?
Ну можно ли куда нибудь запихнуть вывод этих значений что бы при изменении любого из них они обновлялись на форме?
> Sergey13 © (11.11.09 08:36) [56]
> > [43] andrewtitoff © (10.11.09 19:48)> грид только для
> избранныхЗа что ты так людей не любишь? 8-)Вот бы тебе в
> гугле такое сделать. Ввел строку поиска, а тебя сразу на
> первую ссылку, и "далее со всеми остановками".
Да люблю я людей, просто так надо... =))))
Тем более в таблице 80 полей, из которых пользователю нужны не больше половины и просистав вправо они просто потеряют нужную строчку и исправят ненароком не ту строчку, тем более в родной проге столбцы по руски не подписаны, они автоматом называются как поле и не так просто догодаться что столбец "EWHO" - это оказывается кто проводил экспертизу...
> Сергей М. © (11.11.09 09:18) [57]
> > просто скажите что то вроде : в адотейбл есть такое-то
> свойство,> обработчик куда можно мою процедуру вывода этих
> двух значений > и все будет окOnAfterScrollИ попробуй только
> после всего этого захныкать, что не все или не ок)
Я это уже пробовал - сразу ошибку выдает.... =((((
Access violation at address 00404F84 ....
← →
Сергей М. © (2009-11-11 10:05) [59]
> уже пробовал - сразу ошибку выдает....
> Access violation at address 00404F84
Ты сам сказал, что "все будет ок".
Ну раз ок, то какие претензии ?)
Проблемы индейцев шерифа не волнуют)
← →
Sergey13 © (2009-11-11 10:14) [60]> [58] Andrewtitoff © (11.11.09 10:02)
> Да люблю я людей, просто так надо... =))))
> Тем более в таблице 80 полей
В гриде количество полей может быть любым.
← →
Anatoly Podgoretsky © (2009-11-11 10:23) [61]> sniknik (10.11.2009 23:37:50) [50]
> считаешь неправильными советами, бредом... (знаний нет, но определить что правильно, что нет берешься. парадокс).
Бред это когда человек, что то бормочет, а что непонятно, ну как с тобой.
← →
Anatoly Podgoretsky © (2009-11-11 10:25) [62]> andrewtitoff (11.11.2009 00:44:51) [51]
Ну чисто халявная позиция, вы не только дайте, но еще и ложку ко рту поднесите, но не просто так, а вот так.
← →
Dennis I. Komarov © (2009-11-11 10:30) [63]Пользователь вообще не должен знать о существовании неких таблиц, полей, записей, и тем более править какие-то значения в гриде %)
У пользователя должен быть понятный интерфейс, А НЕ НАЗВАНИЕ ПОЛЕЙ ТАБЛИЦ
← →
Anatoly Podgoretsky © (2009-11-11 10:32) [64]
> В гриде количество полей может быть любым.
И в гриде совсем не обязательно редактировать, а при таких проблемах это должно быть категорически запрещено.
← →
Andrewtitoff © (2009-11-11 10:49) [65]
> Сергей М. © (11.11.09 10:05) [59]
> > уже пробовал - сразу ошибку выдает....> Access violation
> at address 00404F84Ты сам сказал, что "все будет ок".Ну
> раз ок, то какие претензии ?)Проблемы индейцев шерифа не
> волнуют)
Не, я имел ввиду рабочий вариант, а не заведомо ложный... =)))
> Sergey13 © (11.11.09 10:14) [60]
> > [58] Andrewtitoff © (11.11.09 10:02)> Да люблю я людей,
> просто так надо... =))))> Тем более в таблице 80 полейВ
> гриде количество полей может быть любым.
Да это понятно, но во первых это не удобно, а во вторых не будет же каждый раз пользователь выставлять галочки около 80-ти полей что ему показывать, а что нет...
> Dennis I. Komarov © (11.11.09 10:30) [63]
> Пользователь вообще не должен знать о существовании неких
> таблиц, полей, записей, и тем более править какие-то значения
> в гриде %)У пользователя должен быть понятный интерфейс,
> А НЕ НАЗВАНИЕ ПОЛЕЙ ТАБЛИЦ
Ну так и я про то же, для этого и существует чудесная форма!, но некоторым типа меня нужно и таблица!, а целом я про это и говор!
> Anatoly Podgoretsky © (11.11.09 10:32) [64]
> > В гриде количество полей может быть любым.И в гриде совсем
> не обязательно редактировать, а при таких проблемах это
> должно быть категорически запрещено.
В смысле?, при каких проблемх?
← →
Sergey13 © (2009-11-11 10:49) [66]> [64] Anatoly Podgoretsky © (11.11.09 10:32)
Да он и не редактирует в нем. Он его даже на посмотреть не выводит. 8-)
← →
Andrewtitoff © (2009-11-11 10:52) [67]
> Sergey13 © (11.11.09 10:49) [66]
> > [64] Anatoly Podgoretsky © (11.11.09 10:32)Да он и не
> редактирует в нем. Он его даже на посмотреть не выводит.
> 8-)
Ну а это вам кто сказал?...
Вот вы на меня все гоните, а сами даже не знаете про что говорите, а потом обижаетесь что я не слушаю вас....
← →
Сергей М. © (2009-11-11 10:53) [68]
> имел ввиду рабочий вариант, а не заведомо ложный
Я не знаю кого или чего и в какой позиции ты там имел, но AfterScroll вызывается при позиционировании на существующую запись в результате явных или неявных вызовов методов методов навигации объекта TDataSet.
← →
Sergey13 © (2009-11-11 10:55) [69]> [67] Andrewtitoff © (11.11.09 10:52)
> Ну а это вам кто сказал?...
> [43] andrewtitoff © (10.11.09 19:48)
> грид там действительно есть, но это не значит что бабушка
> его обязательно видит, грид только для избранных, а бабушка
> просто выбирает в меню "поиск", выбирает нужные ей параметры
> и появляется "чудесная форма", но форма отображает только
> одну запись, а в статус баре должно писаться что мол по
> вашим, бабушка критериям отобрано х-записей, а сейчас вы
> просматриваете из них запись № у....
Как понимать тебя, Саид? (с)
← →
Dennis I. Komarov © (2009-11-11 10:59) [70]
> но некоторым типа меня нужно и таблица
MS Аксесс спасет
← →
Andrewtitoff © (2009-11-11 10:59) [71]
> Сергей М. © (11.11.09 10:53) [68]
> > имел ввиду рабочий вариант, а не заведомо ложныйЯ не знаю
> кого или чего и в какой позиции ты там имел, но AfterScroll
> вызывается при позиционировании на существующую запись в
> результате явных или неявных вызовов методов методов навигации
> объекта TDataSet.
Ну в общем то конечно тут я не могу утверждать что не получил что хотел - просто как мне показалось - вы когда это писали уже заранее знали что будет такая ошибка.....
procedure TForm1.ADOTable4AfterScroll(DataSet: TDataSet);
begin
Form2.StatusBar1.SimpleText:="Запись № "+inttostr(ADOTable4.RecNo)+" из "+inttostr(ADOTable4.RecordCount);
end;
ошибка при запуске программы возникает....
unit Start;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, Gauges, jpeg, StdCtrls, ADODB,
ComCtrls, DBCtrls, DB;//, DBClient, Mask;
type
TStartForm = class(TForm)
Gauge1: TGauge;
Image1: TImage;
Label1: TLabel;
Label2: TLabel;
procedure FormActivate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
StartForm: TStartForm;
implementation
uses MainUnit, Unit2, Unit3;
{$R *.dfm}
procedure TStartForm.FormActivate(Sender: TObject);
var
i : integer;
c : boolean;
n: integer;
s : string;
begin
Gauge1.Progress:=0;
Application.ProcessMessages;
Form1.DBGrid5.Visible:=false;
Form1.ADOQuery1.CursorType := ctOpenForwardOnly;
for i := 0 to Form2.ComponentCount - 1 do
if Form2.Components[i] is TDBComboBox then
with TDBComboBox(Form2.Components[i]) do
begin
Form1.ADOQuery1.SQL.Text:=Format("select distinct %s from lift",[Form1.ADOTable4.Fields[tag].FieldName]);
Form1.ADOQuery1.Open;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю список: "+Form1.ADOTable4.Fields[tag].FieldName;
Gauge1.Progress:=I;
while not Form1.ADOQuery1.Eof do
begin
Items.Add(Form1.ADOQuery1.Fields[0].AsString);
Form1.ADOQuery1.Next;
end;
end;
Form1.ADOQuery1.SQL.Text := "select distinct REGNUM from lift";
Form1.ADOQuery1.Open;
while not Form1.ADOQuery1.Eof do
begin
Form2.ComboBox0.Items.Add(Form1.ADOQuery1.Fields[0].AsString);
Form1.ADOQuery1.Next;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю лифты, Рег. №: "+Form1.ADOQuery1.Fields[0].AsString;
Gauge1.Progress:=I+trunc(Form1.ADOQuery1.RecNo/10);
end;
Form1.ADOQuery1.SQL.Text := "select distinct STREET from lift";
Form1.ADOQuery1.Open;
while not Form1.ADOQuery1.Eof do
begin
if Form1.ADOQuery1.Fields[0].AsString<>"" then Form2.ComboBox1.Items.Add(Form1.ADOQuery1.Fields[0].AsString)
else Form2.ComboBox1.Items.Add("нет");
Form1.ADOQuery1.Next;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю Улицы : "+Form1.ADOQuery1.Fields[0].AsString;
end;
Form1.ADOQuery1.SQL.Text := "select distinct HOUSE from lift";
Form1.ADOQuery1.Open;
while not Form1.ADOQuery1.Eof do
begin
if Form1.ADOQuery1.Fields[0].AsString<>"" then Form2.ComboBox2.Items.Add(Form1.ADOQuery1.Fields[0].AsString)
else Form2.ComboBox2.Items.Add("нет");
Form1.ADOQuery1.Next;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю Дома : "+Form1.ADOQuery1.Fields[0].AsString;
end;
Form1.ADOQuery1.SQL.Text := "select distinct CORP from lift";
Form1.ADOQuery1.Open;
while not Form1.ADOQuery1.Eof do
begin
if Form1.ADOQuery1.Fields[0].AsString<>"" then Form2.ComboBox3.Items.Add(Form1.ADOQuery1.Fields[0].AsString)
else Form2.ComboBox3.Items.Add("нет");
Form1.ADOQuery1.Next;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю Корпуса : "+Form1.ADOQuery1.Fields[0].AsString;
end;
Form1.ADOQuery1.SQL.Text := "select distinct PARNUM from lift";
Form1.ADOQuery1.Open;
while not Form1.ADOQuery1.Eof do
begin
if Form1.ADOQuery1.Fields[0].AsString<>"" then Form2.ComboBox4.Items.Add(Form1.ADOQuery1.Fields[0].AsString)
else Form2.ComboBox4.Items.Add("нет");
Form1.ADOQuery1.Next;
Application.ProcessMessages;
StartForm.Label1.Caption:="Загружаю Парадные : "+Form1.ADOQuery1.Fields[0].AsString;
end;
n:=Gauge1.Progress;
for I :=n to 1000 do
Gauge1.Progress:=I;
Form1.DBGrid5.Visible:=true;
end;
end.
эта форма запускается перед запуском основной т.е.program Base_Util;
uses
Forms,
Dialogs,
MainUnit in "MainUnit.pas" {Form1},
Unit2 in "Unit2.pas" {Form2},
Unit3 in "Unit3.pas" {Form3},
Start in "Start.pas" {StartForm},
FirstHinstanceRunning_ in "FirstHinstanceRunning_.pas",
gsCatcher in "gsCatcher.pas";
{$R *.res}
begin
GetDir(0,MD);
Application.Initialize;
if FirstHinstanceRunning(1) then
begin Showmessage("Программа уже запущена!"); Exit; end;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
StartForm := TStartForm.Create(Application);
StartForm.Show;
StartForm.Update;
while StartForm.Gauge1.Progress<>1000 do
Application.ProcessMessages;
Application.Title := "Лифтовая аварийная служба";
StartForm.Hide;
StartForm.Free;
Application.CreateForm(TForm3, Form3);
Application.Run;
end.
← →
Andrewtitoff © (2009-11-11 11:02) [72]
> Sergey13 © (11.11.09 10:55) [69]
> > [67] Andrewtitoff © (11.11.09 10:52)> Ну а это вам кто
> сказал?...> [43] andrewtitoff © (10.11.09 19:48)> грид
> там действительно есть, но это не значит что бабушка >
> его обязательно видит, грид только для избранных, а бабушка
> > просто выбирает в меню "поиск", выбирает нужные ей параметры
> > и появляется "чудесная форма", но форма отображает только
> > одну запись, а в статус баре должно писаться что мол по
> > вашим, бабушка критериям отобрано х-записей, а сейчас
> вы > просматриваете из них запись № у....Как понимать тебя,
> Саид? (с)
Ну так и понимать - что кому нужно - могут на грид смотрет, кому не нужно - на чудо форму, а для привередливых - грид на заднем фоне за формой...
← →
Andrewtitoff © (2009-11-11 11:03) [73]
> Dennis I. Komarov © (11.11.09 10:59) [70]
> > но некоторым типа меня нужно и таблицаMS Аксесс спасет
Ну это то конечно да, только зачем, если можно сделать все в одной программе, зачем пользователю сидеть сразу в куче оболочек, тем более из за этого тож проблемы могут быть...
← →
Сергей М. © (2009-11-11 11:05) [74]В переменной Form2 у тебя nil, вот ты и получил граблями)
И, спрашивается, причем здесь AfterScroll ?
← →
Dennis I. Komarov © (2009-11-11 11:07) [75]Бедный программист который после тебя будет все это переделывать, начиная со структуры базы...
А ведь придет такой же но с условием, что низя ничего исправлять, вернее можно но чтобы работали VBS (которые, кстати, можно поправить при необходимости) и МегаСуперПрога (к которой уже все привыкли)
:(
← →
Andrewtitoff © (2009-11-11 11:14) [76]
> Сергей М. © (11.11.09 11:05) [74]
> В переменной Form2 у тебя nil, вот ты и получил граблями)И,
> спрашивается, причем здесь AfterScroll ?
А можно по подробнее?, т.е.procedure TForm1.ADOTable4AfterScroll(DataSet: TDataSet);
begin
if Form2 <> nil then Form2.StatusBar1.SimpleText:="Запись № "+inttostr(ADOTable4.RecNo)+" из "+inttostr(ADOTable4.RecordCount);
end;
Так действительно все работает, просто до неня не допирает откуда nil возникает и почему, а вообще огромное спасибо!, сейчас все работает и это именно то - что я хотел! =)))
← →
Andrewtitoff © (2009-11-11 11:17) [77]
> Dennis I. Komarov © (11.11.09 11:07) [75]
> Бедный программист который после тебя будет все это переделывать,
> начиная со структуры базы...А ведь придет такой же но с
> условием, что низя ничего исправлять, вернее можно но чтобы
> работали VBS (которые, кстати, можно поправить при необходимости)
> и МегаСуперПрога (к которой уже все привыкли):(
Мля, да достали вы стебаться, я на мастера и не претедндую, а про базу я уже 200 раз говорил что не моя она и я к ее структуре не имею ниткакого отношения...
А мега-супер прога ненравится никому, там во первых интерфейс неудобный не говоря уже он нехватке функционал, кучи лишних и т.д. так что однозначно проще новая - чем править ту в которой ксати уже травили все кому не лень - псле чего она такий и стала...
← →
Сергей М. © (2009-11-11 11:19) [78]
> не допирает откуда nil возникает и почему
Статические переменные, каковой является Form1, Form2 и иже с ними, на момент старта приложения всегда инициализированы нулями.
Application.CreateForm(TForm1, Form1); //<-- при выполнении этой строчки происходит вызов обработчика AfterScroll, в кготором ты обращаешься к переменной Form2,
Application.CreateForm(TForm2, Form2); //<-- которая, в свою очередь, получает валидное значение в этой строчке
← →
Сергей М. © (2009-11-11 11:21) [79]
> сейчас все работает и это именно то - что я хотел
А теперь установи фильтр на свою таблицу и получи еще раз граблями)
← →
Andrewtitoff © (2009-11-11 11:27) [80]
> Сергей М. © (11.11.09 11:19) [78]
> > не допирает откуда nil возникает и почемуСтатические переменные,
> каковой является Form1, Form2 и иже с ними, на момент старта
> приложения всегда инициализированы нулями. Application.CreateForm(TForm1,
> Form1); //<-- при выполнении этой строчки происходит вызов
> обработчика AfterScroll, в кготором ты обращаешься к переменной
> Form2, Application.CreateForm(TForm2, Form2); //<-- которая,
> в свою очередь, получает валидное значение в этой строчке
А если их местами поменять? =)))
Хотя в принципе и так пока что устраивает
> Сергей М. © (11.11.09 11:21) [79]
> > сейчас все работает и это именно то - что я хотелА теперь
> установи фильтр на свою таблицу и получи еще раз граблями)
Фильтровал - пока что все в норме!, а что должно быть?, какие грабли?
← →
Сергей М. © (2009-11-11 11:30) [81]
> что должно быть?, какие грабли?
Сказка про белого бычка)
см. [3]
> если их местами поменять
Меняй, я не возражаю)
Но когда опять получишь граблями, не жалуйся)
← →
Dennis I. Komarov © (2009-11-11 11:32) [82]Да никто над тобой не стебется, тебе еще раз не тонко намекаю переделывай структуру базы, а не ваяй своего монстра
← →
Andrewtitoff © (2009-11-11 11:40) [83]
> Сергей М. © (11.11.09 11:30) [81]
> > что должно быть?, какие грабли?Сказка про белого бычка)см.
> [3]> если их местами поменятьМеняй, я не возражаю)Но когда
> опять получишь граблями, не жалуйся)
Так мне так толком и не обьяснили суть той фразы, а перевод тож как то я не доконца понял, т.е. я понял что может быть, но когда и почему непонял... =)))
Не, небуду тогда менять, эт я так просто спросил для интереса....
> Dennis I. Komarov © (11.11.09 11:32) [82]
> Да никто над тобой не стебется, тебе еще раз не тонко намекаю
> переделывай структуру базы, а не ваяй своего монстра
Ну так я же говорил что немогу менять то - что влияет на работу старой чудо оболочки... =((((
Это уже не от меня зависит... =((((
Во вторых вы толком так и не сказали что можно сделать не нарушая вышесказанного условия...
А я сам боюсь лезть такие дела творить т.к. как всегда сначала все работает - а потом в семый ответственный момент находишь какой нибудь глюк и потом долго и упорно его отлавливаешь... =(((
← →
Anatoly Podgoretsky © (2009-11-11 11:42) [84]> Sergey13 (11.11.2009 10:49:06) [66]
Но жалуется он то на него и на тупых, на его взгляд, бабулек.
← →
Сергей М. © (2009-11-11 11:43) [85]
> Andrewtitoff © (11.11.09 11:40) [83]
А ты и не переводил ее)
Ахинею, которую тебе выдал транслятор, за перевод считать нельзя.
← →
Anatoly Podgoretsky © (2009-11-11 11:44) [86]> Dennis I. Komarov (11.11.2009 10:59:10) [70]
Еще не хватало обсуждать в сотне постов и Акцесс.
← →
Andrewtitoff © (2009-11-11 11:44) [87]
> Dennis I. Komarov © (11.11.09 11:32) [82]
> Да никто над тобой не стебется, тебе еще раз не тонко намекаю
> переделывай структуру базы, а не ваяй своего монстра
Кстати относительно структуты - это позиция руководства, и в чем то они правы - например то что названия улиц так и занесены словами, и не индексы из справочника, и связанно это с тем - что кто бы не пришел эту базу ковырять - все вем ясно и понятно, а если распихать по справочникам - то в случае чего попробуй потом собери обратно и разбкрись какая цифра какой улице соответствует, а скоросто их и так устраивает, она ту не главное....
← →
Anatoly Podgoretsky © (2009-11-11 11:47) [88]> Andrewtitoff (11.11.2009 11:17:17) [77]
Не твоя вот и не лезь. А то делаешь сейчас мега чудовище, и не дай бог если хоть как то заработает, бабулек же инфаркт хватит.
← →
Andrewtitoff © (2009-11-11 11:48) [89]
> Anatoly Podgoretsky © (11.11.09 11:42) [84]
> > Sergey13 (11.11.2009 10:49:06) [66]Но жалуется он то
> на него и на тупых, на его взгляд, бабулек.
Да не на кого я не жалуюсь..., что вы напали то на меня?
> Сергей М. © (11.11.09 11:43) [85]
> > Andrewtitoff © (11.11.09 11:40) [83]А ты и не переводил
> ее)Ахинею, которую тебе выдал транслятор, за перевод считать
> нельзя.
Ну так я и говорю что я ничего можно сказать не понял что вы мне сказали... =(((
> Anatoly Podgoretsky © (11.11.09 11:44) [86]
> > Dennis I. Komarov (11.11.2009 10:59:10) [70]Еще не хватало
> обсуждать в сотне постов и Акцесс.
По моему я вам явно жить мешаю... =))))
← →
Сергей М. © (2009-11-11 11:48) [90]
> относительно структуты - это позиция руководства
Идиотская, ничем не оправданная позиция.
Тогда уж и КЛАДР нужно запретить в бухгалтерии)
← →
Dennis I. Komarov © (2009-11-11 11:49) [91]
> Ну так я же говорил что немогу менять то - что влияет на
> работу старой чудо оболочки... =((((
Глупости. Поменять в твоей оболочке (а судя по таблице она не шибко хорошая) запросы к данным не так сложно. В идеале функционал сего чуда вообще реализовать в своей программе.
> Во вторых вы толком так и не сказали что можно сделать не
> нарушая вышесказанного условия...
> А я сам боюсь лезть такие дела творить т.к. как всегда сначала
> все работает - а потом в семый ответственный момент находишь
> какой нибудь глюк и потом долго и упорно его отлавливаешь.
> .. =(((
Хорошего ничего низя.
← →
Andrewtitoff © (2009-11-11 11:51) [92]
> Anatoly Podgoretsky © (11.11.09 11:47) [88]
> > Andrewtitoff (11.11.2009 11:17:17) [77]Не твоя вот и
> не лезь. А то делаешь сейчас мега чудовище, и не дай бог
> если хоть как то заработает, бабулек же инфаркт хватит.
Значит точно мешаю...
Что вы прицепились то со своей критикой?, да плохой из меня программер, ну так я и не претендую на какие либо звания, но бывают кстати и хуже, каждый волен делать то что ему хочется.., вот хочу я написать эту прогу и пишу, не хотите вы мне помогать - не помогайте, но нападать то постоянно зачем, честное слово не знаю как с другими но со мной наше общение больше на флуд похоже....
← →
Сергей М. © (2009-11-11 11:53) [93]
> я ничего можно сказать не понял что вы мне сказали
Ты и не хотел понять.
Ты сразу писАть бросился)
Тебе справка говорит - НЕЛЬЗЯ надеяться НИ на RecordCount НИ на RecNo, а ты все свое гнешь)
← →
Dennis I. Komarov © (2009-11-11 11:55) [94]Посмотрел в анкету - до этого думал что Овен
← →
Andrewtitoff © (2009-11-11 11:57) [95]
> Сергей М. © (11.11.09 11:48) [90]
> > относительно структуты - это позиция руководстваИдиотская,
> ничем не оправданная позиция.Тогда уж и КЛАДР нужно запретить
> в бухгалтерии)
Не скажите, вы же знаете какие сейчас специалисты, обащаются же не к тем кто может сделать - а к тем кто хочет денег срубить, к сожалению так оно как правило есть....
Можете даже возрадоваться посмотрем статистику опроса у меня в группе относительно компьютерной помощи:
http://vkontakte.ru/club2025068
И делайте выводы, хотя я думаю вы и так все знаете... =))))
> Dennis I. Komarov © (11.11.09 11:49) [91]
> > Ну так я же говорил что немогу менять то - что влияет
> на > работу старой чудо оболочки... =((((Глупости. Поменять
> в твоей оболочке (а судя по таблице она не шибко хорошая)
> запросы к данным не так сложно. В идеале функционал сего
> чуда вообще реализовать в своей программе.> Во вторых вы
> толком так и не сказали что можно сделать не > нарушая вышесказанного
> условия...> А я сам боюсь лезть такие дела творить т.к.
> как всегда сначала > все работает - а потом в семый ответственный
> момент находишь > какой нибудь глюк и потом долго и упорно
> его отлавливаешь.> .. =(((Хорошего ничего низя.
В смысле?, что именно реализовать в программе?, а так я и так по максимуму хочу сделать все в программе - а из базы повыкидывать все лишнее....
← →
Andrewtitoff © (2009-11-11 11:59) [96]
> Сергей М. © (11.11.09 11:53) [93]
> > я ничего можно сказать не понял что вы мне сказалиТы и
> не хотел понять.Ты сразу писАть бросился)Тебе справка говорит
> - НЕЛЬЗЯ надеяться НИ на RecordCount НИ на RecNo, а ты
> все свое гнешь)
А на что можно?
Сейчас даже банки никаких гарантий не дают... =))))
> Dennis I. Komarov © (11.11.09 11:55) [94]
> Посмотрел в анкету - до этого думал что Овен
Ну вот давайте без этого, я же вас бараном не обзывал....
← →
Сергей М. © (2009-11-11 12:09) [97]
> Andrewtitoff © (11.11.09 11:57) [95]
> посмотрем статистику опроса у меня в группе относительно
> компьютерной помощи
Хрень какая-то .. В огороде бузина, а в Киеве дядька..
Это ты вообще к чему приплел ?)
> А на что можно?
Только на методы навигации по НД)
← →
Anatoly Podgoretsky © (2009-11-11 12:11) [98]> Andrewtitoff (11.11.2009 11:48:29) [89]
Нашел козла отпущения.
← →
Sergey13 © (2009-11-11 12:12) [99]> [87] Andrewtitoff © (11.11.09 11:44)
> Кстати относительно структуты - это позиция руководства, и в чем то они правы
Они по теории относительности нечего не говорили? Любопытно было бы почитать. 8-)
← →
Anatoly Podgoretsky © (2009-11-11 12:12) [100]> Andrewtitoff (11.11.2009 11:51:32) [92]
> да плохой из меня программер,
Не льсти себе.
← →
Anatoly Podgoretsky © (2009-11-11 12:13) [101]> Dennis I. Komarov (11.11.2009 11:55:34) [94]
Тонко
← →
Andrewtitoff © (2009-11-11 13:31) [102]
> Сергей М. © (11.11.09 12:09) [97]
> > Andrewtitoff © (11.11.09 11:57) [95]> посмотрем статистику
> опроса у меня в группе относительно > компьютерной помощиХрень
> какая-то .. В огороде бузина, а в Киеве дядька..Это ты вообще
> к чему приплел ?)
К тому - что 47.8% населения Санкт-Петербурга сами оказывают компьютерную помощь, я думаю о качестве данной помощи не нужно рассказывать...
> > А на что можно?Только на методы навигации по НД)
Это в смысле все через DataSet делать?
> Anatoly Podgoretsky © (11.11.09 12:11) [98]
> > Andrewtitoff (11.11.2009 11:48:29) [89]Нашел козла отпущения.
>
Это как раз вы помоему его нашли... =)))
тупо...
← →
Сергей М. © (2009-11-11 13:38) [103]
> Это в смысле все через DataSet делать?
А ты сейчас "через что" делаешь ?)
Через него, родного, и делаешь)
TADOTable есть непрямой наследник TDataSet
← →
Andrewtitoff © (2009-11-11 14:01) [104]
> Сергей М. © (11.11.09 13:38) [103]
> > Это в смысле все через DataSet делать?А ты сейчас "через
> что" делаешь ?)Через него, родного, и делаешь)TADOTable
> есть непрямой наследник TDataSet
Чет я вообще запутался.. =)))
Ну я погуглил и вот что нашел:
Основные свойства, методы и события НД
.......
Методы:
|procedure Append; |Добавляет пустую запись в конец НД |
|procedure AppendRecord(const Values: |Добавляет новую запись, заполняет ее |
|Array of const); |поля значениями Values и отсылает ее в |
| |БД |
|procedure ApplyUpdates; |Записывает кэш обновления в таблицы БД |
|procedure Cancel; |Отменяет все изменения текущей записи, |
| |которые не были сохранены в БД |
|procedure CancelUpdates; |Очищает кэш обновления |
|procedure CheckBrowseMode; |Если НД находился в состоянии |
| |редактирования или вставки, вызывает |
| |метод Post для записи изменений в БД |
|procedure ClearFields; |Очищает все поля текущей записи |
|procedure Close; |Закрывает НД |
|procedure |Закрывает базу данных Database |
|CloseDatabase(Database:TDatabase); | |
|procedure CommitUpdates; |Очищает кэш после успешного обновления |
| |данных в БД |
|function ControlsDisabled: Boolean; |Возвращает True, если показ данных в |
| |визуальных компонентах временно |
| |запрещен методом DisableControls |
|procedure Delete; |Удаляет текущую запись |
|function DisableControls; |В целях улучшения производительности |
| |при навигации по НД временно запрещает |
| |смену данных в визуальных компонентах |
|procedure Edit; |Редактирует текущую запись |
|procedure EnableCointrols; |Отменяет действие метода |
| |DisableControls |
|function FieldByName(const FieldName: |Обеспечивает доступ к полю по его имени|
|String):TField; |FieldName |
|function FindField(const FieldName: |Ищет поле FieldName в НД и возвращает |
|String):TField; |ссылку на поле или NIL, если поле не |
| |найдено |
|function FindFirst: Boolean; |Пытается установить курсор на первую |
| |запись НД и возвращает True в случае |
| |успеха |
|function FindLast: Boolean; |Пытается установить курсор на последнюю|
| |запись НД и возвращает True в случае |
| |успеха |
|function FindNext: Boolean; |Пытается установить курсор на следующую|
| |запись НД и возвращает True в случае |
| |успеха |
|function FindPrior: Boolean; |Пытается установить курсор на |
| |предыдущую запись НД и возвращает True |
| |в случае успеха |
|function First: Boolean; |Устанавливает курсор на первую запись в|
| |НД |
|procedure FreeBookMark(BookMark: |Освобождает память связанную с |
|TBookMark); virtual; |закладкой BookMark |
|function GetBookMark: TBookMark; |Создает закладку на текущей записи и |
|virtual; |возвращает указатель на нее |
|procedure GotoBookMark(BookMark: |Обеспечивает возврат к записи, |
|TBookMark); |связанной с закладкой BookMark |
|procedure Insert; |Переводит НД в режим вставки записей |
|procedure InsertRecord(const Values: |Создает пустую запись, наполняет ее |
|array of const); |поля значениями Values и вставляет ее в|
| |НД |
|function isEmpty: Boolean; |Возвращает True, если в НД нет записей |
|procedure Last; |Устанавливает курсор на последнюю |
| |запись |
|function Locate(const KeyFields: |Ищет в полях перечисленных в параметре |
|String; const KeyValues: Variant; |KeyFields, значения, указанные в |
|Options: TLocateOptions): Boolean; |KeyValues при условиях, заданных |
| |параметром Options. Если запись |
| |найдена, делает ее текущей и возвращает|
| |True |
|function LookUp(const KeyFields: |Используется в детальных НД для поиска |
|String; const KeyValues: Variant; |в полях KeyFields значений KeyValues. |
|const ResultFields: String): Variant; |При успехе возвращает значение полей |
| |ResultFields |
|function MoveBy(Distance: |Перемещает курсор на Distance записей |
|Integer):Integer; |вверх или вниз относительно текущей |
| |записи |
|procedure Next; |Перемещает курсор к следующей записи |
|procedure Open; |Открывает НД |
|procedure Post; virtual; |Сохраняет вставленную или |
| |отредактированную запись в таблице БД |
|procedure Prior; |Перемещает курсор к предыдущей записи |
|procedure Refresh; |Обновляет НД данными из БД |
|procedure SetFields (const Values: |Устанавливает значения Values во все |
|array of const); |поля текущей записи |
← →
Сергей М. © (2009-11-11 14:14) [105]
> и вот что нашел
И ?
← →
Dennis I. Komarov © (2009-11-11 14:15) [106]Зачем они тут?
← →
Sergey13 © (2009-11-11 14:28) [107]> [104] Andrewtitoff © (11.11.09 14:01)
> Ну я погуглил и вот что нашел:
Странный ты. Мог бы просто нажать Ф1. 8-)
← →
Andrewtitoff © (2009-11-11 15:26) [108]
> Сергей М. © (11.11.09 14:14) [105]
> > и вот что нашелИ ?
И не совсем понял что Вы имели ввиду... =)))
> Sergey13 © (11.11.09 14:28) [107]
> > [104] Andrewtitoff © (11.11.09 14:01)> Ну я погуглил
> и вот что нашел:Странный ты. Мог бы просто нажать Ф1. 8-
> )
Ну подумал - мало ли не про то разговор.., вот и решил погуглить на всякий случай =)))
← →
Сергей М. © (2009-11-11 15:34) [109]
> И не совсем понял что Вы имели ввиду
А я совсем не понял, к чему это "погуглил .. нашел")
Равно как и совсем не понял, сделал ли ты из найденного какие-либо выводы)
← →
Andrewtitoff © (2009-11-11 16:03) [110]
> Сергей М. © (11.11.09 15:34) [109]
> > И не совсем понял что Вы имели ввидуА я совсем не понял,
> к чему это "погуглил .. нашел")Равно как и совсем не понял,
> сделал ли ты из найденного какие-либо выводы)
Ну я так понял что вообще речь идет о том что пока бабушка что то делает - на сервере уже база изменилась а у нее отображаются старые данные и для того что бы все было ок - нужно каждый раз запрос посылать, правильно я понял?
← →
Сергей М. © (2009-11-11 16:05) [111]
> правильно я понял?
Ну упрощенно говоря - да.
← →
Andrewtitoff © (2009-11-11 16:58) [112]
> Сергей М. © (11.11.09 16:05) [111]
> > правильно я понял?Ну упрощенно говоря - да.
Урррраааа =))))))
гордитесь мной! =))))))
я немножко подумал и почитал =)))))
P.S.
Ну в общем то говоря пока все работает так что тему наверное можно закрывать.
Страницы: 1 2 3 вся ветка
Текущий архив: 2009.12.27;
Скачать: CL | DM;
Память: 0.9 MB
Время: 0.02 c
