Проблема видно уже решилась в соседней теме но все же напишу, как я решил эту проблему. Я ставил на первое место тот элемент choice, который и есть выбранный. Например я считал из ресурса и знаю какой язык стоит по умолчанию(для 3х элементов):
id5:=formaddchoice(fraza,CH_EXCLUSIVE);
dlang:=false;
for ik:=1 to 2 do
begin
if (lang='English') xor (dlang=true) and (id51=0) then
begin id51:=choiceappendstring(id5,'English');
dlang:=true;end;
if (lang='Russian') xor (dlang=true) and (id52=0) then
begin id52:=choiceappendstring(id5,'Русский');
dlang:=true;end;
if (lang='Ukrainian') xor (dlang=true) and (id53=0) then
begin id53:=choiceappendstring(id5,'Українська');
dlang:=true;end;
end;