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

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

TTable


Страницы:   1 2

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? И где тут написано что берет?


Страницы:   1 2

Наверх

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