String и TString

[obsession]

Дорогие друзья! помогите пожалуйста!
как исправить код

if radiogroup1.items=Table1.FieldByName('PravA1').AsString then k:=k+1;

[Serge_Bliznykov]

а что Вы данным кодом пытаетесь добиться?
TRadioGroup.Items имеет тип TString - это коллекция строк (ну, грубо говоря - МНОГО строчек).
А Вы это множество пытаетесь сравнить с ОДНОЙ строкой?
Зачем?

[3D Hunter]

if radiogroup1.items[k]=Table1.FieldByName('PravA1').AsString then k:=k+1;

[Пепел Феникса]

эмм, а может таки TStrings?

[Serge_Bliznykov]

Сообщение от Пепел Феникса

эмм, а может таки TStrings?

ну разумеется, Вы правы!
вообще-то класс TStrings абстрактный, я больше привык писать и использовать его наследника TStringList - вот и потерял буковку s на конце...

Сообщение от 3D Hunter

if radiogroup1.items[k]=Table1.FieldByName('PravA1').AsString then k:=k+1;

а чему равно K до выполнения этого кода?
нулю? Тогда может ?

if radiogroup1.items[0]=Table1.FieldByName('PravA1').AsString then k:=k+1;

И почему именно с K-й строкой Вы сравниваете? Вы догадались, чего хотел TC ?

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

k := radiogroup1.items.IndexOf( Table1.FieldByName('PravA1').AsString  );

хотя, может я ошибаюсь, и автору темы вообще что-то другое нужно!

[obsession]

спасибо за ответы
я уже сделала то что хотела))