Morgen,
Was für Fehler meinst du denn? An welcher Stelle?
Delphi-Quellcode:
if Form2.ListBox1.Items.Strings[11] = 'J' then
begin
CheckBox1.Checked := True;
end
else
if Form2.ListBox1.Items.Strings[11] = 'N' then
begin
CheckBox1.Checked := False;
end;
sowas kann man auch abkürzen:
Checkbox1.Checked := Form2.ListBox1.Items.Strings[11] = 'J';
Was machst du wenn strings keine 11 Elemente hat?
Warum haben sämtliche Controls keine vernünftige Namen?
Wie stellst du sicher, dass der Ordner "Speicher" existiert, bzw. dass du darin schreiben kannst?
Warum deklarierst du deine Variablen nicht alle an einer Stelle?
Delphi-Quellcode:
public
ID : Integer;
M : Integer; // hier
procedure LoadDaten;
...
end;
var
Form1: TForm1;
Count : Integer= 0; // hier
Warum hast du dir keine Klasse dafür geschrieben? Das wäre wesentlich übersichtlicher und leichter zu pflegen.