Danke schonmal aber es geht immer noch nicht:
Project Logiktrainer.exe raised
exception class EAccessViolation with message '
Access violation at address 00403EC4 in modul 'Logiktrainer.exe'. Write of address 0057008F'. Process stopped. Use Step or Run to continue.
diese meldung kommt dann
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
const Bilder: array[0..5] of string = ('Blau','Rot','Grün','Gelb','Braun','Orange');
begin
{RadioButton1}
Image1.Picture.LoadFromFile(Bilder[RadioGroup1.ItemIndex] + '.bmp');
{RadioButton2}
Image2.Picture.LoadFromFile(Bilder[RadioGroup2.ItemIndex] + '.bmp');
{RadioButton3}
Image3.Picture.LoadFromFile(Bilder[RadioGroup3.ItemIndex] + '.bmp');
{RadioButton4}
Image4.Picture.LoadFromFile(Bilder[RadioGroup4.ItemIndex] + '.bmp');
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
close
end;
end.
und so sieht das Programm jetzt aus