Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.10.2013, 09:35   #1
Igor_kud
Пользователь
 
Регистрация: 04.10.2013
Сообщений: 10
По умолчанию Ttable есть вопросик

Есть такая команда у Ttable
Код:
Table1.FieldByName('Vopros_1').AsInteger:=1
Кто подскажет, как колонку 'Vopros_1' сделать без добавления строки чтобы она была 'Vopros_2', 'Vopros_3', т.е. 'Vopros_'+non_voprosa...что-то типа того?
Igor_kud вне форума Ответить с цитированием
Старый 23.10.2013, 09:46   #2
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,527
По умолчанию

Код:
for j:=0 to table1.fields.fieldsCount-1 do
  table1.fields.field[j].asString:='10';
Код:
for j:=1 to X do begin
  s:=format('vopros_%d', x);
  table1.fieldbyname(s).AsString:='1';
end;
какой из кодов вам нужен?
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 23.10.2013, 09:48   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Так пойдет:
Код:
for i:=1 to n do Table1.FieldByName('Vopros_'+IntToStr(i)).AsInteger:=i;
Наличие соответствующих полей в таблице при этом ни кто не отменял
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 23.10.2013, 13:42   #4
IliaIT
Форумчанин
 
Аватар для IliaIT
 
Регистрация: 17.03.2009
Сообщений: 977
По умолчанию

Цитата:
Сообщение от Igor_kud Посмотреть сообщение
Есть такая команда у Ttable
Код:
Table1.FieldByName('Vopros_1').AsInteger:=1
Кто подскажет, как колонку 'Vopros_1' сделать без добавления строки чтобы она была 'Vopros_2', 'Vopros_3', т.е. 'Vopros_'+non_voprosa...что-то типа того?
так и пишите как говорите
Table1.FieldByName('Vopros_'+inttos tr(non_voprosa)).AsInteger:=1;
это с условием что non_voprosa:integer;

общий случай у Аватар приведён.
Интуитивно понятный интерфейс - это такой интерфейс, для работы с которым нужна недюжинная интуиция.
IliaIT вне форума Ответить с цитированием
Старый 23.10.2013, 18:09   #5
Igor_kud
Пользователь
 
Регистрация: 04.10.2013
Сообщений: 10
По умолчанию

Спасибо огромное!!!
Igor_kud вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ASCII-коды, есть вопросик DAN1L Microsoft Office Excel 8 26.12.2012 13:01
Pascal. есть вопросик! Лариск Паскаль, Turbo Pascal, PascalABC.NET 1 09.11.2012 23:33
ComboBox есть вопросик Slimbr Общие вопросы .NET 4 09.12.2009 17:50
Как импортировать поля с Одного TTable в другой TTable Alex_7_4_1 БД в Delphi 3 09.05.2008 18:12
есть вопросик. iamnemo Microsoft Office Excel 2 09.11.2006 16:21