Ciao al gruppo:
ho creato un RadioGroup aggiungendo gli elementi da programma:
for I:=1 to idxAz do RgAz.Items.Add(ArrAz[I].CogAzi);
gli elementi vengono correttamente creati;
ora vorrei cancellare i vari elementi cosi facendo:
for I:= RgAz.items.count-1 downto 0 do RgAz.items.Delete(i);
ma mi segnala questo errore "il progetto ha sollevato una eccezzione di classe 'External:SIGSEGV' all'indirizzo
FF808080'
proprio non capisco perchè, gli elementi erano 3 vengono mostrati corettamente, ma poi si blocca.
Grazie per l'aiuto
Ciao, ho appena provato con questo codice e non mi da nessun errore:
procedure TForm1.Button1Click(Sender: TObject);
const idxAz=3;
var i:integer;
begin
for I:=1 to idxAz do RgAz.Items.Add(IntToStr(I));
for I:= RgAz.items.count-1 downto 0 do RgAz.items.Delete(i);
end;
Lazarus 1.5 r49211 FPC 2.6.4 x86_64-linux-gtk 2
Se disabilito la riga delle cancellazioni, ho i miei 3 radio.
Ciao, Mario
per vuotare completamente la lista ti conviene fare in questo modo
while RgAz.items.Count > 0 do
RgAz.items.Delete(0);