так, в общем, вопрос решил, может не очень красиво, конечно.
но спасибо lmikle за идею, действительно сделал со списком.
Код:
if checkbox1.Checked=true then //если рандомные
begin
Randomize;
if checkbox2.Checked = true then //если без повторений
begin
if l>1 then //
begin
indx:=random(l);
upr:=mas[indx];
for i:=indx to l do
mas[i]:=mas[i+1];
l:=l-1;
end
else
begin
showmessage('last exercise for today');
upr:=mas[l-1];
endofupr:=false;
end;
вот шматок кода, если кому интересно.
теперь задам
еще несколько вопросов, с вашего позволения.
1)решил прописать программу в автозагрузку, воспользовавшись вот этим вот. хотел спросить: arunonce если тру, то добавляет в автозагрузку только раз, потом я могу отключить и все.
а если фолс, то включается постоянно, даже если галочку убрать, я правильно понимаю?
Код:
procedure SetAutorun(aProgTitle,aCmdLine: string; aRunOnce: boolean );
var
hKey: string;
hReg: TRegIniFile;
begin
if aRunOnce then hKey := 'Once'
else
hKey := '';
hReg := TRegIniFile.Create( '' );
hReg.RootKey := HKEY_LOCAL_MACHINE;
hReg.WriteString('Software\Microsoft\Windows\CurrentVersion\Run'
+ hKey + #0,
aProgTitle,
aCmdLine );
hReg.destroy;
end;
в общем, из-за этой процедуры у меня не включается комп=\ показывает черный экран с мышью после приветствия, и все. приходится через безопасный режим удалять программу, убирать из автозагрузки и тд.
хотя вообще не понимаю, как это связано.
2)меня в автозагрузке висят несколько старых названий этой программы(я их менял в процессе создания), без галочек уже, конечно, и с несуществующими реальными адресами. их можно оттуда убрать? а то напрягает немного,и вдруг это как-то мешает, и поэтому не работает автозагрузка по-новой.
при чем если с одной из программ совпадает и имя и расположение, а получается, что одна с галочкой, а вторая(старая), без.
3)ну и вопрос с автоматическим включением программы нужно решать: может кто знает другой путь для добавления туда?