![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TTable
alex810 © (2007-08-08 09:34:00)Здраствуйте. Подскажите пожалуйста почему у меня при Table1.First не происходит переход началу набора данных?
Плохиш (2007-08-08 11:25:00) [1]
> С учетом [19] сначала сохроняй текущий индекс, потом отключи
> его Table.IndexName:='';
Это отключает только вторичный индекс.
{RASkov} (2007-08-08 10:20:00) [2]> [17] alex810 © (08.08.07 10:07)
> В чем разница
В первом случае
> TGlavnay.FieldByName('KLUCHPOLE').AsString
обращение к полю 'KLUCHPOLE' и его свойству AsString
А во втором....
> TGlavnayKLUCHPOLE
просто написано имя компонента, скорее всего...
Наверное хотел написать так:
TGlavnay.FieldByName('KLUCHPOLE').AsString
или так?
TGlavnayKLUCHPOLE.AsString
?
Разницы никакой.... Видимо у тебя в дизайне созданы компоненты для полей таблицы, имхо, лучше ими пользоваться тогда уж...
т.е. второй случай TGlavnayKLUCHPOLE.{Value}AsString
Хотя кому как... См [18]...
С учетом [19] сначала сохроняй текущий индекс, потом отключи его Table.IndexName:='';
Затем вся эта твоя операция, и после нее возврат сохраненного индекса...
alex810 (2007-08-08 10:13:00) [3]
> Кто говорил про какой-то переход?
Извените перепутал с Prior
Сергей М. (2007-08-08 10:12:00) [4]
> Если так то какая разница, что на слудующую, что на предыдущую?
В индексированном НД только что отредактированная тобой любая непоследняя запись вполне может стать последней, что ты видимо и наблюдаешь, судя по однократному выполнению while not Eof - условия.
iXT (2007-08-08 10:10:00) [5]> [15] alex810 © (08.08.07 10:04)
>
> > А FieldByName - не модно?
>
> TGlavnay.FieldByName('TGlavnay').AsString
> Так в чем разница объясните?
Ну во первых в читаемости кода. Откуда я знаю, что TGlavnayKLUCHPOLE: TEdit - это не правда?
2 - Вы пользуетесь методом TTable
3 - Скорее вот так: TGlavnay.FieldByName('KLUCHPOLE').AsString
4 - F1 никто не отменял
alex810 (2007-08-08 10:07:00) [6]
> TGlavnay.FieldByName('TGlavnay').AsString
> Так в чем разница объясните?
Извените перепутал
В чем разница так
TGlavnay.FieldByName('KLUCHPOLE').AsString
или так?
TGlavnayKLUCHPOLE
iXT (2007-08-08 10:05:00) [7]> > Сохранение измененных записей в TTable
>
> Переход на предыдущую строку?
> Если так то какая разница, что на слудующую, что на предыдущую?
Кто говорил про какой-то переход?
alex810 (2007-08-08 10:04:00) [8]
> А FieldByName - не модно?
TGlavnay.FieldByName('TGlavnay').AsString
Так в чем разница объясните?
alex810 (2007-08-08 10:02:00) [9]
> Напиши вот такой код и убедись, что все работает:
Да работает но мой не работает.
> Сохранение измененных записей в TTable
Переход на предыдущую строку?
Если так то какая разница, что на слудующую, что на предыдущую?
iXT (2007-08-08 10:02:00) [10]> [8] alex810 © (08.08.07 09:51)
А FieldByName - не модно?
iXT (2007-08-08 10:00:00) [11]> [10] alex810 © (08.08.07 09:56)
А что такое Edit?
{RASkov} (2007-08-08 09:59:00) [12]> [10] alex810 © (08.08.07 09:56)
Сохранение измененных записей в TTable
Table1.Post+F1
alex810 (2007-08-08 09:56:00) [13]
> Ну и про Posт... сказали уже
Что такое Posт. В Web программировании знаю а тут?
{RASkov} (2007-08-08 09:53:00) [14]> [5] alex810 © (08.08.07 09:42)
Напиши вот такой код и убедись, что все работает:
TGlavnay.First;
while not TGlavnay.Eof do
begin
ShowMessage(TGlavnayKLUCHPOLE.AsString);
TGlavnay.Next;
end;
:o)
Ну и про Posт... сказали уже
alex810 (2007-08-08 09:51:00) [15]
> во вторых TGlavnayKOLICHESTVO и т.п. - Это что?
Поля в таблице
> Как написано, так и работает.
А, что не правильно ?
iXT (2007-08-08 09:49:00) [16]> [5] alex810 © (08.08.07 09:42)
А чего ты ждешь от такого кода?
Во первых POST вирусы сгрызли,
во вторых TGlavnayKOLICHESTVO и т.п.- Это что?
Reindeer Moss Eater (2007-08-08 09:47:00) [17]Как написано, так и работает.
alex810 (2007-08-08 09:42:00) [18]При выполнении в пошаговом режиме данного кода происходит проверка всего один раз.
TGlavnay.First;
while not TGlavnay.Eof do
begin
for i:=1 to doGrid.RowCount-1 do
begin
if TGlavnayKLUCHPOLE.AsString=doGrid.Cells[49,i] then
begin
TGlavnay.Edit;
TGlavnayKOLICHESTVO.AsString:=doGrid.Cells[6,i];
TGlavnaySUMA.AsString:=doGrid.Cells[11,i];
TGlavnayMESACREMONTA.AsString:=doGrid.Cells[15,i];
blok:=doGrid.Cells[46,i];
TGlavnayENERGOBLOK.AsString:=blok;
end;
end;
TGlavnay.Next;
end;
iXT (2007-08-08 09:40:00) [19]Ну, при коде в [2] странно что вообще что-то "берет", хотя где и что я так и не увидел.
Elen (2007-08-08 09:39:00) [20]
> alex810 © (08.08.07 09:37) [2]
А причем тут Table1.First? И где тут написано что берет?