Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.10;
Скачать: CL | DM;

Вниз

TStringField   Найти похожие ветки 

 
Лана Розанова ©   (2002-09-27 15:39) [0]

У меня есть таблица с полями Р11...Р19.Как вместо TableP11.Value:="значение"; TableP12.Value:="значение"; ... ... TableP19.Value:="значение";использовать что-то типа этого: for i:=11 to 19 do TableP("значение i").Value:="значение";СПАСИБО!!!


 
Лана Розанова ©   (2002-09-27 15:40) [1]

Как-то коряво получилось!?


 
Best Before 2024   (2002-09-27 15:45) [2]

for i:=11 to 19 do
TableP.FieldByName("P"+IntToStr(i)).Value := "asd";


 
MsGuns ©   (2002-09-27 15:46) [3]

var
v: variant;
...

for i :=0 to Table.Fields.Count-1 do
begin
v := Table1.Fields[i].value;
...
end;


 
Le Taon   (2002-09-27 15:48) [4]

(FormOrDataModuleThatOwnsThisTables.FindComponent(
"TableP" + IntToStr(i)) as TTable).Value := ""


 
Best Before 2024   (2002-09-27 15:49) [5]

>>for i :=0 to Table.Fields.Count-1 do
>> begin
>> v := Table1.Fields[i].value;
>> ...
>> end

Ну это, если их всего P11 .. P19 и они идут в таком порядке


 
Best Before 2024   (2002-09-27 15:50) [6]

>>(FormOrDataModuleThatOwnsThisTables.FindComponent(
>> "TableP" + IntToStr(i)) as TTable).Value := ""
??!!


 
Le Taon   (2002-09-27 15:53) [7]

as TStringField, конечно


 
Лана Розанова ©   (2002-10-01 11:16) [8]

Вот этот вариан лучше всего:for i:=11 to 19 do TableP.FieldByName("P"+IntToStr(i)).Value := "asd";



Страницы: 1 вся ветка

Текущий архив: 2002.10.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.012 c
1-31870
vixic
2002-09-27 08:42
2002.10.10
Скрипты!


4-32059
B-Ars
2002-08-23 13:13
2002.10.10
Возможно ли изменение размера/положения панели задач?


3-31591
BCPP_Builder_Dev
2002-09-18 16:27
2002.10.10
Как обновить вычисляемые поля главной таблицы???


1-31861
Itap
2002-09-29 00:52
2002.10.10
Вопрос по TRichEdit.


3-31621
Glivinsky
2002-09-18 12:35
2002.10.10
IB За и против использования доменов/Как пишется генератор...