Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ADOTable позиция


Страницы:   1 2 3 4 5 6

Andrewtitoff ©   (2009-11-10 14:03:00) 

Как в реальном времени отображать позицию ADOTable и кол -во записей?
т.е. я понимаю что это
ADOTable.RecNo и ADOTable.RecordCount, только как лучше всего всего их отобрахать в Статусбаре?, можно ли не прибегать к таймеру?


Andrewtitoff   (2009-11-11 16:58:00) [1]


> Сергей М. ©   (11.11.09 16:05) [111]
> > правильно я понял?Ну упрощенно говоря - да.

Урррраааа =))))))
гордитесь мной! =))))))
я немножко подумал и почитал =)))))

P.S.
Ну в общем то говоря пока все работает так что тему наверное можно закрывать.


Сергей М.   (2009-11-11 16:05:00) [2]


> правильно я понял?


Ну упрощенно говоря - да.


Andrewtitoff   (2009-11-11 16:03:00) [3]


> Сергей М. ©   (11.11.09 15:34) [109]
> > И не совсем понял что Вы имели ввидуА я совсем не понял,
>  к чему это "погуглил .. нашел")Равно как и совсем не понял,
>  сделал ли ты из найденного какие-либо выводы)


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


Сергей М.   (2009-11-11 15:34:00) [4]


> И не совсем понял что Вы имели ввиду


А я совсем не понял, к чему это "погуглил .. нашел")
Равно как и совсем не понял, сделал ли ты из найденного какие-либо выводы)


Andrewtitoff   (2009-11-11 15:26:00) [5]


> Сергей М. ©   (11.11.09 14:14) [105]
> > и вот что нашелИ ?

И не совсем понял что Вы имели ввиду... =)))


> Sergey13 ©   (11.11.09 14:28) [107]
> > [104] Andrewtitoff ©   (11.11.09 14:01)> Ну я погуглил
> и вот что нашел:Странный ты. Мог бы просто нажать Ф1. 8-
> )


Ну подумал - мало ли не про то разговор.., вот и решил погуглить на всякий случай =)))


Sergey13   (2009-11-11 14:28:00) [6]

> [104] Andrewtitoff ©   (11.11.09 14:01)
> Ну я погуглил и вот что нашел:

Странный ты. Мог бы просто нажать Ф1. 8-)


Dennis I. Komarov   (2009-11-11 14:15:00) [7]

Зачем они тут?


Сергей М.   (2009-11-11 14:14:00) [8]


> и вот что нашел


И ?


Andrewtitoff   (2009-11-11 14:01:00) [9]


> Сергей М. ©   (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 13:38:00) [10]


> Это в смысле все через DataSet делать?


А ты сейчас "через что" делаешь ?)
Через него, родного, и делаешь)
TADOTable есть непрямой наследник TDataSet


Andrewtitoff   (2009-11-11 13:31:00) [11]


> Сергей М. ©   (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]Нашел козла отпущения.
>

Это как раз вы помоему его нашли... =)))

тупо...


Anatoly Podgoretsky   (2009-11-11 12:13:00) [12]

> Dennis I. Komarov  (11.11.2009 11:55:34)  [94]

Тонко


Anatoly Podgoretsky   (2009-11-11 12:12:00) [13]

> Andrewtitoff  (11.11.2009 11:51:32)  [92]

> да плохой из меня программер,

Не льсти себе.


Sergey13   (2009-11-11 12:12:00) [14]

> [87] Andrewtitoff ©   (11.11.09 11:44)
> Кстати относительно структуты - это позиция руководства, и в чем то они правы

Они по теории относительности нечего не говорили? Любопытно было бы почитать. 8-)


Anatoly Podgoretsky   (2009-11-11 12:11:00) [15]

> Andrewtitoff  (11.11.2009 11:48:29)  [89]

Нашел козла отпущения.


Сергей М.   (2009-11-11 12:09:00) [16]


> Andrewtitoff ©   (11.11.09 11:57) [95]


> посмотрем статистику опроса у меня в группе относительно
> компьютерной помощи


Хрень какая-то .. В огороде бузина, а в Киеве дядька..
Это ты вообще к чему приплел ?)


> А на что можно?


Только на методы навигации по НД)


Andrewtitoff   (2009-11-11 11:59:00) [17]


> Сергей М. ©   (11.11.09 11:53) [93]
> > я ничего можно сказать не понял что вы мне сказалиТы и
> не хотел понять.Ты сразу писАть бросился)Тебе справка говорит
> - НЕЛЬЗЯ надеяться НИ на RecordCount НИ на RecNo,  а ты
> все свое гнешь)

А на что можно?
Сейчас даже банки никаких гарантий не дают... =))))
> Dennis I. Komarov ©   (11.11.09 11:55) [94]
> Посмотрел в анкету - до этого думал что Овен

Ну вот давайте без этого, я же вас бараном не обзывал....


Andrewtitoff   (2009-11-11 11:57:00) [18]


> Сергей М. ©   (11.11.09 11:48) [90]
> > относительно структуты - это позиция руководстваИдиотская,
>  ничем не оправданная позиция.Тогда уж и КЛАДР нужно запретить
> в бухгалтерии)


Не скажите, вы же знаете какие сейчас специалисты, обащаются же не к тем кто может сделать - а к тем кто хочет денег срубить, к сожалению так оно как правило есть....
Можете даже возрадоваться посмотрем статистику опроса у меня в группе относительно компьютерной помощи:
http://vkontakte.ru/club2025068
И делайте выводы, хотя я думаю вы и так все знаете... =))))


> Dennis I. Komarov ©   (11.11.09 11:49) [91]
> > Ну так я же говорил что немогу менять то - что влияет
> на > работу старой чудо оболочки... =((((Глупости. Поменять
> в твоей оболочке (а судя по таблице она не шибко хорошая)
> запросы к данным не так сложно. В идеале функционал сего
> чуда вообще реализовать в своей программе.> Во вторых вы
> толком так и не сказали что можно сделать не > нарушая вышесказанного
> условия...> А я сам боюсь лезть такие дела творить т.к.
> как всегда сначала > все работает - а потом в семый ответственный
> момент находишь > какой нибудь глюк и потом долго и упорно
> его отлавливаешь.> .. =(((Хорошего ничего низя.


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


Dennis I. Komarov   (2009-11-11 11:55:00) [19]

Посмотрел в анкету - до этого думал что Овен


Сергей М.   (2009-11-11 11:53:00) [20]


> я ничего можно сказать не понял что вы мне сказали


Ты и не хотел понять.
Ты сразу писАть бросился)

Тебе справка говорит - НЕЛЬЗЯ надеяться НИ на RecordCount НИ на RecNo,  а ты все свое гнешь)


Страницы:   1 2 3 4 5 6

Наверх

Титульная страница Поиск, карта сайта Написать письмо