Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

МАСТЕРА ! НУЖНА ВАША ПОМОЩЬ ! горю синем пламенем . уже догораю

the-best-officeman © (2002-07-19 18:39:00)
Пять полей а таблице - обычных для редактирования. и Шестое поля - для показа состояния записи. Поле "ОТМ"

Нужно придумать. как сделать так, программа улавливала малейшее
изменение в записи и если изменения были сделаны в записи или
добавлена новая запись. то в последнем поле "ОТМ" текущей записи
ставится значение "1"
Которое показывает, что запись новая и будет выгружена при следующей выгрузке баз.
естественно если во время редактирования ячейки нажали Esc,
то снова ставится значение "0"

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

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

с Уважением, officeman

Viewer (2002-07-20 11:21:00) [1]
Еще одна полезность книжек - Вашу "простоту" никто и не заметит, может даже Вы сами.

the-best-officeman (2002-07-20 01:05:00) [2]
не твой!
ладно, мы ещё посмотрим кто из нас олух

=((

Viewer (2002-07-20 00:09:00) [3]
Бог мой. Начни с книжек - не будешь полным олухом выглядеть.

a:=tbMy.FieldByName("HALALA").AsString;
b:=...
...

tbMy.Edit;
Тут оператор вводит чего-то в Edit1.Text;
...
tbMy.Post;
..
На Post возникает перед ним событие на которое вешаешь обработку:
procedure TAForm.Table1BeforePost(DataSet: TDataSet);
begin
if a <> Edit1.Text then tbMy.FieldByName("OTM").AsString := "1"; // или любое другое подходяще сравнение
end;

the-best-officeman (2002-07-19 23:58:00) [4]
ааааууууууууу.. приззз помогите

the-best-officeman (2002-07-19 21:58:00) [5]
ГОСПОДА - МАСТЕРА
Я не когда не использовал OnBeforePost, OnAfterPost
напишите плиз примерный исходник.
как это може работать. у меня всё зацикливается и вешает комп.

напишите.

MsGuns (2002-07-19 21:10:00) [6]
Viewer где-то местами груб, но АБСОЛЮТНО спрапедлив !

Desdechado (2002-07-19 19:15:00) [7]
на событие BeforePost для TTable или TQuery пишешь обработчик, который меняет еще и 6 поле

Viewer (2002-07-19 19:15:00) [8]
Ну примитивно:
Читаешь запись
Делаешь изменения в элементах ввода
OnBeforePost сравниваешь их и если есть отличия изменяешь "OTM"
Потом происходит Post

Для TCLientDataset есть OldValue, CurValue и NewValue/

Наверх

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